diff --git a/compiler/catch.pas b/compiler/catch.pas index cd6db8d4c0..a93fa2ee11 100644 --- a/compiler/catch.pas +++ b/compiler/catch.pas @@ -87,11 +87,11 @@ begin Writeln('FPE error computing constant expression') else Writeln('FPE error inside compiler'); - Stop; + Stop(1); end; SIGINT : begin WriteLn('Ctrl-C Signaled!'); - Stop; + Stop(1); end; end; {$ifndef unix} @@ -115,7 +115,10 @@ end. { $Log$ - Revision 1.18 2004-06-20 08:55:28 florian + Revision 1.19 2004-09-09 08:19:47 olle + + Added argument to Stop + + Revision 1.18 2004/06/20 08:55:28 florian * logs truncated }