unisonweb/unison
1
0
Fork 0
mirror of https://github.com/unisonweb/unison.git synced 2024-10-04 21:57:25 +03:00
Code Issues Projects Releases Wiki Activity

Give a nicer looking error for ucr/raco problems

Browse Source
This commit is contained in:
Dan Doel 2024-02-06 16:28:24 -05:00
parent 2e98e1a7c2
commit c3c62c4d45
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
parser-typechecker/src/Unison/Runtime/Interface.hs
View File

@ -723,8 +723,19 @@ nativeCompileCodes codes base path = do
waitForProcess ph
pure ()
callout _ _ _ _ = fail "withCreateProcess didn't provide handles"
ucrError (_ :: IOException) =
die
"I had trouble calling the unison runtime exectuable.\n\n\
\Please check that the `ucr` executable is properly\
\ installed."
racoError (_ :: IOException) =
die
"I had trouble calling the `raco` executable.\n\n\
\Please verify that you have racket installed."
withCreateProcess (ucrProc ["-G", srcPath]) callout
`UnliftIO.catch` ucrError
callProcess "raco" ["exe", "-o", path, srcPath]
`UnliftIO.catch` racoError
evalInContext ::
PrettyPrintEnv ->