oberon0-0.0.1: src/Language/Oberon0/L4/T3.hs

{-# OPTIONS -fcontext-stack=1000 #-}

import Language.Oberon0.MainT2
import Language.Oberon0.L4.Gram
import Language.Oberon0.L4.SemT3


import Language.Grammars.Murder
import Language.Grammars.AspectAG


c_l4t3 = closeGram (l1 l1t3 +>> l2 l2t3 +>> l3 l3t3 +>> l4 l4t3)

main = mainT2 (# spp) (# serr) (ienv .=. ienvIni () .*. emptyRecord) "l4t3" l4Kws c_l4t3