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

...

Browse Source 
original commit: f90c62d4efd06edfe52937bd3fa64fddbe857d3f
This commit is contained in:
Robby Findler 2001-11-06 00:19:05 +00:00
parent 703fd60aa7
commit 2d7eb8b13b
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
collects/framework/specs.ss
View File

@ -34,6 +34,7 @@
(and (identifier? (syntax name))
(identifier? (syntax neg-blame))
(identifier? (syntax pos-blame)))
(syntax-case (syntax type) (-> number union boolean interface tst)
[(-> funs ...)
(with-syntax ([(doms ...) (all-but-last (syntax->list (syntax (funs ...))))]