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

fix #16

Browse Source
This commit is contained in:
Stephen Chang 2017-07-24 12:01:40 -04:00
parent 2d6ecae8c4
commit 39be2ef904
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
turnstile/turnstile.rkt
View File

@ -325,7 +325,7 @@
sub-clause.pat ...
(~do [param tmp]))]
[pattern (~seq #:modes ([param:id value:expr] ...) (sub-clause:clause ...))
#:with (tmp ...) (generate-temporary #'[param ...])
#:with (tmp ...) (generate-temporaries #'[param ...])
#:with pat
#'(~and (~do (define tmp [param]) ...
[param value] ...)