uuagc-0.9.54: src-generated/DeclBlocks.hs

-- UUAGC 0.9.53 (src-ag/DeclBlocks.ag)
module DeclBlocks where
{-# LINE 2 "src-ag/DeclBlocks.ag" #-}

import Code (Decl,Expr)
{-# LINE 9 "src-generated/DeclBlocks.hs" #-}
-- DeclBlocks --------------------------------------------------
{-
   alternatives:
      alternative DeclBlock:
         child defs           : {[Decl]}
         child visit          : {Decl}
         child next           : DeclBlocks 
      alternative DeclTerminator:
         child defs           : {[Decl]}
         child result         : {Expr}
-}
data DeclBlocks = DeclBlock (([Decl])) (Decl) (DeclBlocks)
                | DeclTerminator (([Decl])) (Expr)
-- DeclBlocksRoot ----------------------------------------------
{-
   alternatives:
      alternative DeclBlocksRoot:
         child blocks         : DeclBlocks 
-}
data DeclBlocksRoot = DeclBlocksRoot (DeclBlocks)