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

..

Browse Source 
original commit: a4e459f9d5a6cb96b169914ddb11edabd57d6c98
This commit is contained in:
Robby Findler 2002-11-20 14:34:00 +00:00
parent 93acb4bc1f
commit 57bbeada6f
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/mzlib/contracts.ss
View File

@ -67,7 +67,7 @@
[else "<<unknown>>"])))
(with-syntax ([neg-blame-str (build-src-loc-string/unk stx)])
(syntax-case stx ()
(syntax-case stx (set!)
[(set! _ arg)
(raise-syntax-error 'define/contract
"cannot set! a define/contract variable"