diff --git a/retropikzel/pffi/shared/main.scm b/retropikzel/pffi/shared/main.scm
index 3f9263f..c8286e8 100644
--- a/retropikzel/pffi/shared/main.scm
+++ b/retropikzel/pffi/shared/main.scm
@@ -6,6 +6,11 @@
          '(import (chicken foreign)
                   (chicken memory))
          #t))))
+  (ypsilon
+    (define-syntax pffi-init
+      (lambda (x)
+        (syntax-case x ()
+                     ((_) '(import (ypsilon c-ffi)))))))
   (else
     (define pffi-init(lambda () #t))))
 
diff --git a/test.scm b/test.scm
index e42fac3..da70f09 100755
--- a/test.scm
+++ b/test.scm
@@ -3,8 +3,7 @@
         (scheme char)
         (scheme file)
         (scheme process-context)
-        (retropikzel pffi)
-        (ypsilon c-ffi))
+        (retropikzel pffi))
 
 (define header-count 1)