diff --git a/beautiful-racket-demo/basic-demo/basic-test.rkt b/beautiful-racket-demo/basic-demo/basic-test.rkt deleted file mode 100644 index 05a825e..0000000 --- a/beautiful-racket-demo/basic-demo/basic-test.rkt +++ /dev/null @@ -1,7 +0,0 @@ -#lang basic-demo -10 rem what? -20 print "hello" -30 rem goto 50 -45 print "shite" -50 print "foobar" -60 goto 45 diff --git a/beautiful-racket-demo/basic-demo/foo.rkt b/beautiful-racket-demo/basic-demo/foo.rkt deleted file mode 100644 index c620e9c..0000000 --- a/beautiful-racket-demo/basic-demo/foo.rkt +++ /dev/null @@ -1,8 +0,0 @@ -#lang br -(provide (rename-out [my-app #%app])) -(define-macro (my-app ID . ARGS) - (report caller-stx) - (if (number? (syntax->datum #'ID)) - (with-pattern ([NEW-ID (report* #'ID (prefix-id "@" #'ID))]) - #'(NEW-ID . ARGS)) - #'(ID . ARGS))) diff --git a/beautiful-racket-demo/basic-demo/importer.rkt b/beautiful-racket-demo/basic-demo/importer.rkt deleted file mode 100644 index 6395cd1..0000000 --- a/beautiful-racket-demo/basic-demo/importer.rkt +++ /dev/null @@ -1,2 +0,0 @@ -#lang br -(require "basic-test.rkt") \ No newline at end of file diff --git a/beautiful-racket-demo/basic-demo/test-parser.rkt b/beautiful-racket-demo/basic-demo/test-parser.rkt index df6a860..e6e19fe 100644 --- a/beautiful-racket-demo/basic-demo/test-parser.rkt +++ b/beautiful-racket-demo/basic-demo/test-parser.rkt @@ -8,4 +8,4 @@ here ) -(parse-tree (apply-tokenizer tokenize str)) \ No newline at end of file +(parse-tree (apply-tokenizer-maker make-tokenizer str)) \ No newline at end of file