suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

add `#%declare', require declaration of cross-phase persistent modules

Browse Source 
original commit: 9e2cf2ab376a3461a1db943dfb35f6a152b70470
This commit is contained in:
Matthew Flatt 2013-07-22 10:34:39 -06:00
parent 6c624d531e
commit 0170b0a672
2 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkgs/scribble-pkgs/scribble-lib/scribble/doclang.rkt
View File

@ -40,9 +40,7 @@
#'body1 'module
(append (kernel-form-identifier-list)
(syntax->list #'(provide
require
#%provide
#%require))))])
require))))])
(syntax-case expanded (begin)
[(begin body1 ...)
#`(doc-begin m-id post-process exprs body1 ... . body)]
@ -57,7 +55,8 @@
module
module*
#%require
#%provide))))
#%provide
#%declare))))
#`(begin #,expanded (doc-begin m-id post-process exprs . body))]
[_else
#`(doc-begin m-id post-process

2
pkgs/scribble-pkgs/scribble-text-lib/scribble/text/syntax-utils.rkt
View File

@ -8,7 +8,7 @@
(begin-for-syntax
(define definition-ids ; ids that don't require forcing
(syntax->list #'(define-values define-syntaxes begin-for-syntax
require provide #%require #%provide)))
require provide #%require #%provide #%declare)))
(define stoplist (append definition-ids (kernel-form-identifier-list)))
(define (definition-id? id)
(and (identifier? id)