+#ifdef ILX
+-----------------------------------------------------------------------------
+-- Ilx2Il phase
+-- Run ilx2il over the ILX output, getting an IL file
+
+run_phase Ilx2Il _basename _suff input_fn output_fn
+ = do ilx2il_opts <- getOpts opt_I
+ SysTools.runIlx2il (ilx2il_opts
+ ++ [ "--no-add-suffix-to-assembly", "mscorlib",
+ "-o", output_fn, input_fn ])
+ return (Just output_fn)
+
+-----------------------------------------------------------------------------
+-- Ilasm phase
+-- Run ilasm over the IL, getting a DLL
+
+run_phase Ilasm _basename _suff input_fn output_fn
+ = do ilasm_opts <- getOpts opt_i
+ SysTools.runIlasm (ilasm_opts
+ ++ [ "/QUIET", "/DLL", "/OUT="++output_fn, input_fn ])
+ return (Just output_fn)
+
+#endif -- ILX
+