better error message(?)

svn: r11102
This commit is contained in:
Eli Barzilay 2008-08-06 06:32:08 +00:00
parent b62d79045e
commit ea64d1d488

View File

@ -196,7 +196,7 @@
(namespace-require lang))
(unless (memq '#%top-interaction (namespace-mapped-symbols))
(raise-hopeless-syntax-error
"invalid language (existing module, but no language bindings)"
"invalid language (no #%top-interaction binding)"
lang)))
(define (*init)
;; the prompt makes it continue after an error