You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
- #lang racket/base
-
- (require "parser.rkt" "tokenizer.rkt")
- (require syntax/strip-context)
-
- (module+ reader
- (provide read-syntax get-info))
-
- (define (read-syntax path port)
- (define parse-tree (parse path (make-tokenizer port path)))
- (strip-context
- #`(module zybino-mod zybino/expander
- #,parse-tree)))
-
- (define (get-info port src-mod src-line src-col src-pos)
- (define (handle-query key default)
- (case key
- [(colour-lexer)
- (dynamic-require 'zybino/colourer 'zybino-colourer)]
- [else default]))
- handle-query)
|