file structure

dev-elider-3
Matthew Butterick 8 years ago
parent 81ab412ca2
commit 739269f889

@ -1,5 +1,4 @@
#lang br #lang br
(module reader br (module reader br
(require "bf/bf-reader.rkt") (require (submod "bf/main.rkt" reader))
(provide read-syntax)) (provide read-syntax))

@ -16,6 +16,6 @@
(define parse-tree (parse source-path (tokenize input-port))) (define parse-tree (parse source-path (tokenize input-port)))
(strip-context (strip-context
(inject-syntax ([#'PARSE-TREE parse-tree]) (inject-syntax ([#'PARSE-TREE parse-tree])
#'(module bf-mod "bf-expander.rkt" #'(module bf-mod br/bf/bf-expander
PARSE-TREE)))) PARSE-TREE))))
(provide read-syntax) (provide read-syntax)

@ -0,0 +1,5 @@
#lang br
(module reader br
(require "bf-reader.rkt")
(provide read-syntax))
Loading…
Cancel
Save