finish info.rkt

dev-srcloc
Matthew Butterick 8 years ago
parent 8bb1dc4cc2
commit 5d7242fccb

@ -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"))

@ -1,4 +1,4 @@
#lang jsonic-demo-2
#lang jsonic-demo-3
// a line comment
[
@$ 'null $@,

@ -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))

@ -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

Loading…
Cancel
Save