Parcourir la source

* fixed compilation of unit crt on linux

git-svn-id: trunk@25507 -
nickysn il y a 12 ans
Parent
commit
129fddf800
1 fichiers modifiés avec 0 ajouts et 1 suppressions
  1. 0 1
      rtl/unix/crt.pp

+ 0 - 1
rtl/unix/crt.pp

@@ -1325,7 +1325,6 @@ Begin
         end;
       until (c in [#10,#13]) or (i >= F.BufSize);
       F.BufEnd := i;
-      CrtRead := 0;
       exit;
     end;
   F.BufEnd:=fpRead(F.Handle, F.BufPtr^, F.BufSize);