#lang racket/base
(require "parser.rkt" "tokenizer.rkt")
(require syntax/strip-context)

(define (read-syntax path port)
  (define parse-tree (parse-tkns (make-tokenizer port path)))
  (strip-context
   #`(module uahgi-ng-mod uahgi-ng/expander
       #,parse-tree)))

(module+ reader
  (provide read-syntax))