Commit 3202a956 authored by Mart Lubbers's avatar Mart Lubbers

set return code to -1 when failing to compile a single module

parent c6d62f25
Pipeline #32007 passed with stage
in 46 seconds
......@@ -142,7 +142,7 @@ doProjectAction cleanhome pwd pn (Compile module_names) world
# (console, world) = stdio world
iniGeneral = initGeneral False compilerOptions cleanhome project_path project envs console
gst = {ls=iniGeneral,gst_world=world,gst_continue_or_stop=False}
gst = foldl (\gst module_name->CompileProjectModule Compilation module_name project (\_ _ _ gst->gst) gst) gst module_names
gst = foldl (\gst module_name->CompileProjectModule Compilation module_name project (\ok _ _ gst = if ok gst (abortLog True "" gst)) gst) gst module_names
= gst.gst_world
doProjectAction cleanhome pwd pn (ProjectPath pa) world
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment