repair visibility of `metas` submodule

pull/127/head
Matthew Butterick 8 years ago
parent 0d1569b36f
commit 43c986bd9d

@ -42,6 +42,7 @@
[DIRECTORY-REQUIRES (require+provide-directory-require-files path-string)] [DIRECTORY-REQUIRES (require+provide-directory-require-files path-string)]
[SOURCE-LINES source-stx] [SOURCE-LINES source-stx]
[DOC (setup:main-export)] [DOC (setup:main-export)]
[META-MOD (setup:meta-export)]
[PARSER-MODE-FROM-READER parser-mode-from-reader] [PARSER-MODE-FROM-READER parser-mode-from-reader]
[POLLEN-MODULE-SYNTAX (let ([mod-stx #'(module POLLEN-MOD-NAME pollen [POLLEN-MODULE-SYNTAX (let ([mod-stx #'(module POLLEN-MOD-NAME pollen
(define-meta HERE-KEY HERE-PATH) (define-meta HERE-KEY HERE-PATH)
@ -51,6 +52,9 @@
(syntax-property mod-stx 'parser-mode-from-reader parser-mode-from-reader))]) (syntax-property mod-stx 'parser-mode-from-reader parser-mode-from-reader))])
#'(module runtime-wrapper racket/base #'(module runtime-wrapper racket/base
POLLEN-MODULE-SYNTAX POLLEN-MODULE-SYNTAX
(module META-MOD racket/base
(require (submod ".." POLLEN-MOD-NAME META-MOD))
(provide (all-from-out (submod ".." POLLEN-MOD-NAME META-MOD))))
(require (submod pollen/private/runtime-config show) 'POLLEN-MOD-NAME) (require (submod pollen/private/runtime-config show) 'POLLEN-MOD-NAME)
(provide (all-from-out 'POLLEN-MOD-NAME)) (provide (all-from-out 'POLLEN-MOD-NAME))
(show DOC 'PARSER-MODE-FROM-READER HERE-PATH))))) ; HERE-PATH acts as "local" runtime config (show DOC 'PARSER-MODE-FROM-READER HERE-PATH))))) ; HERE-PATH acts as "local" runtime config

@ -1 +1 @@
1468998858 1469050349

Loading…
Cancel
Save