1 module Parsing.EBNF.Print where
3 import Data.Text.IO as Text
6 import Language.Symantic.Typing
7 import Language.Symantic.Parsing
8 import Language.Symantic.Compiling (gram_term)
12 forM_ gram_lexer render
13 forM_ gram_type render
14 forM_ gram_term render
15 where render = Text.putStrLn . renderEBNF . unCF