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

runtime module path

Browse Source 
svn: r13355
This commit is contained in:
Jay McCarthy 2009-02-02 17:55:28 +00:00
parent 2deecba2db
commit 19c09e45bd
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/web-server/configuration/namespace.ss
View File

@ -6,6 +6,8 @@
(define default-to-be-copied-module-specs (list mzscheme-module-spec mred-module-spec))
(define-runtime-module-path scheme/base-module-spec scheme/base)
(define (make-make-servlet-namespace
#:to-be-copied-module-specs [to-be-copied-module-specs empty])
;; get the names of those modules.
@ -23,7 +25,6 @@
(define new-namespace (make-base-empty-namespace))
(define additional-names (map get-name additional-specs))
(parameterize ([current-namespace new-namespace])
(define scheme/base-module-spec 'scheme/base)
(namespace-require scheme/base-module-spec)
(for-each (lambda (name)
(with-handlers ([exn? void])