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

hack around namespace-variable-value problem

Browse Source 
svn: r12441
This commit is contained in:
Eli Barzilay 2008-11-14 05:02:28 +00:00
parent dc4eb77b10
commit 61d747dc96
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/handin-server/checker.ss
View File

@ -660,8 +660,8 @@
(lambda (_) (lambda (_)
(error* "bound to a syntax, expecting a value: ~e" (error* "bound to a syntax, expecting a value: ~e"
(->disp 'id)))]) (->disp 'id)))])
(namespace-variable-value `id #t #f (parameterize ([current-namespace (get-namespace (submission-eval))])
(get-namespace (submission-eval)))) (namespace-variable-value `id)))
...)) ...))
(provide !syntax) (provide !syntax)
@ -671,8 +671,8 @@
[exn:fail:contract:variable? [exn:fail:contract:variable?
(lambda (_) (lambda (_)
(error* "missing binding: ~e" (->disp 'id)))]) (error* "missing binding: ~e" (->disp 'id)))])
(namespace-variable-value `id #t #f (parameterize ([current-namespace (get-namespace (submission-eval))])
(get-namespace (submission-eval))) (namespace-variable-value `id))
(error* "bound to a value, expecting a syntax: ~e" (->disp 'id))) (error* "bound to a value, expecting a syntax: ~e" (->disp 'id)))
...)) ...))