move to example subdir
This commit is contained in:
parent
2433a1a975
commit
ef882b8dff
|
@ -1,4 +0,0 @@
|
|||
#lang br
|
||||
(module reader br
|
||||
(require br/basic/reader)
|
||||
(provide (all-from-out br/basic/reader)))
|
4
beautiful-racket/br/example/basic.rkt
Normal file
4
beautiful-racket/br/example/basic.rkt
Normal file
|
@ -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…
Reference in New Issue
Block a user