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

Fix a couple of "~e"s to "~.s"s.

Browse Source
This commit is contained in:
Eli Barzilay 2010-10-26 05:21:26 -04:00
parent b55b9adde4
commit 2491ac914c
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/racket/sandbox.rkt
View File

@ -969,9 +969,9 @@
(if (or (not reqlang) (equal? reqlang (syntax->datum #'lang)))
(values (car prog) source)
(error 'make-evaluator
"module code used `~e' for a language, expecting `~e'"
"module code used `~.s' for a language, expecting `~.s'"
(syntax->datum #'lang) reqlang))]
[_else (error 'make-evaluator "expecting a `module' program; got ~e"
[_else (error 'make-evaluator "expecting a `module' program; got ~.s"
(syntax->datum (car prog)))])))
(make-evaluator* void
(if (path? input-program) (cons input-program allow) allow)