diff --git a/test.scm b/test.scm index a2ec710e..fd1f752b 100644 --- a/test.scm +++ b/test.scm @@ -10,6 +10,8 @@ ;; Demonstrate sending an interpreted function to compiled code ;; I think in order for this to work, the compiled code would have to ;; detect an interpreted proc, and use eval to execute it -;(eval '(call (lambda (x) x) (display (+ 1 1)))) + +;; TODO: to debug this, may try placing printfs in runtime's apply +(eval '(call (lambda (x) x) (display (+ 1 1)))) ;(eval '(call write 1)) -(eval '(call mywrite 1)) +;(eval '(call mywrite 1))