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

there's an extra syntax-e in the stepper-skipto for (time ...)

Browse Source 
svn: r4450
This commit is contained in:
John Clements 2006-09-28 00:59:28 +00:00
parent d82c0b02b3
commit 7de449312c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1655,7 +1655,7 @@
(syntax-property
(syntax/loc stx (time . exprs))
'stepper-skipto
'(syntax-e cdr car syntax-e car syntax-e cdr car syntax-e cdr syntax-e cdr car syntax-e cdr cdr car))]
'(syntax-e cdr car syntax-e car syntax-e cdr car syntax-e cdr syntax-e cdr car syntax-e cdr cdr syntax-e car))]
[_else
(bad-use-error 'time stx)]))))