bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE

lang.rkt (474B)

      1 #lang racket/base
      2 
      3 (require "main.rkt" (except-in scribble/text/lang #%top)
      4          scribble/text/syntax-utils)
      5 
      6 (provide (except-out (all-from-out scribble/text/lang) #%module-begin)
      7          (rename-out [module-begin #%module-begin])
      8          (all-from-out "main.rkt"))
      9 
     10 (require (for-syntax racket/base))
     11 (define-syntax-rule (module-begin expr ...)
     12   (#%plain-module-begin
     13    (port-count-lines! (current-output-port))
     14    (process-begin/text begin output-xml expr ...)))