Fixed outdated interface issues

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

source/Coop.Heaps.Mod

@@ -129,11 +129,17 @@ VAR
 	(** Statistics considering the last GC cyle *)
 	Nmark-, Nmarked-, NfinalizeAlive-, NfinalizeDead-: LONGINT;
 	NgcCyclesMark-, NgcCyclesLastRun-, NgcCyclesMax-, NgcCyclesAllRuns- : HUGEINT;
+	NgcSweeps-, NgcSweepTime-, NgcSweepMax-: HUGEINT;
 
 	freeBlockFound-, freeBlockNotFound-: LONGINT;
 
 	allocationLogger-: PROCEDURE(p: ANY);
 
+PROCEDURE Assign*(VAR dest: ADDRESS; src: ADDRESS);
+BEGIN
+	dest := src;
+END Assign;
+
 (* for low level debugging of allocation -- beware: errors or traps in allocation logger can produce catastrophy - loggers may not allocate memory  *)
 PROCEDURE SetAllocationLogger*(a: PROCEDURE (p:ANY));
 BEGIN

source/Unix.BootConsole.Mod

@@ -201,7 +201,9 @@ BEGIN
 	InitializeCoreModules;
 	InitSignalHandling;
 	StartSystem;
-	Objects.GCLoop
+	#IF ~COOP THEN
+		Objects.GCLoop;
+	#END
 END BootConsole.