diff options
Diffstat (limited to 'main.hs')
-rw-r--r-- | main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -22,7 +22,7 @@ main = do [fname] -> readFile fname _ -> usage >> exitFailure - prog <- either (die . show) return (parseProgram source) + prog <- parseProgram source >>= either (die . show) return irprog <- either die return (compileProgram prog) let opt = optimise irprog -- print opt |