move to demo subdir

dev-elider-3
Matthew Butterick 9 years ago
parent ef882b8dff
commit 49ee6aa3f9

@ -3,5 +3,5 @@
(define-read-and-read-syntax (source-path input-port) (define-read-and-read-syntax (source-path input-port)
(strip-context (strip-context
#`(module bf-mod br/example/basic/expander #`(module bf-mod br/demo/basic/expander
#,(parse source-path (tokenize input-port))))) #,(parse source-path (tokenize input-port)))))

@ -1,4 +1,4 @@
#lang br/example/basic #lang br/demo/basic
10 PRINT "shit" 10 PRINT "shit"
20 PRINT "bird" 20 PRINT "bird"
25 PRINT "dork" 25 PRINT "dork"

@ -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 br/example/bf/bf-expander #'(module bf-mod br/demo/bf/bf-expander
PARSE-TREE)))) PARSE-TREE))))
(provide read-syntax) (provide read-syntax)

@ -5,4 +5,4 @@
(define deps '("base" "sugar" "beautiful-racket-lib" "rackunit-lib" "ragg" "parser-tools-lib")) (define deps '("base" "sugar" "beautiful-racket-lib" "rackunit-lib" "ragg" "parser-tools-lib"))
(define build-deps '("racket-doc")) (define build-deps '("racket-doc"))
(define test-omit-paths '("br/example")) (define test-omit-paths '("br/demo"))
Loading…
Cancel
Save