diff --git a/retropikzel/pffi/v0.1.0/main.scm b/retropikzel/pffi/v0.1.0/main.scm
index a6fc21a..f636a76 100644
--- a/retropikzel/pffi/v0.1.0/main.scm
+++ b/retropikzel/pffi/v0.1.0/main.scm
@@ -243,7 +243,7 @@
             shared-object))))
 
     (define pffi-pointer-free
-      (lambda (pffi)
+      (lambda (pointer)
         (cond-expand (sagittarius (c-free pointer)))))
 
     (define pffi-pointer-null?