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

Change this more to how it should be.

Browse Source 
svn: r13124

original commit: c7ee5b600c1023f612df6c4549f0bde66eef1416
This commit is contained in:
Stevie Strickland 2009-01-14 21:35:07 +00:00
parent 242e3f0266
commit 95759e5196
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/mzlib/private/contract-define.ss
View File

@ -25,7 +25,7 @@
(syntax/loc stx
((contract contract-id
id
(format "definition ~a" (syntax->datum (quote-syntax f)))
(syntax->datum (quote-syntax f))
neg-blame-str
(quote-syntax f))
arg
@ -35,7 +35,7 @@
(syntax/loc stx
(contract contract-id
id
(format "definition ~a" (syntax->datum (quote-syntax ident)))
(syntax->datum (quote-syntax ident))
neg-blame-str
(quote-syntax ident)))])))))