suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

...

Browse Source 
svn: r763
This commit is contained in:
John Clements 2005-09-04 07:38:45 +00:00
parent f68dda3324
commit e54afdb8c8
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
collects/lang/private/teach.ss
View File

@ -1763,7 +1763,10 @@
exprs
null)
(if continuing?
(syntax/loc stx (begin (set! id expr ...) set!-result))
(syntax-property
(syntax/loc stx (begin (set! id expr ...) set!-result))
'stepper-skipto
(list syntax-e cdr syntax-e car))
(syntax-property
(syntax/loc stx (#%app values (advanced-set!-continue id expr ...)))
'stepper-skipto