@@ -70,7 +70,7 @@ codegenLLVM' :: [(TT.Name, SDecl)] ->
70 FilePath -> -- output file name
70 FilePath -> -- output file name
71 OutputType ->
71 OutputType ->
73−codegenLLVM defs triple cpu optimize file outty = withContext $ \context -> do
73+codegenLLVM' defs triple cpu optimize file outty = withContext $ \context -> do
74 initializeAllTargets
74 initializeAllTargets
75 (target, _) <- failInIO $ lookupTarget Nothing triple
75 (target, _) <- failInIO $ lookupTarget Nothing triple
76 withTargetOptions $ \options ->
76 withTargetOptions $ \options ->