Kaynağa Gözat

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 yıl önce
ebeveyn
işleme
63c4b2068a
1 değiştirilmiş dosya ile 1 ekleme ve 1 silme
  1. 1 1
      source/Files64.Mod

+ 1 - 1
source/Files64.Mod

@@ -374,7 +374,7 @@ TYPE
 
 		(** 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;
 		BEGIN
 			ReadNum(r, len);