Fixed instruction set modifier

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

source/Generic.Unix.AMD64.Machine.Mod

@@ -456,7 +456,7 @@ END SetRDI;
 
 
 PROCEDURE -GetTimer* (): HUGEINT;
-CODE {SYSTEM.Pentium}
+CODE {SYSTEM.AMD64}
 	XOR RAX, RAX
 	RDTSC	; set EDX:EAX
 	SHL RDX, 32
@@ -817,6 +817,7 @@ END GetTimer;
 	PROCEDURE UpdateTicks*;
 	BEGIN
 		ticks := SHORT( (GetTimer() - timer0) DIV (mhz * 1000) );
+TRACE (ticks);
 	END UpdateTicks;