diff --git a/beautiful-racket-demo/jsonic-demo-3/info.rkt b/beautiful-racket-demo/jsonic-demo-3/info.rkt index f8c7240..70c5875 100644 --- a/beautiful-racket-demo/jsonic-demo-3/info.rkt +++ b/beautiful-racket-demo/jsonic-demo-3/info.rkt @@ -1,3 +1,14 @@ #lang info - +(define collection "jsonic") +(define version "1.0") (define scribblings '(("scribblings/jsonic.scrbl"))) +(define test-omit-paths '("jsonic-test.rkt")) +(define deps '("base" + "beautiful-racket-lib" + "brag" + "draw-lib" + "gui-lib" + "parser-tools-lib" + "rackunit-lib" + "syntax-color-lib")) +(define build-deps '("scribble-lib")) \ No newline at end of file diff --git a/beautiful-racket-demo/jsonic-demo-3/jsonic-test.rkt b/beautiful-racket-demo/jsonic-demo-3/jsonic-test.rkt index 6a1039c..f45bee9 100644 --- a/beautiful-racket-demo/jsonic-demo-3/jsonic-test.rkt +++ b/beautiful-racket-demo/jsonic-demo-3/jsonic-test.rkt @@ -1,4 +1,4 @@ -#lang jsonic-demo-2 +#lang jsonic-demo-3 // a line comment [ @$ 'null $@, diff --git a/beautiful-racket-demo/jsonic-demo-3/main.rkt b/beautiful-racket-demo/jsonic-demo-3/main.rkt index b252746..4f0a23e 100644 --- a/beautiful-racket-demo/jsonic-demo-3/main.rkt +++ b/beautiful-racket-demo/jsonic-demo-3/main.rkt @@ -6,11 +6,11 @@ (define (handle-query key default) (case key [(color-lexer) - (dynamic-require 'jsonic-demo-2/colorer 'color-jsonic)] + (dynamic-require 'jsonic-demo-3/colorer 'color-jsonic)] [(drracket:indentation) - (dynamic-require 'jsonic-demo-2/indenter 'indent-jsonic)] + (dynamic-require 'jsonic-demo-3/indenter 'indent-jsonic)] [(drracket:toolbar-buttons) - (dynamic-require 'jsonic-demo-2/buttons 'button-list)] + (dynamic-require 'jsonic-demo-3/buttons 'button-list)] [else default])) handle-query)) diff --git a/beautiful-racket-demo/jsonic-demo-3/reader.rkt b/beautiful-racket-demo/jsonic-demo-3/reader.rkt index 82b8b1e..16c592d 100644 --- a/beautiful-racket-demo/jsonic-demo-3/reader.rkt +++ b/beautiful-racket-demo/jsonic-demo-3/reader.rkt @@ -3,7 +3,7 @@ (define (read-syntax path port) (define parse-tree (parse path (tokenize port))) - (define module-datum `(module jsonic-module jsonic-demo-2/expander + (define module-datum `(module jsonic-module jsonic-demo-3/expander ,parse-tree)) (datum->syntax #f module-datum)) (provide (contract-out