You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
11 lines
403 B
Racket
11 lines
403 B
Racket
#lang debug racket/base
|
|
(require "core.rkt")
|
|
(provide (all-from-out "core.rkt"))
|
|
|
|
(module reader racket/base
|
|
(require "lang-helper.rkt")
|
|
(provide (rename-out [rs read-syntax]) get-info)
|
|
(define rs (make-read-syntax 'quadwriter/lang
|
|
(λ (path ip)
|
|
(for/list ([tok (in-port read ip)])
|
|
tok))))) |