@@ -5,7 +5,7 @@ import IRTS.Simplified
5import IRTS.Defunctionalise
5import IRTS.Defunctionalise
7data DbgLevel = NONE | DEBUG | TRACE deriving Eq
7data DbgLevel = NONE | DEBUG | TRACE deriving Eq
8−data OutputType = Raw | Object | Executable | MavenProject deriving (Eq, Show)
8+data OutputType = Raw | Object | Executable deriving (Eq, Show)
10-- Everything which might be needed in a code generator - a CG can choose which
10-- Everything which might be needed in a code generator - a CG can choose which
11-- level of Decls to generate code from (simplified, defunctionalised or merely
11-- level of Decls to generate code from (simplified, defunctionalised or merely
@@ -26,6 +26,6 @@ data CodegenInfo = CodegenInfo { outputFile :: String,
26 liftDecls :: [(Name, LDecl)],
26 liftDecls :: [(Name, LDecl)],
27 interfaces :: Bool,
27 interfaces :: Bool,
28 exportDecls :: [ExportIFace]
28 exportDecls :: [ExportIFace]
31type CodeGenerator = CodegenInfo -> IO ()
31type CodeGenerator = CodegenInfo -> IO ()