X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=gen.dcl;h=8c6f3a3f20dbcaa159c25e9435e95d561ebd32c6;hb=39f7799760a30737f57fb2b8ccdb15074ee9ac45;hp=0ed553cf8a5f3f39e9e9c3037df24aef12585f40;hpb=483bcde4dbb75d1901cffad6cc2c45307b7e90a2;p=cc1516.git

diff --git a/gen.dcl b/gen.dcl
index 0ed553c..8c6f3a3 100644
--- a/gen.dcl
+++ b/gen.dcl
@@ -1,5 +1,6 @@
 definition module gen
 
 import AST
+import Data.Either
 
-gen :: AST -> String
\ No newline at end of file
+gen :: AST -> Either String String