Provided address for address range (i/o longint)

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

source/Debugging.Mod

@@ -5,7 +5,7 @@ IMPORT SYSTEM, Streams, KernelLog, Files, StringPool,  Modules, Objects, Reflect
 VAR
 	DefaultLog, Log-: Streams.Writer;  f: Files.File;  lock: Locks.RWLock;
 
-	PROCEDURE Memory*( from, tov: LONGINT );
+	PROCEDURE Memory*( from, tov: ADDRESS );
 	VAR i, val: LONGINT;
 	BEGIN
 		Log.String( ">>>>>" );  Log.Ln;