File: DeclBlocks.ag

package info (click to toggle)
uuagc 0.9.57-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 5,760 kB
  • sloc: haskell: 84,339; makefile: 10
file content (20 lines) | stat: -rw-r--r-- 266 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
imports
{
import Code (Decl,Expr)
}


DATA DeclBlocksRoot
  | DeclBlocksRoot
      blocks : DeclBlocks


DATA DeclBlocks
  | DeclBlock
      defs : {[Decl]}
      visit : {Decl}
      next : DeclBlocks
  | DeclTerminator
      defs : {[Decl]}
      result : {Expr}