X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=src%2Ftoken.c;h=d1e3eb3b5f1c2324d4eaf025a656f313c96e37d9;hp=074b6c41b2e2de365d5cbdf27544adcff4b09733;hb=1708c99d4b6263863304d48ebca3b3473d6a0112;hpb=d28cabe954c1f93dee3cb1b100e614e985a74cdb

diff --git a/src/token.c b/src/token.c
index 074b6c4..d1e3eb3 100644
--- a/src/token.c
+++ b/src/token.c
@@ -4,9 +4,17 @@
 #include "cmem.h"
 #include "assemble.h"
 
+/**
+ * @brief 「,」区切りの文字列から、オペランドのトークンを取得
+ *
+ * @return オペランドのトークン
+ *
+ * @param *str 「,」区切りの文字列
+ */
+OPD *opdtok(const char *str);
 
 /**
- * 行トークン取得のエラー定義
+ * @brief 行トークン取得のエラー定義
  */
 CERR cerr_linetok[] = {
     { 104, "label length is too long" },
@@ -14,7 +22,7 @@ CERR cerr_linetok[] = {
 };
 
 /**
- * オペランドトークン取得のエラー定義
+ * @brief オペランドトークン取得のエラー定義
  */
 static CERR cerr_opdtok[] = {
     { 117, "operand too many in DC" },
@@ -23,18 +31,6 @@ static CERR cerr_opdtok[] = {
     { 123, "unclosed quote" },
 };
 
-/**
- * オペランドトークン取得のエラーを追加
- */
-void addcerrlist_tok()
-{
-    addcerrlist(ARRAYSIZE(cerr_linetok), cerr_linetok);
-    addcerrlist(ARRAYSIZE(cerr_opdtok), cerr_opdtok);
-}
-
-/**
- * 「,」区切りの文字列から、オペランドのトークンを取得
- */
 OPD *opdtok(const char *str)
 {
     OPD *opd = malloc_chk(sizeof(OPD), "opd");
@@ -96,9 +92,13 @@ OPD *opdtok(const char *str)
     return opd;
 }
 
-/**
- * 空白またはタブで区切られた1行から、トークンを取得する
- */
+/* assemble.hで定義された関数群 */
+void addcerrlist_tok()
+{
+    addcerrlist(ARRAYSIZE(cerr_linetok), cerr_linetok);
+    addcerrlist(ARRAYSIZE(cerr_opdtok), cerr_opdtok);
+}
+
 CMDLINE *linetok(const char *line)
 {
     char *tokens, *p, *sepp;
@@ -131,8 +131,9 @@ CMDLINE *linetok(const char *line)
             /* 文字列が長すぎる場合はエラー */
             if(strlen(p) > LABELSIZE) {
                 setcerr(104, p);    /* label length is too long */
+            } else {
+                strcpy(cmdl->label, p);
             }
-            strcpy(cmdl->label, p);
             p = sepp + 1;
         }
         /* ラベルと命令の間の空白をスキップ */