Transfer: Added Double type.

1 files changed, 4 insertions, 2 deletions

diff --git a/src/Transfer/Syntax/Skel.hs b/src/Transfer/Syntax/Skel.hs
index d9e51e9f6..a28e4a46a 100644
--- a/src/Transfer/Syntax/Skel.hs
+++ b/src/Transfer/Syntax/Skel.hs
@@ -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