mirror of
https://github.com/wfjm/w11.git
synced 2026-04-26 04:08:17 +00:00
- tools/bin
- asm-11
- tools/tcode/cpu_(details|mmu).mac: use rt?jmp, hta??? macros
- BUGFIX expressions: allow uop after bop operator
- BUGFIX proper sign handling for '/','*' and .if ge,gt,le,lt
- add 'S' error when code size too large
- tcode/cpu_mmu.mac: remove <../100> expressions for 6 bit right shift
44 lines
1.3 KiB
Plaintext
44 lines
1.3 KiB
Plaintext
; $Id: zbug_0006.mac 1360 2023-01-29 11:51:48Z mueller $
|
|
; SPDX-License-Identifier: GPL-3.0-or-later
|
|
; Copyright 2023- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
|
;
|
|
; for asm-11 prior rev 1360
|
|
;
|
|
; ISSUE: faulty handling of unnary +/- in expresions
|
|
;
|
|
; REASON: error in parser (didnt allow uop after bop) and
|
|
; error in sign sign handling for '*" and '/' operator
|
|
;
|
|
.asect
|
|
. = 1000
|
|
;
|
|
.word 100. ;;!! 000144
|
|
.word -100. ;;!! 177634
|
|
;
|
|
.word 100.*5. ;;!! 000764
|
|
.word 100.*-5. ;;!! 177014
|
|
.word -100.*5. ;;!! 177014
|
|
.word -100.*-5. ;;!! 000764
|
|
;
|
|
.word 100./5. ;;!! 000024
|
|
.word 100./-5. ;;!! 177754
|
|
.word -100./5. ;;!! 177754
|
|
.word -100./-5. ;;!! 000024
|
|
;
|
|
a = 100.
|
|
b = 5.
|
|
.word a/b ;;!! 000024
|
|
.word a/-b ;;!! 177754
|
|
.word -a/b ;;!! 177754
|
|
.word -a/-b ;;!! 000024
|
|
.word -a/--b ;;!! 177754
|
|
;
|
|
ma = -100.
|
|
mb = -5.
|
|
.word a/b ;;!! 000024
|
|
.word a/mb ;;!! 177754
|
|
.word ma/b ;;!! 177754
|
|
.word ma/mb ;;!! 000024
|
|
;
|
|
.end
|