فهرست منبع

Fixed issue -- var parameter

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7616 8c9fc860-2736-0410-a75d-ab315db34111
eth.metacore 7 سال پیش
والد
کامیت
63c4b2068a
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      source/Files64.Mod

+ 1 - 1
source/Files64.Mod

@@ -374,7 +374,7 @@ TYPE
 
 
 		(** Get one entry from the enumerator. *)
 		(** Get one entry from the enumerator. *)
 
 
-		PROCEDURE GetEntry*(VAR name: ARRAY OF CHAR; VAR flags: SET; VAR time, date: LONGINT; size: HUGEINT): BOOLEAN;
+		PROCEDURE GetEntry*(VAR name: ARRAY OF CHAR; VAR flags: SET; VAR time, date: LONGINT; VAR size: HUGEINT): BOOLEAN;
 		VAR len, temp: LONGINT;
 		VAR len, temp: LONGINT;
 		BEGIN
 		BEGIN
 			ReadNum(r, len);
 			ReadNum(r, len);