From dee222303ac8f7cf02482c6ecb9cf03ae082bc86 Mon Sep 17 00:00:00 2001 From: Jeff Date: Mon, 27 Mar 2017 11:47:42 -0700 Subject: [PATCH] Fixed a couple of PDP-10 opcode emulation bugs (AOBJN, AOBJP, and CMP), and rounded out the set of DEC's basic instruction diagnostics --- apps/pdp10/diags/klad/dakac/DAKAC.MAC.txt | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/apps/pdp10/diags/klad/dakac/DAKAC.MAC.txt b/apps/pdp10/diags/klad/dakac/DAKAC.MAC.txt index 15be2e06f..6e4503259 100644 --- a/apps/pdp10/diags/klad/dakac/DAKAC.MAC.txt +++ b/apps/pdp10/diags/klad/dakac/DAKAC.MAC.txt @@ -1,3 +1,15 @@ +;MACROS + +; STOP - USED FOR SCOPE LOOP, IF INSTRUCTION FAILS, CHANGE (JUMPA .+1) +; TO A (JUMPA X) TO CYCLE ON FAILING INSTRUCTION + +DEFINE STOP (A)< + HALT .+1 ;TEST FAILED IF PROGRAM HALTS HERE + JUMPA .+1 ;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) + ;TO JUMPA X(X IS THE ADDRESS OF THE FIRST + ;INSTRUCTION IN THE SUBTEST) TO LOOP ON ERROR + ;AND CHANGE HALT INSTRUCTION TO JUMPA .+1> + SUBTTL DIAGNOSTIC SECTION LALL