mirror of https://github.com/berriedale/arun
Avoid early return on non-zero gerror
This commit is contained in:
parent
7facf45d44
commit
e3d854e7aa
|
@ -67,7 +67,9 @@ package body Arun is
|
||||||
return;
|
return;
|
||||||
elsif Return_Code /= 0 then
|
elsif Return_Code /= 0 then
|
||||||
Put_Line ("Error " & Return_Code'Image);
|
Put_Line ("Error " & Return_Code'Image);
|
||||||
return;
|
-- In normal operations this returns a "1" error, not yet sure what that
|
||||||
|
-- relates to.
|
||||||
|
-- return;
|
||||||
end if;
|
end if;
|
||||||
|
|
||||||
Register_Handler (Builder => Builder,
|
Register_Handler (Builder => Builder,
|
||||||
|
|
Loading…
Reference in New Issue