fix (macro.mac): STREND and STRLEN

kg68k · Nov 5, 2024 · 2a426fb · 2a426fb
1 parent 35785c4
commit 2a426fb
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 3 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -1,5 +1,11 @@
 # 変更履歴
 
+## 4.0.2 (2024-11-05)
+
+* macro.mac: `STREND`、`STRLEN`マクロの`offset`引数に負数を指定するとアセンブルエラー
+  になる不具合を修正。
+
+
 ## 4.0.1 (2024-10-12)
 
 * macro.mac: マクロの引数に式を指定すると正しく展開されない不具合を修正。

diff --git a/src/macro.mac b/src/macro.mac
@@ -1,7 +1,7 @@
 .nlist
 
 ;macro.mac - RUKA assembler macro for X680x0/Human68k(v3) by TcbnErik
-;Last-modified: 2024-10-12
+;Last-modified: 2024-11-05
 ;
 ;Copying and distribution of this file, with or without modification,
 ;are permitted in any medium without royalty provided the copyright
@@ -76,9 +76,9 @@ STREND: .macro areg,offset
   bne @loop
   .if argc<=1
     subq.l #1,areg
-  .elif (offset)<=0
+  .elif (offset).sle.0
     subq.l #1-(offset),areg
-  .elif (offset)>=2
+  .elif (offset).sge.2
     addq.l #(offset)-1,areg
   .endif
 .endm