conservatory
/
ikarus
4
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

collect-key now returns a gensym

This commit is contained in:
Abdulaziz Ghuloum 2007-09-01 16:09:56 -04:00
parent 77b3fd5225
commit 4b7f3a0258
2 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
src/ikarus.boot
View File

Binary file not shown.

2
src/ikarus.collect.ss
View File

@ -41,7 +41,7 @@
(define (collect-key) (define (collect-key)
(or ($collect-key) (or ($collect-key)
(begin (begin
($collect-key (string #\k)) ($collect-key (gensym))
(collect-key)))) (collect-key))))
) )