bug with assume
Here's the bug and as an attachment a patch by Peter Bex
(let [(l (list 1 2 3))]
(assume
((l list))
(print l)))
;; Error: during expansion of (assume ...) - call of non-procedure: #<transformer>
;; Call history:
;; compiler.scm:410: find-id
;; compiler.scm:411: ##sys#get
;; compiler.scm:463: ##sys#get
;; compiler.scm:464: ##sys#alias-global-hook
;; compiler.scm:401: g1619
;; compiler.scm:1272: walk
;; compiler.scm:498: constant?
;; compiler.scm:401: g1619
;; compiler.scm:1272: walk
;; compiler.scm:498: constant?
;; compiler.scm:401: g1619
;; compiler.scm:1272: walk
;; compiler.scm:498: constant?
;; compiler.scm:1246: ##sys#hash-table-ref
;; compiler.scm:1248: ##sys#hash-table-set!
;; compiler.scm:615: ##sys#canonicalize-body <--
fixed in master