Added eval library

Makefile

@@ -1,11 +1,14 @@
 TESTSCM = unit-tests
 TESTFILES = $(addprefix tests/, $(addsuffix .scm, $(TESTSCM)))
 
-all: cyclone scheme/base.o scheme/read.o icyc
+all: cyclone scheme/base.o scheme/read.o scheme/eval.o icyc
 
 scheme/base.o: cyclone scheme/base.sld
 	./cyclone scheme/base.sld
 
+scheme/eval.o: cyclone scheme/eval.sld
+	./cyclone scheme/eval.sld
+
 scheme/read.o: cyclone scheme/read.sld
 	./cyclone scheme/read.sld
 

cyclone.scm

@@ -240,9 +240,9 @@
            (not (null? result)))
       (let ((program
               (append
-                (if (member 'eval result) 
-                    (read-file (get-lib "eval.scm")) 
-                   '())
+                ;(if (member 'eval result) 
+                ;    (read-file (get-lib "eval.scm")) 
+                ;   '())
                 ;(if (member 'read result) 
                 ;    (append
                 ;        (read-file (get-lib "parser.scm"))

icyc.scm

@@ -4,6 +4,9 @@
 ;;
 ;; This module contains a simple Read-Eval-Print Loop
 ;;
+(import (scheme base)
+        (scheme read)
+        (scheme eval))
 (cond-expand
   (cyclone
     (display *Cyc-version-banner*))