アセンブル時のエラー表示について、方法を変更し、コード修正

diff --git a/src/assemble.c b/src/assemble.c
index 36edd2bf783cb67c94f70330f2a70bb7f9456060..b9fbed7133218e630879000964515f85cfec536f 100644 (file)
--- a/src/assemble.c
+++ b/src/assemble.c
@@ -395,6 +395,10 @@ bool assembleline(const CMDLINE *cmdl, PASS pass)
     return status;
 }
 
+void printline(FILE *stream, const char *filename, int lineno, char *line) {
+    fprintf(stream, "%s:%5d:%s", filename, lineno, line);
+}
+
 /* 指定された名前のファイルをアセンブル */
 /* 2回実行される */
 bool assemble(const char *file, PASS pass)
@@ -422,7 +426,7 @@ bool assemble(const char *file, PASS pass)
         if((pass == FIRST && (&asmode)->src == true) ||
            (pass == SECOND && (&asmode)->asdetail == true))
         {
-            fprintf(stdout, "%s:%5d:%s", file, lineno, line);
+            printline(stdout, file, lineno, line);
         }
         if((cmdl = linetok(line)) != NULL) {
             if(pass == FIRST && cmdl->label != NULL) {
@@ -439,7 +443,8 @@ bool assemble(const char *file, PASS pass)
         }
     }
     if(cerrno > 0) {
-        fprintf(stderr, "Assemble error - %d: %s\n %s:%d: %s\n", cerrno, cerrmsg, file, lineno, line);
+        fprintf(stderr, "Assemble error - %d: %s\n", cerrno, cerrmsg);
+        printline(stderr, file, lineno, line);
         status = false;
     }
     fclose(fp);

diff --git a/test/integration/casl2/cmd_err0/0.txt b/test/integration/casl2/cmd_err0/0.txt
index 711c1daee4e13f96afee0b014816277224f8fb10..fd2ff24e3550a37c5c7b91b4da3f581b50460d83 100644 (file)
--- a/test/integration/casl2/cmd_err0/0.txt
+++ b/test/integration/casl2/cmd_err0/0.txt
@@ -6,5 +6,4 @@ Assemble ../../../../as/ERR/cmd_err0.casl (0)
 ../../../../as/ERR/cmd_err0.casl:    3:        LAD     GR2,2
 ../../../../as/ERR/cmd_err0.casl:    4:        LEA     GR1,GR2
 Assemble error - 109: LEA: not command of operand "r1,r2"
- ../../../../as/ERR/cmd_err0.casl:4:         LEA     GR1,GR2
-
+../../../../as/ERR/cmd_err0.casl:    4:        LEA     GR1,GR2

diff --git a/test/integration/casl2/cmd_err1/0.txt b/test/integration/casl2/cmd_err1/0.txt
index 0c5569a703b1d813cf57120fc2269871d25b89c1..56921a49dfaf27ca06a5947acd4ba4766e6f8384 100644 (file)
--- a/test/integration/casl2/cmd_err1/0.txt
+++ b/test/integration/casl2/cmd_err1/0.txt
@@ -4,5 +4,4 @@ Assemble ../../../../as/ERR/cmd_err1.casl (0)
 ../../../../as/ERR/cmd_err1.casl:    1:MAIN    START   BEGIN
 ../../../../as/ERR/cmd_err1.casl:    2:BEGIN   LEA     GR1,A
 Assemble error - 110: LEA: not command of operand "r,adr[,x]"
- ../../../../as/ERR/cmd_err1.casl:2: BEGIN   LEA     GR1,A
-
+../../../../as/ERR/cmd_err1.casl:    2:BEGIN   LEA     GR1,A

diff --git a/test/integration/casl2/ds_err/0.txt b/test/integration/casl2/ds_err/0.txt
index 908ba090b53295a61c7735d49b0162b5187dff44..211dc12dcdeb1848c2264559ebdf3737d7633a91 100644 (file)
--- a/test/integration/casl2/ds_err/0.txt
+++ b/test/integration/casl2/ds_err/0.txt
@@ -6,5 +6,4 @@ Assemble ../../../../as/ERR/ds_err.casl (0)
 ../../../../as/ERR/ds_err.casl:    3:        ST      GR0,A
 ../../../../as/ERR/ds_err.casl:    4:A       DS
 Assemble error - 106: operand count mismatch
- ../../../../as/ERR/ds_err.casl:4: A       DS
-
+../../../../as/ERR/ds_err.casl:    4:A       DS

diff --git a/test/integration/casl2/labeldup_err/0.txt b/test/integration/casl2/labeldup_err/0.txt
index ea2931fe13cb7b73357b088dfbe61f58e7a133da..97258871e2d5d2144c18a24822869bca149868e5 100644 (file)
--- a/test/integration/casl2/labeldup_err/0.txt
+++ b/test/integration/casl2/labeldup_err/0.txt
@@ -8,5 +8,4 @@ Assemble ../../../../as/ERR/labeldup_err.casl (0)
 ../../../../as/ERR/labeldup_err.casl:    5:A       DC      3
 ../../../../as/ERR/labeldup_err.casl:    6:A       DC      1
 Assemble error - 101: A: label already defined
- ../../../../as/ERR/labeldup_err.casl:6: A       DC      1
-
+../../../../as/ERR/labeldup_err.casl:    6:A       DC      1

diff --git a/test/integration/casl2/literalstr_err/0.txt b/test/integration/casl2/literalstr_err/0.txt
index 755d174cdb2d993105b19681555302949c5bbf11..d84ce5363c4d7b8a24fdc738adb837f0e980ccb1 100644 (file)
--- a/test/integration/casl2/literalstr_err/0.txt
+++ b/test/integration/casl2/literalstr_err/0.txt
@@ -2,5 +2,4 @@
 
 Assemble ../../../../as/ERR/literalstr_err.casl (0)
 Assemble error - 124: 'abcdeABCDE': more than one character in literal
- ../../../../as/ERR/literalstr_err.casl:2:         LAD     GR1,='abcdeABCDE'
-
+../../../../as/ERR/literalstr_err.casl:    2:        LAD     GR1,='abcdeABCDE'

diff --git a/test/integration/casl2/opdspc_err/0.txt b/test/integration/casl2/opdspc_err/0.txt
index e1a99b5ca64e8bf8642310eb5042c4b270a38033..fca71405dc13a78d263b224cbe639f7f7c40e068 100644 (file)
--- a/test/integration/casl2/opdspc_err/0.txt
+++ b/test/integration/casl2/opdspc_err/0.txt
@@ -4,5 +4,4 @@ Assemble ../../../../as/ERR/opdspc_err.casl (0)
 ../../../../as/ERR/opdspc_err.casl:    1:MAIN    START   BEGIN
 ../../../../as/ERR/opdspc_err.casl:    2:BEGIN   LD      GR1, A
 Assemble error - 121: cannot get operand token
- ../../../../as/ERR/opdspc_err.casl:2: BEGIN   LD      GR1, A
-
+../../../../as/ERR/opdspc_err.casl:    2:BEGIN   LD      GR1, A

diff --git a/test/integration/casl2/quoteend_err/0.txt b/test/integration/casl2/quoteend_err/0.txt
index 8c1944629ebcf0872fd0c6d9b13e19cf2b385b43..53e03fe35ff6666efdb011d3b5d3b66f6741595e 100644 (file)
--- a/test/integration/casl2/quoteend_err/0.txt
+++ b/test/integration/casl2/quoteend_err/0.txt
@@ -2,5 +2,4 @@
 
 Assemble ../../../../as/ERR/quoteend_err.casl (0)
 Assemble error - 123: 'Hello, World!: unclosed quote
- ../../../../as/ERR/quoteend_err.casl:4: BUF      DC     'Hello, World!
-
+../../../../as/ERR/quoteend_err.casl:    4:BUF      DC     'Hello, World!