Bläddra i källkod

- Removed unused variable
- Removed inline directive (formal arguments are unsupported and only cause compiler noise)

git-svn-id: trunk@17988 -

sergei 14 år sedan
förälder
incheckning
35a2ed9a6c
1 ändrade filer med 1 tillägg och 2 borttagningar
  1. 1 2
      rtl/inc/lnfodwrf.pp

+ 1 - 2
rtl/inc/lnfodwrf.pp

@@ -213,7 +213,6 @@ end;
 function ReadNext() : Longint; inline;
 function ReadNext() : Longint; inline;
 var
 var
   bytesread : SizeInt;
   bytesread : SizeInt;
-  b : Byte;
 begin
 begin
   ReadNext := -1;
   ReadNext := -1;
   if EBufPos >= EBufCnt then begin
   if EBufPos >= EBufCnt then begin
@@ -236,7 +235,7 @@ end;
 { Reads the next size bytes into dest. Returns true if successful,
 { Reads the next size bytes into dest. Returns true if successful,
   false otherwise. Note that dest may be partially overwritten after
   false otherwise. Note that dest may be partially overwritten after
   returning false. }
   returning false. }
-function ReadNext(var dest; size : SizeInt) : Boolean; inline;
+function ReadNext(var dest; size : SizeInt) : Boolean;
 var
 var
   bytesread, totalread : SizeInt;
   bytesread, totalread : SizeInt;
   r: Boolean;
   r: Boolean;