diff --git a/LobsterLang/app/Main.hs b/LobsterLang/app/Main.hs index 4e91b2c..bb0638b 100644 --- a/LobsterLang/app/Main.hs +++ b/LobsterLang/app/Main.hs @@ -72,7 +72,7 @@ compileFile file s = case runParser parseLobster (0, 0) s of checkArgs :: [String] -> IO () checkArgs [] = print "Launch Interpreter" >> inputLoop [] checkArgs ("-e":file:_) = CompiletoVm.makeConvert file - >>= \instructions -> trace ("instructions to execute" ++ show instructions) print (Vm.exec 0 [] [] instructions [] + >>= \instructions -> trace ("instructions to execute" ++ show instructions) print (Vm.exec 0 [] [] instructions []) checkArgs (file:_) = either (\_ -> print "File doesn't exist" >> exitWith (ExitFailure 84)) -- (compileLobster file)