Browse Source

* changed the result of function Pos() to SizeInt (same type as the 'index'
variable it returns). Fixes the register allocation failure error when
compiling on i8086.

git-svn-id: trunk@39033 -

nickysn 7 years ago
parent
commit
8364b1f4ca
1 changed files with 1 additions and 1 deletions
  1. 1 1
      rtl/inc/lnfodwrf.pp

+ 1 - 1
rtl/inc/lnfodwrf.pp

@@ -316,7 +316,7 @@ begin
 end;
 end;
 
 
 
 
-function Pos() : Int64;
+function Pos() : SizeInt;
 begin
 begin
   Pos := index;
   Pos := index;
 end;
 end;