From 5e1bc2f282d52a4f274c3e94eb1a3e565ced78fb Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Thu, 7 Jan 2016 22:45:45 -0500
Subject: [PATCH] New FFI syntax

---
 scheme/load.sld | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/scheme/load.sld b/scheme/load.sld
index 9d1a2e3b..f1cb9e0b 100644
--- a/scheme/load.sld
+++ b/scheme/load.sld
@@ -15,12 +15,11 @@
       ;; lambda portion is computed, so we can't include that.
       ;; compiler would need to insert the "static void (lambda)" part
 ;; TODO: maybe break up into two args, one being the args list and the other being the function body??
-    (c-ffi:define prim-test  "
+    (define-c prim-test  "
       (void *data, int argc, closure _, object k, object arg1, object arg2) {
         return_closcall1(data,  k, arg1); 
       }
     ")
-    )
     ;; End FFI
     (define (load filename . env)
       (let ((exprs (call-with-input-file filename