Added support for IRP, IRPC and IFN MACRO-10 pseudo-ops

apps/pdp10/diags/klad/dakaa/README.md

@@ -7,7 +7,7 @@ machines:
     type: pdp10
     config: /devices/pdp10/machine/ka10/test/debugger/machine.xml
     debugger: true
-    commands: a 30724 /apps/pdp10/diags/klad/dakaa/TEST.MAC
+    commands: a 30724 /apps/pdp10/diags/klad/dakaa/MYDAKAA.MAC
 ---
 
 PDP-10 KA10 Basic Instruction Diagnostic #1
@@ -34,7 +34,7 @@ This command:
 
 	a 30724 /apps/pdp10/diags/klad/dakaa/TEST.MAC
 
-will automatically read the [TEST.MAC](TEST.MAC.txt) source file (a slightly modified copy of [DAKAA.MAC](DAKAA.MAC.txt)),
+will automatically read the [MYDAKAA.MAC](MYDAKAA.MAC.txt) source file (a slightly modified copy of [DAKAA.MAC](DAKAA.MAC.txt)),
 assemble it, and then load the binary output at the specified address.
 
 ---

apps/pdp10/diags/klad/dakad/README.md

@@ -7,7 +7,7 @@ machines:
     type: pdp10
     config: /devices/pdp10/machine/ka10/test/debugger/machine.xml
     debugger: true
-    commands: a 30724 /apps/pdp10/diags/klad/dakad/TEST.MAC
+    commands: a 30724 /apps/pdp10/diags/klad/dakad/MYDAKAD.MAC
 ---
 
 PDP-10 KA10 Basic Instruction Diagnostic #4
@@ -34,7 +34,7 @@ This command:
 
 	a 30724 /apps/pdp10/diags/klad/dakad/TEST.MAC
 
-will automatically read the [TEST.MAC](TEST.MAC.txt) source file (a slightly modified copy of [DAKAD.MAC](DAKAD.MAC.txt)),
+will automatically read the [MYDAKAD.MAC](MYDAKAD.MAC.txt) source file (a slightly modified copy of [DAKAD.MAC](DAKAD.MAC.txt)),
 assemble it, and then load the binary output at the specified address.  Use the command `db 30724` to dump the first few words
 of binary data:
 

apps/pdp10/tests/MACTEST.MAC.txt

@@ -14,11 +14,11 @@
 		EXP ZZ			;;WORD FULL
 		ZZ==0>			;;START AGAIN WITH 0
 	ZZ=ZZ+9+"C">			;;END OF IRPC
-	IFN ZZ,<DEFINE SHIFT		;;REMAINDER LEFT
-	 IFE ZZ&777B8,>			;;IF NOT LEFT JUSTIFIED
-	 ZZ=ZZ+9			;;MOVE LEFT 9 BITS
-	SHIFT>				;;RECURSE
-	>				;;END OF DEFINE
+	IFN ZZ,<DEFINE SHIFT<		;;REMAINDER LEFT
+	 IFE ZZ&777B8,<			;;IF NOT LEFT JUSTIFIED
+	  ZZ=ZZ+9			;;MOVE LEFT 9 BITS
+	  SHIFT>			;;RECURSE
+	 >				;;END OF DEFINE
 	SHIFT				;;START MOVING LEFT
 	EXP ZZ>				;;END OF IFN ZZ
 	>				;END OF CODE MACRO

apps/pdp10/tests/README.md

@@ -5,8 +5,9 @@ permalink: /apps/pdp10/tests/
 machines:
   - id: testka10
     type: pdp10
-    debugger: true
     config: /devices/pdp10/machine/ka10/test/debugger/machine.xml
+    debugger: true
+    commands: a 100 /apps/pdp10/tests/MACTEST.MAC
 ---
 
 DEC PDP-10 Opcode Tests