Browse Source

Added programmed halt

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7734 8c9fc860-2736-0410-a75d-ab315db34111
eth.negelef 7 years ago
parent
commit
b5b064eaba
1 changed files with 4 additions and 0 deletions
  1. 4 0
      source/Debugging.Mod

+ 4 - 0
source/Debugging.Mod

@@ -188,6 +188,10 @@ VAR
 	BEGIN
 	END Nothing;
 
+	PROCEDURE Halt*;
+	BEGIN HALT (1234);
+	END Halt;
+
 	PROCEDURE DisableGC*;
 	BEGIN
 		Heaps.GC := Nothing;