Преглед изворни кода

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

git-svn-id: trunk@17988 -

sergei пре 14 година
родитељ
комит
35a2ed9a6c
1 измењених фајлова са 1 додато и 2 уклоњено
  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;