The created binary is now saved in the output folder.
This commit is contained in:
parent
5062356cef
commit
582747a997
2 changed files with 2 additions and 2 deletions
|
|
@ -16,7 +16,7 @@ optimize :: String -> IO String
|
||||||
optimize = readCreateProcess (shell "opt --O3 -S")
|
optimize = readCreateProcess (shell "opt --O3 -S")
|
||||||
|
|
||||||
compileClang :: String -> IO String
|
compileClang :: String -> IO String
|
||||||
compileClang = readCreateProcess (shell "clang -x ir -o hello_world -")
|
compileClang = readCreateProcess (shell "clang -x ir -o output/hello_world -")
|
||||||
|
|
||||||
compile :: String -> IO String
|
compile :: String -> IO String
|
||||||
compile s = optimize s >>= compileClang
|
compile s = optimize s >>= compileClang
|
||||||
|
|
|
||||||
|
|
@ -72,7 +72,7 @@ main' debug s = do
|
||||||
debugDotViz
|
debugDotViz
|
||||||
|
|
||||||
compile generatedCode
|
compile generatedCode
|
||||||
spawnWait "./hello_world"
|
spawnWait "./output/hello_world"
|
||||||
-- interpred <- fromInterpreterErr $ interpret lifted
|
-- interpred <- fromInterpreterErr $ interpret lifted
|
||||||
-- putStrLn "\n-- interpret"
|
-- putStrLn "\n-- interpret"
|
||||||
-- print interpred
|
-- print interpred
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue