add temporary type BufferOffset, StreamSize as part of the adaptation a2 for the 64-bit IO

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8437 8c9fc860-2736-0410-a75d-ab315db34111

source/Streams.Mod

@@ -21,9 +21,12 @@ CONST
 CONST
 	CR = 0DX;  LF = 0AX;  TAB = 9X;  SP = 20X;
 
+TYPE
+	BufferOffset*	= LONGINT; (* offset in the stream biffer *)
 
 TYPE
-	Position* = LONGINT;
+	Position* = LONGINT; (* position in the stream *)
+	StreamSize* = LONGINT; (* size of hte stream *)
 
 	(** Any stream output procedure or method. *)
 	Sender* = PROCEDURE {DELEGATE} ( CONST buf: ARRAY OF CHAR;  ofs, len: LONGINT;  propagate: BOOLEAN;  VAR res: WORD );