コマンドハッシュ表を複数回作成していた構造バグを修正
[YACASL2.git] / src / assemble.c
index 2b2bb5d..616b256 100644 (file)
@@ -1,6 +1,9 @@
 #include "casl2.h"
 #include "assemble.h"
 
+/* アセンブルモード: src, label, onlylabel, asdetail, onlyassemble */
+ASMODE asmode = {false, false, false, false, false};
+
 /* 値を格納するポインタ */
 WORD ptr;
 
@@ -24,7 +27,7 @@ WORD getgr(const char *str, bool is_x)
         return 0xFFFF;
     }
     r = (WORD)(*(str+2) - '0');
-    /* 指標レジスタとして用いることはできない */
+    /* GR0は指標レジスタとして用いることができない */
     if(is_x == true && r == 0x0) {
         setcerr(120, NULL);    /* GR0 in operand x */
         return 0x0;
@@ -95,7 +98,7 @@ void writestr(const char *str, bool literal, PASS pass)
     for(; ;) {
         /* 閉じ「'」がないまま文字列が終了した場合 */
         if(*p == '\0') {
-            setcerr(123, str);    /* illegal string */
+            setcerr(123, str);    /* unclosed quote */
             break;
         }
         /* 「'」の場合、次の文字が「'」でない場合は正常終了 */
@@ -409,16 +412,13 @@ bool assemble(const char *file, PASS pass)
     char *line;
     FILE *fp;
 
-    if(create_cmdtype_code() == false) {
-        return false;
-    }
     if((fp = fopen(file, "r")) == NULL) {
         perror(file);
         return false;
     }
     for(; ;) {
         cmdl = malloc(sizeof(CMDLINE));
-        line = malloc(LINESIZE+1);
+        line = malloc(LINESIZE + 1);
         if((line = fgets(line, LINESIZE, fp)) == NULL) {
             break;
         }