-#ifdef JAVA
-outputJava dflags filenm mod tycons core_binds
- = doOutput filenm (\ f -> printForUser f alwaysQualify pp_java)
- -- User style printing for now to keep indentation
- where
- occ_anal_binds = occurAnalyseBinds core_binds
- -- Make sure we have up to date dead-var information
- java_code = javaGen mod [{- Should be imports-}] tycons occ_anal_binds
- pp_java = PrintJava.compilationUnit java_code
-#endif
+outputLlvm :: DynFlags -> FilePath -> [RawCmm] -> IO ()
+outputLlvm dflags filenm flat_absC
+ = do ncg_uniqs <- mkSplitUniqSupply 'n'
+ doOutput filenm $ \f -> llvmCodeGen dflags f ncg_uniqs flat_absC