1 files changed, 3 insertions, 2 deletions

@@ -3,12 +3,13 @@
 #+chicken (import (r7rs))
 
 (let loop ((load-files '("fff.parse"
-                         "fff.read")))
+                         "fff.read"
+                         "fff.json")))
   (if (null? load-files)
       #t
       (let ((this (car load-files)))
         (load (string-append (car load-files) ".sld"))
-        (eval `(import ,(map string->symbol (string-split this "."))))
+        ;; (eval `(import ,(map string->symbol (string-split this "."))))
         (load (string-append (car load-files) ".ss"))
         (loop (cdr load-files)))))