Você não pode selecionar mais de 25 tópicos
Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.
|
- #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)
|