1
1
mirror of https://github.com/anoma/juvix.git synced 2024-12-13 19:49:20 +03:00

Fix a bug with the path to walloc.c (#237)

This commit is contained in:
Łukasz Czajka 2022-07-04 17:53:06 +02:00 committed by GitHub
parent 82d1f3ecf7
commit f1921bbf91
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -138,7 +138,7 @@ clangCompile projRoot compileInputFile o = do
where
clangArgs :: [String]
clangArgs = case o ^. compileRuntime of
RuntimeStandalone -> standaloneArgs sysrootPath outputFile inputFile
RuntimeStandalone -> standaloneArgs projRoot sysrootPath outputFile inputFile
RuntimeLibC -> libcArgs sysrootPath outputFile inputFile
outputFile :: FilePath
@ -147,10 +147,10 @@ clangCompile projRoot compileInputFile o = do
inputFile :: FilePath
inputFile = inputCFile projRoot compileInputFile
standaloneArgs :: FilePath -> FilePath -> FilePath -> [String]
standaloneArgs sysrootPath wasmOutputFile inputFile =
standaloneArgs :: FilePath -> FilePath -> FilePath -> FilePath -> [String]
standaloneArgs projRoot sysrootPath wasmOutputFile inputFile =
commonArgs sysrootPath wasmOutputFile
<> [minijuvixBuildDir </> "walloc.c", inputFile]
<> [projRoot </> minijuvixBuildDir </> "walloc.c", inputFile]
libcArgs :: FilePath -> FilePath -> FilePath -> [String]
libcArgs sysrootPath wasmOutputFile inputFile =