mirror of
https://github.com/wfjm/w11.git
synced 2026-01-21 18:44:41 +00:00
99de9893cb
- C++ and Tcl based backend server: many support classes for interfacing to w11 system designs, and the associated Tcl bindings. - add 'asm-11', a simple, Macro-11 syntax subset combatible, assembler. - use now doxygen 1.8.3.1, generate c++,tcl, and vhdl source docs
48 lines
1.5 KiB
Plaintext
48 lines
1.5 KiB
Plaintext
; $Id: test_0030_alloc.mac 501 2013-03-30 13:53:39Z mueller $
|
|
;
|
|
; test .word/.byte with expressions ect
|
|
;
|
|
.asect
|
|
.blkw 400
|
|
|
|
w0: .word 101 ;;!! 001000: 000101
|
|
w1: .word 102 ;;!! 001002: 000102
|
|
b0: .byte 1 ;;!! 001004: 001
|
|
b1: .byte 2 ;;!! 001005: 002
|
|
|
|
; .word/.byte with expressions
|
|
|
|
.word 100+77 ;;!! 000177
|
|
.byte 2+<4*10> ;;!! 042
|
|
.byte ^c0 ;;!! 377
|
|
|
|
.byte 'H,'e,'l,'l
|
|
.byte 'o,' ,'W,'o
|
|
.byte 'r,'l,'d,'!,0
|
|
.even
|
|
.word "He,"ll,"o
|
|
.word "Wo,"rl,"d!,0
|
|
|
|
.word w1-w0 ;;!! 000002
|
|
.byte <w1-w0>/2 ;;!! 001
|
|
.byte b1-b0 ;;!! 001
|
|
|
|
w2: .word . ;;!! 001052: 001052
|
|
.word w0+2 ;;!! 001002
|
|
.word w1-2 ;;!! 001000
|
|
|
|
; .word/.byte with empty ','
|
|
|
|
.word 1,2 ;;!! 000001 000002
|
|
.word w0,w1 ;;!! 001000 001002
|
|
.word w0, ;;!! 001000 000000
|
|
.word w0,, ;;!! 001000 000000 000000
|
|
.word ,w0 ;;!! 000000 001000
|
|
.word ,,w0 ;;!! 000000 000000 001000
|
|
.word ,w0, ;;!! 000000 001000 000000
|
|
.word , ;;!! 000000 000000
|
|
.word ,, ;;!! 000000 000000 000000
|
|
.word w0,,w1 ;;!! 001000 000000 001002
|
|
|
|
.end
|