debugging

This commit is contained in:
Justin Ethier 2016-08-16 03:52:22 -04:00
parent 1c27b280e8
commit 5cf0cd048b

View file

@ -163,6 +163,8 @@
;; save lambda to adb
(adb:set! id fnc)
;; Analyze the lambda
;(trace:error `(DEBUG-exp ,exp))
;(trace:error `(DEUBG-ast ,(ast:lambda-formals->list exp)))
(for-each
(lambda (arg)
;(let ((var (adb:get/default arg (adb:make-var))))