Fixed traced unsafe pointer

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

source/BIOS.ACPI.Mod

@@ -79,7 +79,7 @@ END GetTable;
 
 PROCEDURE Initialize-;
 TYPE BiosEBDA = POINTER {UNSAFE} TO RECORD val: INTEGER END; 
-VAR address := 0E0000H: ADDRESS; size := 020000H: SIZE; biosEBDA: BiosEBDA;
+VAR address := 0E0000H: ADDRESS; size := 020000H: SIZE; biosEBDA {UNTRACED}: BiosEBDA;
 
 BEGIN {UNCOOPERATIVE, UNCHECKED}
 	WHILE size # 0 DO