@@ -11,6 +11,7 @@ import qualified Core.TT as TT
11import IRTS.Simplified
11import IRTS.Simplified
12import IRTS.CodegenCommon
12import IRTS.CodegenCommon
14+import Data.Word (Word)
15getDefaultTargetTriple :: IO String
16getDefaultTargetTriple :: IO String
16getDefaultTargetTriple = return ""
17getDefaultTargetTriple = return ""
@@ -22,7 +23,7 @@ getHostCPUName = return ""
22codegenLLVM :: [(TT.Name, SDecl)] ->
23codegenLLVM :: [(TT.Name, SDecl)] ->
23 String -> -- target triple
24 String -> -- target triple
24 String -> -- target CPU
25 String -> -- target CPU
25− Int -> -- Optimization degree
26+ Word -> -- Optimization degree
26 FilePath -> -- output file name
27 FilePath -> -- output file name
27 OutputType ->
28 OutputType ->