~ chicken-core (chicken-5) 219f6e6e7141ce0a22c1fe3e3bbd462416a7087d


commit 219f6e6e7141ce0a22c1fe3e3bbd462416a7087d
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Mon Jan 18 19:09:45 2016 +1300
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Tue Mar 8 22:52:33 2016 +1300

    Drop obsolete #:tmp marker for specializations in `build-node-graph`

diff --git a/support.scm b/support.scm
index a730c3ea..0ea66202 100644
--- a/support.scm
+++ b/support.scm
@@ -508,11 +508,7 @@
 		  (if (null? bs)
 		      (walk body)
 		      (make-node
-		       'let 
-		       (map (lambda (v) 
-			      ;; for temporaries introduced by specialization
-			      (if (eq? '#:tmp v) (error "SHOULD NOT HAPPEN") v)) ; OBSOLETE
-			    (unzip1 bs))
+		       'let (unzip1 bs)
 		       (append (map (lambda (b) (walk (cadr b))) (cadr x))
 			       (list (walk body)) ) ) ) ) )
 	       ((lambda ##core#lambda) 
Trap