diff options
Diffstat (limited to 'silc.icl')
-rw-r--r-- | silc.icl | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -24,7 +24,7 @@ import System.Process import ABC.Assembler from Sil.Check import checkProgram -import qualified Sil.Compile as SC +import Sil.Compile import Sil.Error import Sil.Parse from Sil.Syntax import :: Program @@ -108,7 +108,7 @@ Start w | not ok # err = err <<< "Could not open '" <<< abcfile <<< "' for writing\r\n" = finish 1 io err w -#! prog = 'SC'.compile prog +#! prog = compile prog | isError prog # err = err <<< fromError prog = finish 1 io err w @@ -116,7 +116,7 @@ Start w #! (_,w) = fclose f w | not args.generate = finish 0 io err w -#! (p,w) = callProcess "/opt/clean/bin/clm" ["-l", "-no-pie", module, "-o", module] (Just dir) w +#! (p,w) = callProcess "/opt/clean/bin/clm" [module, "-o", module] (Just dir) w | isError p # err = err <<< snd (fromError p) <<< "\r\n" = finish 1 io err w |