Fixed transfer composOp generation to support tree types that don't take a single type argument.

This commit is contained in:
bringert
2005-11-28 22:31:09 +00:00
parent 5d7bcac1e5
commit cb6f3088b5
2 changed files with 32 additions and 10 deletions

View File

@@ -5,7 +5,7 @@ data Cat : Type where
Typ : Cat
ListStm : Cat
data Tree : Type -> Type where
data Tree : Cat -> Type where
SDecl : Tree Typ -> Tree Var -> Tree Stm
SAss : Tree Var -> Tree Exp -> Tree Stm
SBlock : Tree ListStm -> Tree Stm