Fixed SkipBytes

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

source/Streams64.Mod

@@ -647,7 +647,7 @@ TYPE
 		END Bytes;
 
 	(** Skip n bytes on the reader. *)
-		PROCEDURE SkipBytes*( n: LONGINT );
+		PROCEDURE SkipBytes*( n: HUGEINT );
 		VAR ch: CHAR;
 		BEGIN
 			WHILE n > 0 DO ch := Get();  DEC( n ) END