1
0
mirror of https://github.com/PDP-10/its.git synced 2026-02-27 09:18:58 +00:00

Add PUSHJ and POPJ to one-proceed test.

This commit is contained in:
Lars Brinkhoff
2022-12-07 08:26:39 +01:00
parent aa21a0fd20
commit 4b8dfa2df7

View File

@@ -56,6 +56,9 @@ UPC: START+1
START: ;INFERIOR CODE
JFCL
JRST 2,@[.+1]
MOVE A,[-1,,PDL]
POPJ A,
NEXT: PUSHJ A,.+1
MOVE B,[440700,,STRING]
ILDB A,B
DPB A,B
@@ -63,6 +66,7 @@ START: ;INFERIOR CODE
IDPB A,B
STOP:
STRING: ASCIZ /FOOBAR/
PDL: NEXT
CONSTANTS
LEN=.-START