Browse Source

temporary defined TSize because used in Volume

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8433 8c9fc860-2736-0410-a75d-ab315db34111
eth.metacore 6 years ago
parent
commit
b04485c92d
1 changed files with 2 additions and 1 deletions
  1. 2 1
      source/Files.Mod

+ 2 - 1
source/Files.Mod

@@ -57,7 +57,8 @@ CONST
 	NeedsPrefix* = 0; (* if no prefix given, then this file system cannot handle it, to prevent file systems from being in the search path *)
 
 TYPE
-	TSize* = Streams.TSize;
+	Position* = Streams.Position;
+	TSize* = LONGINT;
 
 TYPE
 (** All record fields are read-only for users, and read-write for extenders. *)