From e68ae17b86f27385f22dba74634ee6903d16cc3d Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Wed, 8 Apr 2015 14:47:46 -0400 Subject: [PATCH] Test case for compile-time eval --- test.scm | 13 +++++++++---- 1 file changed, 9 insertions(+), 4 deletions(-) diff --git a/test.scm b/test.scm index f32298f8..bc4cb3fe 100644 --- a/test.scm +++ b/test.scm @@ -1,7 +1,12 @@ -((lambda (x) - ((lambda () - ((lambda (z) - (+ x z)) 2)))) 1) +;((lambda (x) +; ((lambda () +; ((lambda (z) +; (+ x z)) 2));)) +; 1) +;((lambda (x y z) (+ x y)) 1 2 3) + +((lambda () (+ 1 2))) + ;;; Temporary testing, delete this once it works ; Need to rewrite the code to use this, and preserve the global def ;(define (test)