Changeset 27 for sizechecking/branches/macs/Tests/ExpTest.hs
- Timestamp:
- May 5, 2014, 3:10:33 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sizechecking/branches/macs/Tests/ExpTest.hs
r24 r27 30 30 testD2Cons = cons (cons (lit 1) nil) nil 31 31 32 checkAST :: S a -> String -> IO Bool32 checkAST :: S SData a -> String -> IO Bool 33 33 checkAST exp repr = ast exp >>= (\t -> return $ t "" == repr ) 34 34
Note: See TracChangeset
for help on using the changeset viewer.