~ 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