1
0
mirror of https://github.com/wfjm/w11.git synced 2026-04-26 04:08:17 +00:00
Files
wfjm.w11/tools/asm-11/tests/test_0120_op_rg.mac
wfjm 3b033ebfa8 major asm-11 update
- tools/bin
  - asm-11
    - add .if, .if(f|t|tf), .endc, .rept, .endr, .mexit directives
    - add .error, .print, .mcall, .mdelete directives
    - add .narg, .nchr, .ntype directives
    - rewrite macro definition and call argument parsing & handling
    - add -L option (to set .mcall pathlist)
    - add auto-generated ...top label
    - add flag (MRmrd) column in output format
  - asm-11_expect
    - add simple substitution mechanism (for macro testing)
    - handle new flag column in output format
- tools/asm-11
  - tests(-err): many tests added
  - tests(-err)/Makefile: distclean target added
  - mlib: macro library, accessed by .mcall
2023-01-26 16:13:36 +01:00

42 lines
1.4 KiB
Plaintext

; $Id: test_0120_op_rg.mac 1353 2023-01-23 18:13:53Z mueller $
; SPDX-License-Identifier: GPL-3.0-or-later
; Copyright 2014-2023 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
;
; test opcodes with 1 1/2 operands
;
.asect
. = 1000
a: .word 0
pa: .word a
sub: rts pc ;;!! 001004: 000207
jsr pc,sub ;;!! 001006: 004767 177772
; all modes with one opcode
xor r1,r2 ;;!! 074102
xor r1,@r2 ;;!! 074112
xor r1,(r3) ;;!! 074113
xor r1,(r4)+ ;;!! 074124
xor r1,@(r5)+ ;;!! 074135
xor r1,-(r4) ;;!! 074144
xor r1,@-(r4) ;;!! 074154
xor r1,1234(r3) ;;!! 074163 001234
xor r1,@1234(r3) ;;!! 074173 001234
xor r1,@(r3) ;;!! 074173 000000
xor r1,a ;;!! 074167 177730
xor r1,@pa ;;!! 074177 177726
xor r1,@#a ;;!! 074137 001000
; all 'rg' type opcodes, random modes
mul a,r2 ;;!! 070267 177714
div @pa,r2 ;;!! 071277 177712
ash #12,r3 ;;!! 072327 000012
ashc @#a,r4 ;;!! 073437 001000
; test call + return aliases too
sub1: return ;;!! 000207
call sub1 ;;!! 004767 177772
.end