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

fix bug in deserializer; also change scribble eval to not use sandbox module mode

Browse Source 
svn: r8280

original commit: 2d08c177252d8c8e0fdbc9a557857d0ade19c1f8
This commit is contained in:
Matthew Flatt 2008-01-10 19:47:13 +00:00
parent 50b3a68191
commit 4a3d0e82ba
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/scribble/eval.ss
View File

@ -209,7 +209,7 @@
[sandbox-error-output 'string] [sandbox-error-output 'string]
[sandbox-eval-limits #f] [sandbox-eval-limits #f]
[sandbox-make-inspector current-inspector]) [sandbox-make-inspector current-inspector])
(make-evaluator 'scheme/base))) (make-evaluator '(begin (require scheme/base)))))
(define (do-plain-eval ev s catching-exns?) (define (do-plain-eval ev s catching-exns?)
(call-with-values (lambda () (call-with-values (lambda ()
@ -223,6 +223,8 @@
[(module . _rest) [(module . _rest)
(syntax->datum s)] (syntax->datum s)]
[_else s])] [_else s])]
[(bytes? s)
`(begin ,s)]
[(string? s) [(string? s)
`(begin ,s)] `(begin ,s)]
[else s])))) [else s]))))