diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2012-09-14 10:19:55 +1000 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2012-09-14 10:19:55 +1000 |
| commit | c7d3f7662fb9c7bb86ab1270e9f74de6d08876fa (patch) | |
| tree | 8b4e8c7c26d36cc8ac3709daec3faed231ced5dd /GeneratorTest.hs | |
| parent | bd9772daf2fe36de53fdc358ba3bb52bc416d562 (diff) | |
Misc test files
Diffstat (limited to 'GeneratorTest.hs')
| -rw-r--r-- | GeneratorTest.hs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/GeneratorTest.hs b/GeneratorTest.hs new file mode 100644 index 0000000..419e904 --- /dev/null +++ b/GeneratorTest.hs @@ -0,0 +1,10 @@ +import Library.Parse +import Library.Generator +import Library.Term +import Library.TypeVar + + +main = do + let s = substitutionGen ([],[]) + let t = substitutionGen ( [(Name [] "tyvar", AType [] (TypeOp (Name [] "atype")))], [] ) + output t |