better error message(?)
svn: r11102
This commit is contained in:
parent
b62d79045e
commit
ea64d1d488
|
@ -196,7 +196,7 @@
|
||||||
(namespace-require lang))
|
(namespace-require lang))
|
||||||
(unless (memq '#%top-interaction (namespace-mapped-symbols))
|
(unless (memq '#%top-interaction (namespace-mapped-symbols))
|
||||||
(raise-hopeless-syntax-error
|
(raise-hopeless-syntax-error
|
||||||
"invalid language (existing module, but no language bindings)"
|
"invalid language (no #%top-interaction binding)"
|
||||||
lang)))
|
lang)))
|
||||||
(define (*init)
|
(define (*init)
|
||||||
;; the prompt makes it continue after an error
|
;; the prompt makes it continue after an error
|
||||||
|
|
Loading…
Reference in New Issue
Block a user