Transfer: Added Double type.

This commit is contained in:
bringert
2005-12-01 16:55:57 +00:00
parent f66e6e301c
commit df1e92e837
20 changed files with 1134 additions and 1002 deletions

View File

@@ -60,7 +60,8 @@ transTree t = case t of
EVar i -> failure t
EType -> failure t
EStr str -> failure t
EInt n -> failure t
EInteger n -> failure t
EDouble d -> failure t
EMeta -> failure t
LetDef i exp0 exp1 -> failure t
Case pattern exp -> failure t
@@ -141,7 +142,8 @@ transExp t = case t of
EVar i -> failure t
EType -> failure t
EStr str -> failure t
EInt n -> failure t
EInteger n -> failure t
EDouble d -> failure t
EMeta -> failure t
transLetDef :: LetDef -> Result