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

fix typo

Browse Source 
svn: r11876
This commit is contained in:
Eli Barzilay 2008-09-25 19:57:33 +00:00
parent cd6a37ff4c
commit 0c6b7c4e26
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/handin-server/checker.ss
View File

@ -684,7 +684,7 @@
(define-syntax-rule (!integer* expr) (define-syntax-rule (!integer* expr)
(unless (integer? ((submission-eval) `expr)) (unless (integer? ((submission-eval) `expr))
(error* "~a is expected to be bound to an integer" (->disp 'expr)))) (error* "~a is expected to be bound to an integer" (->disp 'expr))))
(define-syntax (!integer id) (define-syntax-rule (!integer id)
(begin (!defined id) (!integer* id))) (begin (!defined id) (!integer* id)))
(provide !eval) (provide !eval)