~ chicken-core (chicken-5) b9c92d11d8fe5dc1a2ec34df7417a30c6bd8cdb5


commit b9c92d11d8fe5dc1a2ec34df7417a30c6bd8cdb5
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Wed Mar 14 17:51:28 2018 +1300
Commit:     Peter Bex <peter@more-magic.net>
CommitDate: Sun Mar 18 15:06:56 2018 +0100

    Strip gensym noise from lambda-infos
    
    This gives a slightly nicer user experience by preserving the in-source
    names given to a procedure's arguments in its lambda-info.
    
    Signed-off-by: Peter Bex <peter@more-magic.net>

diff --git a/core.scm b/core.scm
index be629780..00eb04dc 100644
--- a/core.scm
+++ b/core.scm
@@ -2601,7 +2601,8 @@
 			    (qnode
 			     (##sys#make-lambda-info
 			      (->string (cons (or (real-name id) '?)
-					      (cdr llist) )))))) ; this is not always correct, due to optimizations
+					      ;; this is not always correct, due to optimizations
+					      (strip-syntax (cdr llist))))))))
 			  cvars) ) ) ) ) ) ) ) )
 
 	  ((set!)
Trap