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

example for protect-out

Browse Source 
svn: r13907
This commit is contained in:
Jon Rafkind 2009-03-03 02:44:59 +00:00
parent 56bb4539d0
commit bc3e541cf6
1 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
collects/scribblings/reference/syntax.scrbl
View File

@ -830,7 +830,20 @@ follows.
@defsubform[(protect-out provide-spec ...)]{ Like the union of the
@scheme[provide-spec]s, except that the exports are protected; see
@secref["modprotect"]. The @scheme[provide-spec] must specify only
bindings that are defined within the exporting module.}
bindings that are defined within the exporting module.
@defexamples[#:eval (syntax-eval)
(module a scheme
(provide (protect-out foo))
(define foo 1))
(define weak-inspector (make-inspector (current-code-inspector)))
(define (weak-eval x)
(parameterize ([current-code-inspector weak-inspector])
(eval x)))
(require 'a)
foo
(weak-eval 'foo)
]}
@specsubform[#:literals (for-meta)
(for-meta phase-level provide-spec ...)]{ Like the union of the