Removed obsolete procedure for writing sizes

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

source/Streams.Mod

@@ -222,13 +222,6 @@ TYPE
 			Char( CHR( x MOD 128 ) )
 		END RawNum;
 
-	(** Write a size in a compressed format. *)
-		PROCEDURE RawSize*( x: SIZE );
-		BEGIN
-			WHILE (x < -64) OR (x > 63) DO Char( CHR( x MOD 128 + 128 ) );  x := x DIV 128 END;
-			Char( CHR( x MOD 128 ) )
-		END RawSize;
-
 		(** -- Write formatted data -- *)
 
 	(** Write an ASCII end-of-line (CR/LF). *)