Browse Source

* Don't inline ioresult. It's not speed critical and inlining it causes
code bloat.

git-svn-id: trunk@11596 -

Jonas Maebe 17 years ago
parent
commit
7b467fa2a0
2 changed files with 2 additions and 2 deletions
  1. 1 1
      rtl/inc/system.inc
  2. 1 1
      rtl/inc/systemh.inc

+ 1 - 1
rtl/inc/system.inc

@@ -648,7 +648,7 @@ begin
 end;
 
 
-Function IOResult:Word;{$ifdef SYSTEMINLINE}inline;{$endif}
+Function IOResult:Word;
 var
   HInoutRes : PWord;
 Begin

+ 1 - 1
rtl/inc/systemh.inc

@@ -880,7 +880,7 @@ function get_frame:pointer;{$ifdef SYSTEMINLINE}inline;{$endif}
 function get_caller_addr(framebp:pointer):pointer;
 function get_caller_frame(framebp:pointer):pointer;
 
-Function IOResult:Word;{$ifdef SYSTEMINLINE}inline;{$endif}
+Function IOResult:Word;
 Function Sptr:Pointer;[internconst:fpc_in_const_ptr];
 
 {$ifdef FPC_HAS_FEATURE_PROCESSES}