paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-21 02:19:40 +01:00
Code Issues Packages Projects Releases Wiki Activity

* set NOUSEEXCEPT to remove use of setjump/longjump

Browse Source
This commit is contained in:
pierre 2000-04-05 21:18:04 +00:00
parent 9f2bc4dcdb
commit c03c1f8af3
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/compiler.pas
View File

@ -86,6 +86,7 @@ unit compiler;
interface interface
{ Use exception catching so the compiler goes futher after a Stop } { Use exception catching so the compiler goes futher after a Stop }
{$ifndef NOUSEEXCEPT}
{$ifdef i386} {$ifdef i386}
{$define USEEXCEPT} {$define USEEXCEPT}
{$endif} {$endif}
@ -95,6 +96,7 @@ interface
{$undef USEEXCEPT} {$undef USEEXCEPT}
{$endif} {$endif}
{$endif} {$endif}
{$endif ndef NOUSEEXCEPT}
uses uses
{$ifdef fpc} {$ifdef fpc}
@ -339,7 +341,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.47 2000-03-18 15:05:33 jonas Revision 1.48 2000-04-05 21:18:04 pierre
* set NOUSEEXCEPT to remove use of setjump/longjump
Revision 1.47 2000/03/18 15:05:33 jonas
+ added $maxfpuregisters 0 for compile() procedure + added $maxfpuregisters 0 for compile() procedure
Revision 1.46 2000/02/09 13:22:50 peter Revision 1.46 2000/02/09 13:22:50 peter
@ -412,4 +417,4 @@ end.
Revision 1.26 1999/08/02 20:46:57 michael Revision 1.26 1999/08/02 20:46:57 michael
* Alpha aware switch detection * Alpha aware switch detection
} }