Przeglądaj źródła

Should only reuse file handles that are not being finalized

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7028 8c9fc860-2736-0410-a75d-ab315db34111
felixf 8 lat temu
rodzic
commit
7d5632e55c
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      source/Unix.UnixFiles.Mod

+ 2 - 2
source/Unix.UnixFiles.Mod

@@ -180,9 +180,9 @@ TYPE
 		PROCEDURE ByStat(CONST stat: Unix.Status): File;
 		BEGIN{EXCLUSIVE}
 			ssearch.Init(stat); 
-			oldFiles.Enumerate(ssearch.EnumFile); 
+			oldFiles.EnumerateN(ssearch.EnumFile); 
 			IF ssearch.found = NIL THEN
-				newFiles.Enumerate(ssearch.EnumFile)
+				newFiles.EnumerateN(ssearch.EnumFile)
 			END;
 			
 			IF TraceCollection IN Trace THEN