move to example subdir

dev-elider-3
Matthew Butterick 9 years ago
parent 2433a1a975
commit ef882b8dff

@ -1,4 +0,0 @@
#lang br
(module reader br
(require br/basic/reader)
(provide (all-from-out br/basic/reader)))

@ -0,0 +1,4 @@
#lang br
(module reader br
(require "basic/reader.rkt")
(provide (all-from-out "basic/reader.rkt")))

@ -1,7 +1,7 @@
#lang br
(require br/reader-utils br/basic/parser br/basic/tokenizer)
(require br/reader-utils "parser.rkt" "tokenizer.rkt")
(define-read-and-read-syntax (source-path input-port)
(strip-context
#`(module bf-mod br/basic/expander
#`(module bf-mod br/example/basic/expander
#,(parse source-path (tokenize input-port)))))

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

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

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