Explorar o código

* fix compilation for non 64 Bit targets

git-svn-id: trunk@45636 -
florian %!s(int64=5) %!d(string=hai) anos
pai
achega
20f6514d97
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      rtl/inc/text.inc

+ 1 - 1
rtl/inc/text.inc

@@ -2216,7 +2216,7 @@ var
   hs   : String;
   code : Longint;
 Begin
-  l:=0;
+  i:=0;
   if not CheckRead(f) then
     Exit;