From d1677a982f8edead66ab4329e4f44eb5ce23bac1 Mon Sep 17 00:00:00 2001
From: j8takagi <j8takagi@nifty.com>
Date: Thu, 9 Jul 2026 15:06:30 +0900
Subject: [PATCH] =?utf8?q?doxygen=E3=82=B3=E3=83=A1=E3=83=B3=E3=83=88?=
 =?utf8?q?=E4=BF=AE=E6=AD=A3?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 src/assemble.c | 71 +++++++++++++++++++++++++++++++-------------------
 1 file changed, 44 insertions(+), 27 deletions(-)

diff --git a/src/assemble.c b/src/assemble.c
index 1af7540..014d40a 100644
--- a/src/assemble.c
+++ b/src/assemble.c
@@ -31,10 +31,8 @@ WORD getadr(const char *prog, const char *str, PASS pass);
 
 /**
  * @brief 汎用レジスタを表す文字列からレジスタ番号を返す
- *
  * @brief 文字列が汎用レジスタを表さない場合は、0xFFFFを返す
- *
- * is_xがtrueの場合は指標レジスタとなり、GR0が指定された場合はCOMET IIの仕様によりエラー発生
+ * @brief is_xがtrueの場合は指標レジスタとなり、GR0が指定された場合はCOMET IIの仕様によりエラー発生
  *
  * @return レジスタ番号[0-7]を表すWORD値
  *
@@ -53,6 +51,16 @@ WORD grword(const char *str, bool is_x);
  */
 WORD getliteral(const char *str, PASS pass);
 
+/**
+ * @brief 'ではじまる文字列からWORD値を返す
+ * @brief 'が閉じていない場合や、2文字以上の場合はエラーを発生させ、0を返す
+ *
+ * @return WORD値
+ *
+ * @param *str 'ではじまる文字列
+ */
+WORD getliteralquote(const char *str);
+
 /**
  * @brief アドレス値をメモリに書き込む
  *
@@ -311,7 +319,7 @@ WORD getadr(const char *prog, const char *str, PASS pass)
                 adr = getlabel("", str);
             }
             if(adr == 0xFFFF) {
-                setcerr(103, str);    /* label not found */                setcerr(103, str);    /* label not found */
+                setcerr(103, str);    /* label not found */
             }
         }
     }
@@ -346,39 +354,48 @@ WORD getliteral(const char *str, PASS pass)
     WORD adr = 0;
 
     if(str[0] == '\'') {
-        if(str[1] == '\'' && str[2] != '\'') {
-            setcerr(126, str);    /* syntax error in literal */
-            return 0;
-        } else if((str[1] == '\'' && str[2] == '\'' && str[3] == '\0') || str[2] == '\0' ) {
-            setcerr(123, str);    /* unclosed quote */
-            return 0;
-        } else if((str[1] == '\'' && str[2] == '\'' && str[3] != '\'') || str[2] != '\'') {
-            setcerr(124, str);    /* more than one character in literal */
-            return 0;
-        }
-        val = (WORD)str[1];
+        val = getliteralquote(str);
     } else {
         val = nh2word(str);
     }
-    /* PASS FIRSTでは、lptrがまだ確定していない（ENDで初めて確定する）ため、
-     * 重複排除の登録・検索は行わず、従来通りダミーの書き込みのみ行う */
-    if(pass == FIRST) {
-        adr = asptr->lptr;
-        writememory(val, (asptr->lptr)++, pass);
-    } else {
-        /* PASS SECONDでは、lptrはEND処理で正しく確定済みなので、重複排除が有効 */
-        char llabel[LITERALSIZE + 1];
-        sprintf(llabel, "=%04X", val);
-        adr = getlabel("", llabel);
-        if(adr == 0xFFFF) {
+    if(cerr->num == 0) {
+        /* PASS FIRSTでは、lptrがまだ確定していない（ENDで初めて確定する）ため、
+         * 重複排除の登録・検索は行わず、従来通りダミーの書き込みのみ行う */
+        if(pass == FIRST) {
             adr = asptr->lptr;
             writememory(val, (asptr->lptr)++, pass);
-            addlabel("", llabel, adr);
+        } else {
+            /* PASS SECONDでは、lptrはEND処理で正しく確定済みなので、重複排除が有効 */
+            char llabel[LITERALSIZE + 1];
+            sprintf(llabel, "=%04X", val);
+            adr = getlabel("", llabel);
+            if(adr == 0xFFFF) {
+                adr = asptr->lptr;
+                writememory(val, (asptr->lptr)++, pass);
+                addlabel("", llabel, adr);
+            }
         }
     }
     return adr;
 }
 
+WORD getliteralquote(const char *str)
+{
+    assert(str[0] == '\'');
+    size_t len = strlen(str);
+    WORD val = 0;
+    if (len < 2 || str[len - 1] != '\'' || (str[1] == '\'' && len == 3)) {
+        setcerr(123, str);    /* unclosed quote */
+    } else if((str[1] != '\'' && len > 3) || (str[1] == '\'' && len > 4)) {
+        setcerr(124, str);    /* more than one character in literal */
+    } else if(len ==2 && !strcmp(str, "''")) {
+        setcerr(126, str);    /* syntax error in literal */
+    } else {
+        val = (WORD)str[1];
+    }
+    return val;
+}
+
 void writememory(WORD word, WORD adr, PASS pass)
 {
     char *n = NULL;
-- 
2.47.3