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

- removed FPC_OBJFPC_EXTENDED_IF-related code, FPC 2.6.4 has it

Browse Source 
git-svn-id: trunk@31696 -
This commit is contained in:
Jonas Maebe 2015-09-15 11:52:02 +00:00
parent 28bc3bb294
commit c7aabaa3b6
3 changed files with 4 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/options.pas
View File

@ -3248,7 +3248,6 @@ begin
def_system_macro('VER'+version_nr+'_'+release_nr+'_'+patch_nr); def_system_macro('VER'+version_nr+'_'+release_nr+'_'+patch_nr);
{ Temporary defines, until things settle down } { Temporary defines, until things settle down }
def_system_macro('FPC_OBJFPC_EXTENDED_IF');
def_system_macro('FPC_HAS_OPERATOR_ENUMERATOR'); def_system_macro('FPC_HAS_OPERATOR_ENUMERATOR');
def_system_macro('FPC_HAS_CONSTREF'); def_system_macro('FPC_HAS_CONSTREF');
def_system_macro('FPC_STATICRIPFIXED'); def_system_macro('FPC_STATICRIPFIXED');

8
rtl/inc/system.inc
View File

@ -73,13 +73,9 @@ Const
****************************************************************************} ****************************************************************************}
{$ifdef FPC_HAS_FEATURE_EXITCODE} {$ifdef FPC_HAS_FEATURE_EXITCODE}
{$ifdef FPC_OBJFPC_EXTENDED_IF} {$if High(errorcode)<>maxExitCode}
{$if High(errorcode)<>maxExitCode}
{$define FPC_LIMITED_EXITCODE}
{$endif}
{$else}
{$define FPC_LIMITED_EXITCODE} {$define FPC_LIMITED_EXITCODE}
{$endif FPC_OBJFPC_EXTENDED_IF} {$endif}
{$endif FPC_HAS_FEATURE_EXITCODE} {$endif FPC_HAS_FEATURE_EXITCODE}
Procedure HandleError (Errno : Longint); external name 'FPC_HANDLEERROR'; Procedure HandleError (Errno : Longint); external name 'FPC_HANDLEERROR';

8
rtl/java/jsystem.inc
View File

@ -68,13 +68,9 @@ Const
****************************************************************************} ****************************************************************************}
{$ifdef FPC_HAS_FEATURE_EXITCODE} {$ifdef FPC_HAS_FEATURE_EXITCODE}
{$ifdef FPC_OBJFPC_EXTENDED_IF} {$if High(errorcode)<>maxExitCode}
{$if High(errorcode)<>maxExitCode}
{$define FPC_LIMITED_EXITCODE}
{$endif}
{$else}
{$define FPC_LIMITED_EXITCODE} {$define FPC_LIMITED_EXITCODE}
{$endif FPC_OBJFPC_EXTENDED_IF} {$endif}
{$endif FPC_HAS_FEATURE_EXITCODE} {$endif FPC_HAS_FEATURE_EXITCODE}
Procedure HandleError (Errno : Longint); external name 'fpc_handleerror'; Procedure HandleError (Errno : Longint); external name 'fpc_handleerror';