paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 21:49:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed wrong error message

Browse Source
This commit is contained in:
Jonas Maebe 2004-09-10 21:00:53 +00:00
parent 1c0fb6a6ea
commit c5c6a10a87
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/utils/fpc.pp
View File

@ -199,12 +199,15 @@ program fpc;
error(ppcbin+' can''t be executed, error message: '+e.message); error(ppcbin+' can''t be executed, error message: '+e.message);
end; end;
if errorvalue<>0 then if errorvalue<>0 then
error(ppcbin+' can''t be executed'); error(ppcbin+' returned an error exitcode (normal if you did not specifiy a source file to be compiled)');
halt(errorvalue); halt(errorvalue);
end. end.
{ {
$Log$ $Log$
Revision 1.16 2004-06-16 20:07:11 florian Revision 1.17 2004-09-10 21:00:53 jonas
* fixed wrong error message
Revision 1.16 2004/06/16 20:07:11 florian
* dwarf branch merged * dwarf branch merged
Revision 1.15 2004/06/06 01:18:47 karoly Revision 1.15 2004/06/06 01:18:47 karoly
@ -246,4 +249,4 @@ program fpc;
Revision 1.4 2002/05/18 13:34:27 peter Revision 1.4 2002/05/18 13:34:27 peter
* readded missing revisions * readded missing revisions
} }