From f52993a978eed69d0b474c45fc730d43759faa23 Mon Sep 17 00:00:00 2001 From: Arthur Carcano Date: Mon, 2 Sep 2024 16:06:29 +0200 Subject: [PATCH 1/2] Update gnucobol submodule --- .gitmodules | 1 + import/gnucobol | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/.gitmodules b/.gitmodules index 85f71c7e3..ebaec40d4 100644 --- a/.gitmodules +++ b/.gitmodules @@ -1,6 +1,7 @@ [submodule "import/gnucobol"] path = import/gnucobol url = https://github.com/OcamlPro/gnucobol.git + branch = gnucobol-3.x [submodule "import/merlin"] path = import/merlin url = https://github.com/OCamlPro/merlin.git diff --git a/import/gnucobol b/import/gnucobol index c0d64addf..5a8666888 160000 --- a/import/gnucobol +++ b/import/gnucobol @@ -1 +1 @@ -Subproject commit c0d64addfd83baff21f089e0ab7c92609e291442 +Subproject commit 5a8666888fada0fdbbc904269ef809629fd93fbb From b1486c68534ce7766003ee5eb14c1f66797e6aa0 Mon Sep 17 00:00:00 2001 From: Nicolas Berthier Date: Mon, 2 Sep 2024 17:59:42 +0200 Subject: [PATCH 2/2] Update expected test results following upgrade of GnuCOBOL --- test/output-tests/data_packed.expected | 21 +- test/output-tests/listings.expected | 3060 +++++++-------- test/output-tests/run_extensions.expected | 766 ++-- test/output-tests/run_file.expected | 3740 ++++++++++++------- test/output-tests/run_fundamental.expected | 383 +- test/output-tests/run_misc.expected | 2737 ++++++++------ test/output-tests/run_reportwriter.expected | 1096 +++--- test/output-tests/syn_copy.expected | 44 +- test/output-tests/syn_definition.expected | 152 +- test/output-tests/syn_file.expected | 60 +- test/output-tests/syn_misc.expected | 822 ++-- test/output-tests/syn_refmod.expected | 2 +- test/output-tests/syn_screen.expected | 1 + test/output-tests/used_binaries.expected | 139 +- 14 files changed, 7017 insertions(+), 6006 deletions(-) diff --git a/test/output-tests/data_packed.expected b/test/output-tests/data_packed.expected index b24567186..73812e0a5 100644 --- a/test/output-tests/data_packed.expected +++ b/test/output-tests/data_packed.expected @@ -1,5 +1,5 @@ -Considering: import/gnucobol/tests/testsuite.src/data_packed.at:47:0 -data_packed.at-47-dump.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/data_packed.at:45:0 +data_packed.at-45-dump.c:5.6-5.7: 2 #include 3 #include 4 @@ -9,7 +9,7 @@ data_packed.at-47-dump.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -data_packed.at-47-dump.c:5.7-5.8: +data_packed.at-45-dump.c:5.7-5.8: 2 #include 3 #include 4 @@ -19,7 +19,7 @@ data_packed.at-47-dump.c:5.7-5.8: 7 { >> Error: Invalid syntax -data_packed.at-47-dump.c:6.6-6.7: +data_packed.at-45-dump.c:6.6-6.7: 3 #include 4 5 COB_EXT_EXPORT int @@ -29,7 +29,7 @@ data_packed.at-47-dump.c:6.6-6.7: 8 int i; >> Error: Unexpected indicator: `u' -data_packed.at-47-dump.c:8.6-8.7: +data_packed.at-45-dump.c:8.6-8.7: 5 COB_EXT_EXPORT int 6 dump (unsigned char *data) 7 { @@ -39,7 +39,7 @@ data_packed.at-47-dump.c:8.6-8.7: 10 printf ("%02x", data[i]); >> Error: Unexpected indicator: `i' -data_packed.at-47-dump.c:9.6-9.7: +data_packed.at-45-dump.c:9.6-9.7: 6 dump (unsigned char *data) 7 { 8 int i; @@ -49,7 +49,7 @@ data_packed.at-47-dump.c:9.6-9.7: 11 puts (""); >> Error: Unexpected indicator: `(' -data_packed.at-47-dump.c:10.6-10.7: +data_packed.at-45-dump.c:10.6-10.7: 7 { 8 int i; 9 for (i = 0; i < 10; i++) @@ -59,7 +59,7 @@ data_packed.at-47-dump.c:10.6-10.7: 12 return 0; >> Error: Unexpected indicator: `i' -data_packed.at-47-dump.c:12.6-12.7: +data_packed.at-45-dump.c:12.6-12.7: 9 for (i = 0; i < 10; i++) 10 printf ("%02x", data[i]); 11 puts (""); @@ -741,5 +741,6 @@ Considering: import/gnucobol/tests/testsuite.src/data_packed.at:7277:0 Considering: import/gnucobol/tests/testsuite.src/data_packed.at:12320:0 Considering: import/gnucobol/tests/testsuite.src/data_packed.at:20531:0 Considering: import/gnucobol/tests/testsuite.src/data_packed.at:28740:0 -Considering: import/gnucobol/tests/testsuite.src/data_packed.at:34793:0 -Considering: import/gnucobol/tests/testsuite.src/data_packed.at:40840:0 +Considering: import/gnucobol/tests/testsuite.src/data_packed.at:28779:0 +Considering: import/gnucobol/tests/testsuite.src/data_packed.at:34832:0 +Considering: import/gnucobol/tests/testsuite.src/data_packed.at:40879:0 diff --git a/test/output-tests/listings.expected b/test/output-tests/listings.expected index c22dd2c9f..4b0082dbb 100644 --- a/test/output-tests/listings.expected +++ b/test/output-tests/listings.expected @@ -2725,21 +2725,21 @@ listings.at-2150-prog2.cob:6.2-6.30: Considering: import/gnucobol/tests/testsuite.src/listings.at:2199:0 Considering: import/gnucobol/tests/testsuite.src/listings.at:2310:0 listings.at-2310-prog15-1.lst:1.6-1.7: - 1 > GnuCOBOL V.R.P prog3.cob + 1 > GnuCOBOL V.R.P prog3.cob ---- ^ 2 3 SIZE TYPE LVL NAME PICTURE >> Error: Unexpected indicator: `O' listings.at-2310-prog15-1.lst:1.7-1.8: - 1 > GnuCOBOL V.R.P prog3.cob + 1 > GnuCOBOL V.R.P prog3.cob ---- ^ 2 3 SIZE TYPE LVL NAME PICTURE >> Error: Invalid syntax listings.at-2310-prog15-1.lst:3.6-3.7: - 1 GnuCOBOL V.R.P prog3.cob + 1 GnuCOBOL V.R.P prog3.cob 2 3 > SIZE TYPE LVL NAME PICTURE ---- ^ @@ -3024,22 +3024,22 @@ listings.at-2762-prog.cob:34.32-34.41: Considering: import/gnucobol/tests/testsuite.src/listings.at:2848:0 Considering: import/gnucobol/tests/testsuite.src/listings.at:2876:0 -Considering: import/gnucobol/tests/testsuite.src/listings.at:3684:0 -listings.at-3684-expected.lst:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/listings.at:3669:0 +listings.at-3669-expected.lst:1.6-1.7: 1 > GnuCOBOL V.R.P prog.cob ---- ^ 2 3 LINE PG/LN A...B............................................................ >> Error: Unexpected indicator: `O' -listings.at-3684-expected.lst:1.7-1.8: +listings.at-3669-expected.lst:1.7-1.8: 1 > GnuCOBOL V.R.P prog.cob ---- ^ 2 3 LINE PG/LN A...B............................................................ >> Error: Invalid syntax -listings.at-3684-expected.lst:12.7-12.14: +listings.at-3669-expected.lst:12.7-12.14: 9 000005 DATA DIVISION. 10 000006 WORKING-STORAGE SECTION. 11 000007 01 empty-pic PIC. @@ -3049,7 +3049,7 @@ listings.at-3684-expected.lst:12.7-12.14: 14 000009 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. >> Error: Invalid syntax -listings.at-3684-expected.lst:12.29: +listings.at-3669-expected.lst:12.29: 9 000005 DATA DIVISION. 10 000006 WORKING-STORAGE SECTION. 11 000007 01 empty-pic PIC. @@ -3059,7 +3059,7 @@ listings.at-3684-expected.lst:12.29: 14 000009 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. >> Hint: Missing . -listings.at-3684-expected.lst:13.15-13.17: +listings.at-3669-expected.lst:13.15-13.17: 10 000006 WORKING-STORAGE SECTION. 11 000007 01 empty-pic PIC. 12 error: missing PICTURE string @@ -3069,7 +3069,7 @@ listings.at-3684-expected.lst:13.15-13.17: 15 000010 01 too-long-pic2 PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX >> Error: Invalid syntax -listings.at-3684-expected.lst:14.14-14.15: +listings.at-3669-expected.lst:14.14-14.15: 11 000007 01 empty-pic PIC. 12 error: missing PICTURE string 13 000008 01 too-long-pic PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX @@ -3079,7 +3079,7 @@ listings.at-3684-expected.lst:14.14-14.15: 16 error: PICTURE string may not contain more than 255 characters; contains 301 >> Error: Invalid syntax -listings.at-3684-expected.lst:16.21: +listings.at-3669-expected.lst:16.21: 13 000008 01 too-long-pic PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 14 000009 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. 15 000010 01 too-long-pic2 PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX @@ -3089,7 +3089,7 @@ listings.at-3684-expected.lst:16.21: 18 000011 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX >> Hint: Missing . -listings.at-3684-expected.lst:16.22-16.25: +listings.at-3669-expected.lst:16.22-16.25: 13 000008 01 too-long-pic PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 14 000009 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. 15 000010 01 too-long-pic2 PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX @@ -3099,7 +3099,7 @@ listings.at-3684-expected.lst:16.22-16.25: 18 000011 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX >> Error: Invalid syntax -listings.at-3684-expected.lst:16.52-16.62: +listings.at-3669-expected.lst:16.52-16.62: 13 000008 01 too-long-pic PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 14 000009 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. 15 000010 01 too-long-pic2 PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX @@ -3109,7 +3109,7 @@ listings.at-3684-expected.lst:16.52-16.62: 18 000011 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX >> Error: Invalid syntax -listings.at-3684-expected.lst:18.72: +listings.at-3669-expected.lst:18.72: 15 000010 01 too-long-pic2 PIC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 16 error: PICTURE string may not contain more than 255 characters; contains 301 17 + characters @@ -3119,7 +3119,7 @@ listings.at-3684-expected.lst:18.72: 20 000013 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX >> Hint: Missing RENAMES -listings.at-3684-expected.lst:19.14-19.15: +listings.at-3669-expected.lst:19.14-19.15: 16 error: PICTURE string may not contain more than 255 characters; contains 301 17 + characters 18 000011 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX @@ -3129,7 +3129,7 @@ listings.at-3684-expected.lst:19.14-19.15: 21 000014 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. >> Error: Invalid syntax -listings.at-3684-expected.lst:19.72: +listings.at-3669-expected.lst:19.72: 16 error: PICTURE string may not contain more than 255 characters; contains 301 17 + characters 18 000011 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX @@ -3139,7 +3139,7 @@ listings.at-3684-expected.lst:19.72: 21 000014 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. >> Hint: Missing . -listings.at-3684-expected.lst:20.14-20.15: +listings.at-3669-expected.lst:20.14-20.15: 17 + characters 18 000011 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 19 000012 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX @@ -3149,7 +3149,7 @@ listings.at-3684-expected.lst:20.14-20.15: 22 000015 01 multiple-symbols. >> Warning: Invalid syntax -listings.at-3684-expected.lst:24.7-24.9: +listings.at-3669-expected.lst:24.7-24.9: 21 000014 -XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. 22 000015 01 multiple-symbols. 23 000016 03 PIC 9CRCR. @@ -3159,7 +3159,7 @@ listings.at-3684-expected.lst:24.7-24.9: 26 error: CR or DB may only occur once in a PICTURE string >> Error: Invalid syntax -listings.at-3684-expected.lst:26.7-26.9: +listings.at-3669-expected.lst:26.7-26.9: 23 000016 03 PIC 9CRCR. 24 error: CR or DB may only occur once in a PICTURE string 25 000017 03 PIC 9DBDB. @@ -3169,7 +3169,7 @@ listings.at-3684-expected.lst:26.7-26.9: 28 error: S may only occur once in a PICTURE string >> Error: Invalid syntax -listings.at-3684-expected.lst:28.7-28.8: +listings.at-3669-expected.lst:28.7-28.8: 25 000017 03 PIC 9DBDB. 26 error: CR or DB may only occur once in a PICTURE string 27 000018 03 PIC SS99S. @@ -3179,7 +3179,7 @@ listings.at-3684-expected.lst:28.7-28.8: 30 000019 03 PIC 99..9. >> Error: Invalid syntax -listings.at-3684-expected.lst:31.7-31.8: +listings.at-3669-expected.lst:31.7-31.8: 28 error: S may only occur once in a PICTURE string 29 error: S must be at start of PICTURE string 30 000019 03 PIC 99..9. @@ -3189,1149 +3189,1089 @@ listings.at-3684-expected.lst:31.7-31.8: 33 error: V may only occur once in a PICTURE string >> Error: Invalid syntax -listings.at-3684-expected.lst:33.7-33.8: +listings.at-3669-expected.lst:33.7-33.8: 30 000019 03 PIC 99..9. 31 error: . may only occur once in a PICTURE string 32 000020 03 PIC 99VV9. 33 > error: V may only occur once in a PICTURE string ---- ^ 34 000021 03 PIC +$99+. - 35 error: a trailing +/- sign cannot follow a leading +/- sign + 35 error: floating '+' symbols cannot have a '9' between them >> Error: Invalid syntax -listings.at-3684-expected.lst:35.7-35.8: +listings.at-3669-expected.lst:35.7-35.15: 32 000020 03 PIC 99VV9. 33 error: V may only occur once in a PICTURE string 34 000021 03 PIC +$99+. - 35 > error: a trailing +/- sign cannot follow a leading +/- sign ----- ^ + 35 > error: floating '+' symbols cannot have a '9' between them +---- ^^^^^^^^ 36 000022 03 PIC $+99$-. - 37 error: a leading +/- sign cannot follow a leading currency symbol + 37 error: floating '$' symbols cannot have a '9' between them >> Error: Invalid syntax -listings.at-3684-expected.lst:37.7-37.8: +listings.at-3669-expected.lst:37.7-37.15: 34 000021 03 PIC +$99+. - 35 error: a trailing +/- sign cannot follow a leading +/- sign + 35 error: floating '+' symbols cannot have a '9' between them 36 000022 03 PIC $+99$-. - 37 > error: a leading +/- sign cannot follow a leading currency symbol ----- ^ - 38 error: a trailing currency symbol cannot follow a leading currency symbol - 39 error: a trailing +/- sign cannot follow a leading +/- sign + 37 > error: floating '$' symbols cannot have a '9' between them +---- ^^^^^^^^ + 38 000023 01 non-symbols. + 39 000024 03 PIC 9K. >> Error: Invalid syntax -listings.at-3684-expected.lst:42.7-42.14: - 39 error: a trailing +/- sign cannot follow a leading +/- sign - 40 000023 01 non-symbols. - 41 000024 03 PIC 9K. - 42 > error: invalid PICTURE character 'K' +listings.at-3669-expected.lst:40.7-40.14: + 37 error: floating '$' symbols cannot have a '9' between them + 38 000023 01 non-symbols. + 39 000024 03 PIC 9K. + 40 > error: invalid PICTURE character 'K' ---- ^^^^^^^ - 43 000025 03 PIC 999C. - 44 error: C must be followed by R + 41 000025 03 PIC 999C. + 42 error: C must be followed by R >> Error: Invalid syntax -listings.at-3684-expected.lst:44.7-44.8: - 41 000024 03 PIC 9K. - 42 error: invalid PICTURE character 'K' - 43 000025 03 PIC 999C. - 44 > error: C must be followed by R +listings.at-3669-expected.lst:42.7-42.8: + 39 000024 03 PIC 9K. + 40 error: invalid PICTURE character 'K' + 41 000025 03 PIC 999C. + 42 > error: C must be followed by R ---- ^ - 45 000026 03 PIC 999D. - 46 error: D must be followed by B + 43 000026 03 PIC 999D. + 44 error: D must be followed by B >> Error: Invalid syntax -listings.at-3684-expected.lst:46.7-46.8: - 43 000025 03 PIC 999C. - 44 error: C must be followed by R - 45 000026 03 PIC 999D. - 46 > error: D must be followed by B +listings.at-3669-expected.lst:44.7-44.8: + 41 000025 03 PIC 999C. + 42 error: C must be followed by R + 43 000026 03 PIC 999D. + 44 > error: D must be followed by B ---- ^ - 47 000027 01 too-many-digits PIC 9(50). - 48 error: numeric field cannot be larger than 38 digits + 45 000027 01 too-many-digits PIC 9(50). + 46 error: numeric field cannot be larger than 38 digits >> Error: Invalid syntax -listings.at-3684-expected.lst:48.7-48.14: - 45 000026 03 PIC 999D. - 46 error: D must be followed by B - 47 000027 01 too-many-digits PIC 9(50). - 48 > error: numeric field cannot be larger than 38 digits +listings.at-3669-expected.lst:46.7-46.14: + 43 000026 03 PIC 999D. + 44 error: D must be followed by B + 45 000027 01 too-many-digits PIC 9(50). + 46 > error: numeric field cannot be larger than 38 digits ---- ^^^^^^^ - 49 000028 01 too-long-number-in-parens PIC 9(11111111111111). - 50 error: only up to 10 significant digits are permitted within parentheses + 47 000028 01 too-long-number-in-parens PIC 9(11111111111111). + 48 error: only up to 10 significant digits are permitted within parentheses >> Error: Invalid syntax -listings.at-3684-expected.lst:48.52: - 45 000026 03 PIC 999D. - 46 error: D must be followed by B - 47 000027 01 too-many-digits PIC 9(50). - 48 > error: numeric field cannot be larger than 38 digits +listings.at-3669-expected.lst:46.52: + 43 000026 03 PIC 999D. + 44 error: D must be followed by B + 45 000027 01 too-many-digits PIC 9(50). + 46 > error: numeric field cannot be larger than 38 digits ---- ^ - 49 000028 01 too-long-number-in-parens PIC 9(11111111111111). - 50 error: only up to 10 significant digits are permitted within parentheses + 47 000028 01 too-long-number-in-parens PIC 9(11111111111111). + 48 error: only up to 10 significant digits are permitted within parentheses >> Hint: Missing RENAMES . -listings.at-3684-expected.lst:49.15-49.17: - 46 error: D must be followed by B - 47 000027 01 too-many-digits PIC 9(50). - 48 error: numeric field cannot be larger than 38 digits - 49 > 000028 01 too-long-number-in-parens PIC 9(11111111111111). +listings.at-3669-expected.lst:47.15-47.17: + 44 error: D must be followed by B + 45 000027 01 too-many-digits PIC 9(50). + 46 error: numeric field cannot be larger than 38 digits + 47 > 000028 01 too-long-number-in-parens PIC 9(11111111111111). ---- ^^ - 50 error: only up to 10 significant digits are permitted within parentheses - 51 000029 01 nested-parens PIC 9((100)). + 48 error: only up to 10 significant digits are permitted within parentheses + 49 000029 01 nested-parens PIC 9((100)). >> Error: Invalid syntax -listings.at-3684-expected.lst:50.7-50.11: - 47 000027 01 too-many-digits PIC 9(50). - 48 error: numeric field cannot be larger than 38 digits - 49 000028 01 too-long-number-in-parens PIC 9(11111111111111). - 50 > error: only up to 10 significant digits are permitted within parentheses +listings.at-3669-expected.lst:48.7-48.11: + 45 000027 01 too-many-digits PIC 9(50). + 46 error: numeric field cannot be larger than 38 digits + 47 000028 01 too-long-number-in-parens PIC 9(11111111111111). + 48 > error: only up to 10 significant digits are permitted within parentheses ---- ^^^^ - 51 000029 01 nested-parens PIC 9((100)). - 52 error: parentheses must be preceded by a picture symbol + 49 000029 01 nested-parens PIC 9((100)). + 50 error: parentheses must be preceded by a picture symbol >> Error: Invalid syntax -listings.at-3684-expected.lst:50.32: - 47 000027 01 too-many-digits PIC 9(50). - 48 error: numeric field cannot be larger than 38 digits - 49 000028 01 too-long-number-in-parens PIC 9(11111111111111). - 50 > error: only up to 10 significant digits are permitted within parentheses +listings.at-3669-expected.lst:48.32: + 45 000027 01 too-many-digits PIC 9(50). + 46 error: numeric field cannot be larger than 38 digits + 47 000028 01 too-long-number-in-parens PIC 9(11111111111111). + 48 > error: only up to 10 significant digits are permitted within parentheses ---- ^ - 51 000029 01 nested-parens PIC 9((100)). - 52 error: parentheses must be preceded by a picture symbol + 49 000029 01 nested-parens PIC 9((100)). + 50 error: parentheses must be preceded by a picture symbol >> Hint: Missing RENAMES -listings.at-3684-expected.lst:50.33-50.39: - 47 000027 01 too-many-digits PIC 9(50). - 48 error: numeric field cannot be larger than 38 digits - 49 000028 01 too-long-number-in-parens PIC 9(11111111111111). - 50 > error: only up to 10 significant digits are permitted within parentheses +listings.at-3669-expected.lst:48.33-48.39: + 45 000027 01 too-many-digits PIC 9(50). + 46 error: numeric field cannot be larger than 38 digits + 47 000028 01 too-long-number-in-parens PIC 9(11111111111111). + 48 > error: only up to 10 significant digits are permitted within parentheses ---- ^^^^^^ - 51 000029 01 nested-parens PIC 9((100)). - 52 error: parentheses must be preceded by a picture symbol + 49 000029 01 nested-parens PIC 9((100)). + 50 error: parentheses must be preceded by a picture symbol >> Error: Invalid syntax -listings.at-3684-expected.lst:50.39: - 47 000027 01 too-many-digits PIC 9(50). - 48 error: numeric field cannot be larger than 38 digits - 49 000028 01 too-long-number-in-parens PIC 9(11111111111111). - 50 > error: only up to 10 significant digits are permitted within parentheses +listings.at-3669-expected.lst:48.39: + 45 000027 01 too-many-digits PIC 9(50). + 46 error: numeric field cannot be larger than 38 digits + 47 000028 01 too-long-number-in-parens PIC 9(11111111111111). + 48 > error: only up to 10 significant digits are permitted within parentheses ---- ^ - 51 000029 01 nested-parens PIC 9((100)). - 52 error: parentheses must be preceded by a picture symbol + 49 000029 01 nested-parens PIC 9((100)). + 50 error: parentheses must be preceded by a picture symbol >> Hint: Missing . -listings.at-3684-expected.lst:50.40-50.43: - 47 000027 01 too-many-digits PIC 9(50). - 48 error: numeric field cannot be larger than 38 digits - 49 000028 01 too-long-number-in-parens PIC 9(11111111111111). - 50 > error: only up to 10 significant digits are permitted within parentheses +listings.at-3669-expected.lst:48.40-48.43: + 45 000027 01 too-many-digits PIC 9(50). + 46 error: numeric field cannot be larger than 38 digits + 47 000028 01 too-long-number-in-parens PIC 9(11111111111111). + 48 > error: only up to 10 significant digits are permitted within parentheses ---- ^^^ - 51 000029 01 nested-parens PIC 9((100)). - 52 error: parentheses must be preceded by a picture symbol + 49 000029 01 nested-parens PIC 9((100)). + 50 error: parentheses must be preceded by a picture symbol >> Warning: Invalid syntax -listings.at-3684-expected.lst:52.7-52.18: - 49 000028 01 too-long-number-in-parens PIC 9(11111111111111). - 50 error: only up to 10 significant digits are permitted within parentheses - 51 000029 01 nested-parens PIC 9((100)). - 52 > error: parentheses must be preceded by a picture symbol +listings.at-3669-expected.lst:50.7-50.18: + 47 000028 01 too-long-number-in-parens PIC 9(11111111111111). + 48 error: only up to 10 significant digits are permitted within parentheses + 49 000029 01 nested-parens PIC 9((100)). + 50 > error: parentheses must be preceded by a picture symbol ---- ^^^^^^^^^^^ - 53 000030 01 unbalanced-parens PIC 9(. - 54 error: unbalanced parentheses + 51 000030 01 unbalanced-parens PIC 9(. + 52 error: unbalanced parentheses >> Error: Invalid syntax -listings.at-3684-expected.lst:54.7-54.17: - 51 000029 01 nested-parens PIC 9((100)). - 52 error: parentheses must be preceded by a picture symbol - 53 000030 01 unbalanced-parens PIC 9(. - 54 > error: unbalanced parentheses +listings.at-3669-expected.lst:52.7-52.17: + 49 000029 01 nested-parens PIC 9((100)). + 50 error: parentheses must be preceded by a picture symbol + 51 000030 01 unbalanced-parens PIC 9(. + 52 > error: unbalanced parentheses ---- ^^^^^^^^^^ - 55 000031 01 multiple-pairs-of-parens PIC 9(5)(3). - 56 error: parentheses must be preceded by a picture symbol + 53 000031 01 multiple-pairs-of-parens PIC 9(5)(3). + 54 error: parentheses must be preceded by a picture symbol >> Error: Invalid syntax -listings.at-3684-expected.lst:56.7-56.18: - 53 000030 01 unbalanced-parens PIC 9(. - 54 error: unbalanced parentheses - 55 000031 01 multiple-pairs-of-parens PIC 9(5)(3). - 56 > error: parentheses must be preceded by a picture symbol +listings.at-3669-expected.lst:54.7-54.18: + 51 000030 01 unbalanced-parens PIC 9(. + 52 error: unbalanced parentheses + 53 000031 01 multiple-pairs-of-parens PIC 9(5)(3). + 54 > error: parentheses must be preceded by a picture symbol ---- ^^^^^^^^^^^ - 57 000032 01 no-digit-in-parens PIC 9(). - 58 error: parentheses must contain an unsigned integer + 55 000032 01 no-digit-in-parens PIC 9(). + 56 error: parentheses must contain an unsigned integer >> Error: Invalid syntax -listings.at-3684-expected.lst:58.7-58.18: - 55 000031 01 multiple-pairs-of-parens PIC 9(5)(3). - 56 error: parentheses must be preceded by a picture symbol - 57 000032 01 no-digit-in-parens PIC 9(). - 58 > error: parentheses must contain an unsigned integer +listings.at-3669-expected.lst:56.7-56.18: + 53 000031 01 multiple-pairs-of-parens PIC 9(5)(3). + 54 error: parentheses must be preceded by a picture symbol + 55 000032 01 no-digit-in-parens PIC 9(). + 56 > error: parentheses must contain an unsigned integer ---- ^^^^^^^^^^^ - 59 000033 01 mutually-exclusive-symbols. - 60 000034 03 PIC P(3)9.9. + 57 000033 01 mutually-exclusive-symbols. + 58 000034 03 PIC P(3)9.9. >> Error: Invalid syntax -listings.at-3684-expected.lst:61.7-61.8: - 58 error: parentheses must contain an unsigned integer - 59 000033 01 mutually-exclusive-symbols. - 60 000034 03 PIC P(3)9.9. - 61 > error: . cannot follow a P which is after the decimal point +listings.at-3669-expected.lst:59.7-59.8: + 56 error: parentheses must contain an unsigned integer + 57 000033 01 mutually-exclusive-symbols. + 58 000034 03 PIC P(3)9.9. + 59 > error: . cannot follow a P which is after the decimal point ---- ^ - 62 000035 03 PIC 9V.9. - 63 error: . cannot follow V + 60 000035 03 PIC 9V.9. + 61 error: . cannot follow V >> Error: Invalid syntax -listings.at-3684-expected.lst:63.7-63.8: - 60 000034 03 PIC P(3)9.9. - 61 error: . cannot follow a P which is after the decimal point - 62 000035 03 PIC 9V.9. - 63 > error: . cannot follow V +listings.at-3669-expected.lst:61.7-61.8: + 58 000034 03 PIC P(3)9.9. + 59 error: . cannot follow a P which is after the decimal point + 60 000035 03 PIC 9V.9. + 61 > error: . cannot follow V ---- ^ - 64 000036 03 PIC Z*. - 65 error: cannot have both Z and * in PICTURE string + 62 000036 03 PIC Z*. + 63 error: cannot have both Z and * in PICTURE string >> Error: Invalid syntax -listings.at-3684-expected.lst:65.7-65.13: - 62 000035 03 PIC 9V.9. - 63 error: . cannot follow V - 64 000036 03 PIC Z*. - 65 > error: cannot have both Z and * in PICTURE string +listings.at-3669-expected.lst:63.7-63.13: + 60 000035 03 PIC 9V.9. + 61 error: . cannot follow V + 62 000036 03 PIC Z*. + 63 > error: cannot have both Z and * in PICTURE string ---- ^^^^^^ - 66 000037 03 PIC +(5)--. - 67 error: a trailing +/- sign cannot follow a floating +/- string which is before + 64 000037 03 PIC +(5)--. + 65 error: only one of the symbols '-' , '+' or '$' may occur multiple times in a >> Error: Invalid syntax -listings.at-3684-expected.lst:67.7-67.8: - 64 000036 03 PIC Z*. - 65 error: cannot have both Z and * in PICTURE string - 66 000037 03 PIC +(5)--. - 67 > error: a trailing +/- sign cannot follow a floating +/- string which is before +listings.at-3669-expected.lst:65.7-65.11: + 62 000036 03 PIC Z*. + 63 error: cannot have both Z and * in PICTURE string + 64 000037 03 PIC +(5)--. + 65 > error: only one of the symbols '-' , '+' or '$' may occur multiple times in a +---- ^^^^ + 66 + PICTURE string + 67 000038 03 PIC $(4)Z(9). +>> Error: Invalid syntax + +listings.at-3669-expected.lst:68.7-68.8: + 65 error: only one of the symbols '-' , '+' or '$' may occur multiple times in a + 66 + PICTURE string + 67 000038 03 PIC $(4)Z(9). + 68 > error: a Z or * which is before the decimal point cannot follow a floating ---- ^ - 68 + the decimal point - 69 error: a trailing +/- sign may only occur once in a PICTURE string + 69 + currency symbol string which is before the decimal point + 70 000039 03 PIC $$B*(4). >> Error: Invalid syntax -listings.at-3684-expected.lst:71.7-71.8: - 68 + the decimal point - 69 error: a trailing +/- sign may only occur once in a PICTURE string - 70 000038 03 PIC $(4)Z(9). +listings.at-3669-expected.lst:71.7-71.8: + 68 error: a Z or * which is before the decimal point cannot follow a floating + 69 + currency symbol string which is before the decimal point + 70 000039 03 PIC $$B*(4). 71 > error: a Z or * which is before the decimal point cannot follow a floating ---- ^ 72 + currency symbol string which is before the decimal point - 73 000039 03 PIC $$B*(4). + 73 000040 03 PIC NX. >> Error: Invalid syntax -listings.at-3684-expected.lst:74.7-74.8: +listings.at-3669-expected.lst:74.7-74.8: 71 error: a Z or * which is before the decimal point cannot follow a floating 72 + currency symbol string which is before the decimal point - 73 000039 03 PIC $$B*(4). - 74 > error: a Z or * which is before the decimal point cannot follow a floating ----- ^ - 75 + currency symbol string which is before the decimal point - 76 000040 03 PIC NX. ->> Error: Invalid syntax - -listings.at-3684-expected.lst:77.7-77.8: - 74 error: a Z or * which is before the decimal point cannot follow a floating - 75 + currency symbol string which is before the decimal point - 76 000040 03 PIC NX. - 77 > error: A or X cannot follow N ----- ^ - 78 000041 03 PIC AN. - 79 error: N cannot follow A or X ->> Error: Invalid syntax - -listings.at-3684-expected.lst:79.7-79.8: - 76 000040 03 PIC NX. - 77 error: A or X cannot follow N - 78 000041 03 PIC AN. - 79 > error: N cannot follow A or X ----- ^ - 80 000042 03 PIC AZ(3). - 81 error: a Z or * which is before the decimal point cannot follow A or X ->> Error: Invalid syntax - -listings.at-3684-expected.lst:81.7-81.8: - 78 000041 03 PIC AN. - 79 error: N cannot follow A or X - 80 000042 03 PIC AZ(3). - 81 > error: a Z or * which is before the decimal point cannot follow A or X ----- ^ - 82 000043 03 PIC 99.99XXXXX. - 83 error: A or X cannot follow . ->> Error: Invalid syntax - -listings.at-3684-expected.lst:83.7-83.8: - 80 000042 03 PIC AZ(3). - 81 error: a Z or * which is before the decimal point cannot follow A or X - 82 000043 03 PIC 99.99XXXXX. - 83 > error: A or X cannot follow . + 73 000040 03 PIC NX. + 74 > error: A or X cannot follow N ---- ^ - 84 000044 03 PIC SA. - 85 error: A or X cannot follow S + 75 000041 03 PIC AN. + 76 error: N cannot follow A or X >> Error: Invalid syntax -listings.at-3684-expected.lst:85.7-85.8: - 82 000043 03 PIC 99.99XXXXX. - 83 error: A or X cannot follow . - 84 000044 03 PIC SA. - 85 > error: A or X cannot follow S +listings.at-3669-expected.lst:76.7-76.8: + 73 000040 03 PIC NX. + 74 error: A or X cannot follow N + 75 000041 03 PIC AN. + 76 > error: N cannot follow A or X ---- ^ - 86 000045 03 PIC $$$B+++B---. - 87 error: a leading +/- sign cannot follow B, 0 or / + 77 000042 03 PIC AZ(3). + 78 error: a Z or * which is before the decimal point cannot follow A or X >> Error: Invalid syntax -listings.at-3684-expected.lst:87.7-87.8: - 84 000044 03 PIC SA. - 85 error: A or X cannot follow S - 86 000045 03 PIC $$$B+++B---. - 87 > error: a leading +/- sign cannot follow B, 0 or / +listings.at-3669-expected.lst:78.7-78.8: + 75 000041 03 PIC AN. + 76 error: N cannot follow A or X + 77 000042 03 PIC AZ(3). + 78 > error: a Z or * which is before the decimal point cannot follow A or X ---- ^ - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point ->> Error: Invalid syntax - -listings.at-3684-expected.lst:87.45-87.47: - 84 000044 03 PIC SA. - 85 error: A or X cannot follow S - 86 000045 03 PIC $$$B+++B---. - 87 > error: a leading +/- sign cannot follow B, 0 or / ----- ^^ - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point ->> Error: Invalid syntax - -listings.at-3684-expected.lst:88.17-88.18: - 85 error: A or X cannot follow S - 86 000045 03 PIC $$$B+++B---. - 87 error: a leading +/- sign cannot follow B, 0 or / - 88 > error: a leading +/- sign cannot follow a floating currency symbol string ----- ^ - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string ->> Error: Invalid syntax - -listings.at-3684-expected.lst:88.26-88.32: - 85 error: A or X cannot follow S - 86 000045 03 PIC $$$B+++B---. - 87 error: a leading +/- sign cannot follow B, 0 or / - 88 > error: a leading +/- sign cannot follow a floating currency symbol string ----- ^^^^^^ - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string ->> Error: Invalid syntax - -listings.at-3684-expected.lst:89.16-89.22: - 86 000045 03 PIC $$$B+++B---. - 87 error: a leading +/- sign cannot follow B, 0 or / - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 > + which is before the decimal point ----- ^^^^^^ - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 error: a trailing +/- sign cannot follow a leading +/- sign + 79 000043 03 PIC 99.99XXXXX. + 80 error: A or X cannot follow . >> Error: Invalid syntax -listings.at-3684-expected.lst:90.17-90.18: - 87 error: a leading +/- sign cannot follow B, 0 or / - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point - 90 > error: a leading +/- sign may only occur once in a PICTURE string ----- ^ - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 error: a trailing +/- sign may only occur once in a PICTURE string ->> Error: Invalid syntax - -listings.at-3684-expected.lst:90.25: - 87 error: a leading +/- sign cannot follow B, 0 or / - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point - 90 > error: a leading +/- sign may only occur once in a PICTURE string ----- ^ - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 error: a trailing +/- sign may only occur once in a PICTURE string ->> Hint: Missing LEADING - -listings.at-3684-expected.lst:90.26-90.29: - 87 error: a leading +/- sign cannot follow B, 0 or / - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point - 90 > error: a leading +/- sign may only occur once in a PICTURE string ----- ^^^ - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 error: a trailing +/- sign may only occur once in a PICTURE string ->> Error: Invalid syntax - -listings.at-3684-expected.lst:91.7-91.8: - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 > error: a trailing +/- sign cannot follow a leading +/- sign +listings.at-3669-expected.lst:80.7-80.8: + 77 000042 03 PIC AZ(3). + 78 error: a Z or * which is before the decimal point cannot follow A or X + 79 000043 03 PIC 99.99XXXXX. + 80 > error: A or X cannot follow . ---- ^ - 92 error: a trailing +/- sign may only occur once in a PICTURE string - 93 000046 03 PIC +++9+. ->> Error: Invalid syntax - -listings.at-3684-expected.lst:91.18-91.19: - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 > error: a trailing +/- sign cannot follow a leading +/- sign ----- ^ - 92 error: a trailing +/- sign may only occur once in a PICTURE string - 93 000046 03 PIC +++9+. ->> Error: Invalid syntax - -listings.at-3684-expected.lst:91.27-91.33: - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 > error: a trailing +/- sign cannot follow a leading +/- sign ----- ^^^^^^ - 92 error: a trailing +/- sign may only occur once in a PICTURE string - 93 000046 03 PIC +++9+. ->> Error: Invalid syntax - -listings.at-3684-expected.lst:91.51-91.52: - 88 error: a leading +/- sign cannot follow a floating currency symbol string - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 > error: a trailing +/- sign cannot follow a leading +/- sign ----- ^ - 92 error: a trailing +/- sign may only occur once in a PICTURE string - 93 000046 03 PIC +++9+. + 81 000044 03 PIC SA. + 82 error: A or X cannot follow S >> Error: Invalid syntax -listings.at-3684-expected.lst:92.7-92.8: - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 > error: a trailing +/- sign may only occur once in a PICTURE string +listings.at-3669-expected.lst:82.7-82.8: + 79 000043 03 PIC 99.99XXXXX. + 80 error: A or X cannot follow . + 81 000044 03 PIC SA. + 82 > error: A or X cannot follow S ---- ^ - 93 000046 03 PIC +++9+. - 94 error: a trailing +/- sign cannot follow a floating +/- string which is before ->> Error: Invalid syntax - -listings.at-3684-expected.lst:92.18-92.19: - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 > error: a trailing +/- sign may only occur once in a PICTURE string ----- ^ - 93 000046 03 PIC +++9+. - 94 error: a trailing +/- sign cannot follow a floating +/- string which is before + 83 000045 03 PIC $$$B+++B---. + 84 error: only one of the symbols '-' , '+' or '$' may occur multiple times in a >> Error: Invalid syntax -listings.at-3684-expected.lst:92.26: - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 > error: a trailing +/- sign may only occur once in a PICTURE string ----- ^ - 93 000046 03 PIC +++9+. - 94 error: a trailing +/- sign cannot follow a floating +/- string which is before ->> Hint: Missing LEADING - -listings.at-3684-expected.lst:92.27-92.30: - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 > error: a trailing +/- sign may only occur once in a PICTURE string ----- ^^^ - 93 000046 03 PIC +++9+. - 94 error: a trailing +/- sign cannot follow a floating +/- string which is before ->> Error: Invalid syntax - -listings.at-3684-expected.lst:92.66: - 89 + which is before the decimal point - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 > error: a trailing +/- sign may only occur once in a PICTURE string ----- ^ - 93 000046 03 PIC +++9+. - 94 error: a trailing +/- sign cannot follow a floating +/- string which is before ->> Hint: Missing . - -listings.at-3684-expected.lst:93.19-93.21: - 90 error: a leading +/- sign may only occur once in a PICTURE string - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 error: a trailing +/- sign may only occur once in a PICTURE string - 93 > 000046 03 PIC +++9+. ----- ^^ - 94 error: a trailing +/- sign cannot follow a floating +/- string which is before - 95 + the decimal point +listings.at-3669-expected.lst:84.7-84.11: + 81 000044 03 PIC SA. + 82 error: A or X cannot follow S + 83 000045 03 PIC $$$B+++B---. + 84 > error: only one of the symbols '-' , '+' or '$' may occur multiple times in a +---- ^^^^ + 85 + PICTURE string + 86 000046 03 PIC +++9+. >> Error: Invalid syntax -listings.at-3684-expected.lst:94.7-94.8: - 91 error: a trailing +/- sign cannot follow a leading +/- sign - 92 error: a trailing +/- sign may only occur once in a PICTURE string - 93 000046 03 PIC +++9+. - 94 > error: a trailing +/- sign cannot follow a floating +/- string which is before ----- ^ - 95 + the decimal point - 96 000047 03 PIC +9(5)CR. +listings.at-3669-expected.lst:87.7-87.15: + 84 error: only one of the symbols '-' , '+' or '$' may occur multiple times in a + 85 + PICTURE string + 86 000046 03 PIC +++9+. + 87 > error: floating '+' symbols cannot have a '9' between them +---- ^^^^^^^^ + 88 000047 03 PIC +9(5)CR. + 89 error: CR or DB cannot follow a leading +/- sign >> Error: Invalid syntax -listings.at-3684-expected.lst:97.7-97.9: - 94 error: a trailing +/- sign cannot follow a floating +/- string which is before - 95 + the decimal point - 96 000047 03 PIC +9(5)CR. - 97 > error: CR or DB cannot follow a leading +/- sign +listings.at-3669-expected.lst:89.7-89.9: + 86 000046 03 PIC +++9+. + 87 error: floating '+' symbols cannot have a '9' between them + 88 000047 03 PIC +9(5)CR. + 89 > error: CR or DB cannot follow a leading +/- sign ---- ^^ - 98 000048 03 PIC -9(5)DB. - 99 error: CR or DB cannot follow a leading +/- sign + 90 000048 03 PIC -9(5)DB. + 91 error: CR or DB cannot follow a leading +/- sign >> Error: Invalid syntax -listings.at-3684-expected.lst:99.7-99.9: - 96 000047 03 PIC +9(5)CR. - 97 error: CR or DB cannot follow a leading +/- sign - 98 000048 03 PIC -9(5)DB. - 99 > error: CR or DB cannot follow a leading +/- sign +listings.at-3669-expected.lst:91.7-91.9: + 88 000047 03 PIC +9(5)CR. + 89 error: CR or DB cannot follow a leading +/- sign + 90 000048 03 PIC -9(5)DB. + 91 > error: CR or DB cannot follow a leading +/- sign ---- ^^ - 100 000049 01 non-rightmost-leftmost-symbols. - 101 000050 03 PIC BBB+BB99. + 92 000049 01 non-rightmost-leftmost-symbols. + 93 000050 03 PIC BBB+BB99. >> Error: Invalid syntax -listings.at-3684-expected.lst:102.7-102.8: - 99 error: CR or DB cannot follow a leading +/- sign - 100 000049 01 non-rightmost-leftmost-symbols. - 101 000050 03 PIC BBB+BB99. - 102 > error: a leading +/- sign cannot follow B, 0 or / +listings.at-3669-expected.lst:94.7-94.8: + 91 error: CR or DB cannot follow a leading +/- sign + 92 000049 01 non-rightmost-leftmost-symbols. + 93 000050 03 PIC BBB+BB99. + 94 > error: a leading +/- sign cannot follow B, 0 or / ---- ^ - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 >> Error: Invalid syntax -listings.at-3684-expected.lst:102.44: - 99 error: CR or DB cannot follow a leading +/- sign - 100 000049 01 non-rightmost-leftmost-symbols. - 101 000050 03 PIC BBB+BB99. - 102 > error: a leading +/- sign cannot follow B, 0 or / +listings.at-3669-expected.lst:94.44: + 91 error: CR or DB cannot follow a leading +/- sign + 92 000049 01 non-rightmost-leftmost-symbols. + 93 000050 03 PIC BBB+BB99. + 94 > error: a leading +/- sign cannot follow B, 0 or / ---- ^ - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 >> Hint: Missing . -listings.at-3684-expected.lst:102.45-102.47: - 99 error: CR or DB cannot follow a leading +/- sign - 100 000049 01 non-rightmost-leftmost-symbols. - 101 000050 03 PIC BBB+BB99. - 102 > error: a leading +/- sign cannot follow B, 0 or / +listings.at-3669-expected.lst:94.45-94.47: + 91 error: CR or DB cannot follow a leading +/- sign + 92 000049 01 non-rightmost-leftmost-symbols. + 93 000050 03 PIC BBB+BB99. + 94 > error: a leading +/- sign cannot follow B, 0 or / ---- ^^ - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 >> Error: Invalid syntax -listings.at-3684-expected.lst:104.7-104.8: - 101 000050 03 PIC BBB+BB99. - 102 error: a leading +/- sign cannot follow B, 0 or / - 103 000051 03 PIC 99-B. - 104 > error: a leading +/- sign cannot follow 9 +listings.at-3669-expected.lst:96.7-96.8: + 93 000050 03 PIC BBB+BB99. + 94 error: a leading +/- sign cannot follow B, 0 or / + 95 000051 03 PIC 99-B. + 96 > error: a leading +/- sign cannot follow 9 ---- ^ - 105 000052 03 PIC 9CRB. - 106 error: B, 0 or / cannot follow CR or DB + 97 000052 03 PIC 9CRB. + 98 error: B, 0 or / cannot follow CR or DB >> Error: Invalid syntax -listings.at-3684-expected.lst:104.41: - 101 000050 03 PIC BBB+BB99. - 102 error: a leading +/- sign cannot follow B, 0 or / - 103 000051 03 PIC 99-B. - 104 > error: a leading +/- sign cannot follow 9 +listings.at-3669-expected.lst:96.41: + 93 000050 03 PIC BBB+BB99. + 94 error: a leading +/- sign cannot follow B, 0 or / + 95 000051 03 PIC 99-B. + 96 > error: a leading +/- sign cannot follow 9 ---- ^ - 105 000052 03 PIC 9CRB. - 106 error: B, 0 or / cannot follow CR or DB + 97 000052 03 PIC 9CRB. + 98 error: B, 0 or / cannot follow CR or DB >> Hint: Missing . -listings.at-3684-expected.lst:105.19-105.21: - 102 error: a leading +/- sign cannot follow B, 0 or / - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 - 105 > 000052 03 PIC 9CRB. +listings.at-3669-expected.lst:97.19-97.21: + 94 error: a leading +/- sign cannot follow B, 0 or / + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 + 97 > 000052 03 PIC 9CRB. ---- ^^ - 106 error: B, 0 or / cannot follow CR or DB - 107 000053 03 PIC DB9(5). + 98 error: B, 0 or / cannot follow CR or DB + 99 000053 03 PIC DB9(5). >> Error: Invalid syntax -listings.at-3684-expected.lst:106.7-106.8: - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 - 105 000052 03 PIC 9CRB. - 106 > error: B, 0 or / cannot follow CR or DB +listings.at-3669-expected.lst:98.7-98.8: + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 + 97 000052 03 PIC 9CRB. + 98 > error: B, 0 or / cannot follow CR or DB ---- ^ - 107 000053 03 PIC DB9(5). - 108 error: 9 cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 error: 9 cannot follow CR or DB >> Error: Invalid syntax -listings.at-3684-expected.lst:106.12-106.14: - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 - 105 000052 03 PIC 9CRB. - 106 > error: B, 0 or / cannot follow CR or DB +listings.at-3669-expected.lst:98.12-98.14: + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 + 97 000052 03 PIC 9CRB. + 98 > error: B, 0 or / cannot follow CR or DB ---- ^^ - 107 000053 03 PIC DB9(5). - 108 error: 9 cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 error: 9 cannot follow CR or DB >> Error: Invalid syntax -listings.at-3684-expected.lst:106.23: - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 - 105 000052 03 PIC 9CRB. - 106 > error: B, 0 or / cannot follow CR or DB +listings.at-3669-expected.lst:98.23: + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 + 97 000052 03 PIC 9CRB. + 98 > error: B, 0 or / cannot follow CR or DB ---- ^ - 107 000053 03 PIC DB9(5). - 108 error: 9 cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 error: 9 cannot follow CR or DB >> Hint: Missing RENAMES -listings.at-3684-expected.lst:106.24-106.30: - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 - 105 000052 03 PIC 9CRB. - 106 > error: B, 0 or / cannot follow CR or DB +listings.at-3669-expected.lst:98.24-98.30: + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 + 97 000052 03 PIC 9CRB. + 98 > error: B, 0 or / cannot follow CR or DB ---- ^^^^^^ - 107 000053 03 PIC DB9(5). - 108 error: 9 cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 error: 9 cannot follow CR or DB >> Error: Invalid syntax -listings.at-3684-expected.lst:106.30: - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 - 105 000052 03 PIC 9CRB. - 106 > error: B, 0 or / cannot follow CR or DB +listings.at-3669-expected.lst:98.30: + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 + 97 000052 03 PIC 9CRB. + 98 > error: B, 0 or / cannot follow CR or DB ---- ^ - 107 000053 03 PIC DB9(5). - 108 error: 9 cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 error: 9 cannot follow CR or DB >> Hint: Missing . -listings.at-3684-expected.lst:106.31-106.33: - 103 000051 03 PIC 99-B. - 104 error: a leading +/- sign cannot follow 9 - 105 000052 03 PIC 9CRB. - 106 > error: B, 0 or / cannot follow CR or DB +listings.at-3669-expected.lst:98.31-98.33: + 95 000051 03 PIC 99-B. + 96 error: a leading +/- sign cannot follow 9 + 97 000052 03 PIC 9CRB. + 98 > error: B, 0 or / cannot follow CR or DB ---- ^^ - 107 000053 03 PIC DB9(5). - 108 error: 9 cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 error: 9 cannot follow CR or DB >> Warning: Invalid syntax -listings.at-3684-expected.lst:108.15: - 105 000052 03 PIC 9CRB. - 106 error: B, 0 or / cannot follow CR or DB - 107 000053 03 PIC DB9(5). - 108 > error: 9 cannot follow CR or DB +listings.at-3669-expected.lst:100.15: + 97 000052 03 PIC 9CRB. + 98 error: B, 0 or / cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 > error: 9 cannot follow CR or DB ---- ^ - 109 000054 03 PIC 99$$$. - 110 error: a floating currency symbol string which is before the decimal point + 101 000054 03 PIC 99$$$. + 102 error: a floating currency symbol string which is before the decimal point >> Hint: Missing RENAMES -listings.at-3684-expected.lst:108.16-108.22: - 105 000052 03 PIC 9CRB. - 106 error: B, 0 or / cannot follow CR or DB - 107 000053 03 PIC DB9(5). - 108 > error: 9 cannot follow CR or DB +listings.at-3669-expected.lst:100.16-100.22: + 97 000052 03 PIC 9CRB. + 98 error: B, 0 or / cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 > error: 9 cannot follow CR or DB ---- ^^^^^^ - 109 000054 03 PIC 99$$$. - 110 error: a floating currency symbol string which is before the decimal point + 101 000054 03 PIC 99$$$. + 102 error: a floating currency symbol string which is before the decimal point >> Error: Invalid syntax -listings.at-3684-expected.lst:108.22: - 105 000052 03 PIC 9CRB. - 106 error: B, 0 or / cannot follow CR or DB - 107 000053 03 PIC DB9(5). - 108 > error: 9 cannot follow CR or DB +listings.at-3669-expected.lst:100.22: + 97 000052 03 PIC 9CRB. + 98 error: B, 0 or / cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 > error: 9 cannot follow CR or DB ---- ^ - 109 000054 03 PIC 99$$$. - 110 error: a floating currency symbol string which is before the decimal point + 101 000054 03 PIC 99$$$. + 102 error: a floating currency symbol string which is before the decimal point >> Hint: Missing . -listings.at-3684-expected.lst:108.23-108.25: - 105 000052 03 PIC 9CRB. - 106 error: B, 0 or / cannot follow CR or DB - 107 000053 03 PIC DB9(5). - 108 > error: 9 cannot follow CR or DB +listings.at-3669-expected.lst:100.23-100.25: + 97 000052 03 PIC 9CRB. + 98 error: B, 0 or / cannot follow CR or DB + 99 000053 03 PIC DB9(5). + 100 > error: 9 cannot follow CR or DB ---- ^^ - 109 000054 03 PIC 99$$$. - 110 error: a floating currency symbol string which is before the decimal point + 101 000054 03 PIC 99$$$. + 102 error: a floating currency symbol string which is before the decimal point >> Warning: Invalid syntax -listings.at-3684-expected.lst:110.7-110.8: - 107 000053 03 PIC DB9(5). - 108 error: 9 cannot follow CR or DB - 109 000054 03 PIC 99$$$. - 110 > error: a floating currency symbol string which is before the decimal point +listings.at-3669-expected.lst:102.7-102.8: + 99 000053 03 PIC DB9(5). + 100 error: 9 cannot follow CR or DB + 101 000054 03 PIC 99$$$. + 102 > error: a floating currency symbol string which is before the decimal point ---- ^ - 111 + cannot follow 9 - 112 000055 03 PIC 99$B. + 103 + cannot follow 9 + 104 000055 03 PIC 99$B. >> Error: Invalid syntax -listings.at-3684-expected.lst:111.22: - 108 error: 9 cannot follow CR or DB - 109 000054 03 PIC 99$$$. - 110 error: a floating currency symbol string which is before the decimal point - 111 > + cannot follow 9 +listings.at-3669-expected.lst:103.22: + 100 error: 9 cannot follow CR or DB + 101 000054 03 PIC 99$$$. + 102 error: a floating currency symbol string which is before the decimal point + 103 > + cannot follow 9 ---- ^ - 112 000055 03 PIC 99$B. - 113 error: a leading currency symbol cannot follow 9 + 104 000055 03 PIC 99$B. + 105 error: B, 0 or / cannot follow a trailing currency symbol >> Hint: Missing . -listings.at-3684-expected.lst:112.19-112.21: - 109 000054 03 PIC 99$$$. - 110 error: a floating currency symbol string which is before the decimal point - 111 + cannot follow 9 - 112 > 000055 03 PIC 99$B. +listings.at-3669-expected.lst:104.19-104.21: + 101 000054 03 PIC 99$$$. + 102 error: a floating currency symbol string which is before the decimal point + 103 + cannot follow 9 + 104 > 000055 03 PIC 99$B. ---- ^^ - 113 error: a leading currency symbol cannot follow 9 - 114 000056 03 PIC 0$99. + 105 error: B, 0 or / cannot follow a trailing currency symbol + 106 000056 03 PIC 0$99. >> Error: Invalid syntax -listings.at-3684-expected.lst:113.7-113.8: - 110 error: a floating currency symbol string which is before the decimal point - 111 + cannot follow 9 - 112 000055 03 PIC 99$B. - 113 > error: a leading currency symbol cannot follow 9 +listings.at-3669-expected.lst:105.7-105.8: + 102 error: a floating currency symbol string which is before the decimal point + 103 + cannot follow 9 + 104 000055 03 PIC 99$B. + 105 > error: B, 0 or / cannot follow a trailing currency symbol ---- ^ - 114 000056 03 PIC 0$99. - 115 error: a leading currency symbol cannot follow B, 0 or / + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / >> Error: Invalid syntax -listings.at-3684-expected.lst:113.48: - 110 error: a floating currency symbol string which is before the decimal point - 111 + cannot follow 9 - 112 000055 03 PIC 99$B. - 113 > error: a leading currency symbol cannot follow 9 ----- ^ - 114 000056 03 PIC 0$99. - 115 error: a leading currency symbol cannot follow B, 0 or / ->> Hint: Missing . +listings.at-3669-expected.lst:105.12-105.14: + 102 error: a floating currency symbol string which is before the decimal point + 103 + cannot follow 9 + 104 000055 03 PIC 99$B. + 105 > error: B, 0 or / cannot follow a trailing currency symbol +---- ^^ + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / +>> Error: Invalid syntax -listings.at-3684-expected.lst:114.19-114.21: - 111 + cannot follow 9 - 112 000055 03 PIC 99$B. - 113 error: a leading currency symbol cannot follow 9 - 114 > 000056 03 PIC 0$99. ----- ^^ - 115 error: a leading currency symbol cannot follow B, 0 or / - 116 000057 03 PIC PPPVP9. +listings.at-3669-expected.lst:105.23: + 102 error: a floating currency symbol string which is before the decimal point + 103 + cannot follow 9 + 104 000055 03 PIC 99$B. + 105 > error: B, 0 or / cannot follow a trailing currency symbol +---- ^ + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / +>> Hint: Missing RENAMES + +listings.at-3669-expected.lst:105.24-105.30: + 102 error: a floating currency symbol string which is before the decimal point + 103 + cannot follow 9 + 104 000055 03 PIC 99$B. + 105 > error: B, 0 or / cannot follow a trailing currency symbol +---- ^^^^^^ + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / >> Error: Invalid syntax -listings.at-3684-expected.lst:115.7-115.8: - 112 000055 03 PIC 99$B. - 113 error: a leading currency symbol cannot follow 9 - 114 000056 03 PIC 0$99. - 115 > error: a leading currency symbol cannot follow B, 0 or / +listings.at-3669-expected.lst:105.30: + 102 error: a floating currency symbol string which is before the decimal point + 103 + cannot follow 9 + 104 000055 03 PIC 99$B. + 105 > error: B, 0 or / cannot follow a trailing currency symbol +---- ^ + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / +>> Hint: Missing . + +listings.at-3669-expected.lst:105.31-105.32: + 102 error: a floating currency symbol string which is before the decimal point + 103 + cannot follow 9 + 104 000055 03 PIC 99$B. + 105 > error: B, 0 or / cannot follow a trailing currency symbol +---- ^ + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / +>> Warning: Invalid syntax + +listings.at-3669-expected.lst:107.7-107.8: + 104 000055 03 PIC 99$B. + 105 error: B, 0 or / cannot follow a trailing currency symbol + 106 000056 03 PIC 0$99. + 107 > error: a leading currency symbol cannot follow B, 0 or / ---- ^ - 116 000057 03 PIC PPPVP9. - 117 error: P must be at start or end of PICTURE string + 108 000057 03 PIC PPPVP9. + 109 error: P must be at start or end of PICTURE string >> Error: Invalid syntax -listings.at-3684-expected.lst:115.51: - 112 000055 03 PIC 99$B. - 113 error: a leading currency symbol cannot follow 9 - 114 000056 03 PIC 0$99. - 115 > error: a leading currency symbol cannot follow B, 0 or / +listings.at-3669-expected.lst:107.51: + 104 000055 03 PIC 99$B. + 105 error: B, 0 or / cannot follow a trailing currency symbol + 106 000056 03 PIC 0$99. + 107 > error: a leading currency symbol cannot follow B, 0 or / ---- ^ - 116 000057 03 PIC PPPVP9. - 117 error: P must be at start or end of PICTURE string + 108 000057 03 PIC PPPVP9. + 109 error: P must be at start or end of PICTURE string >> Hint: Missing . -listings.at-3684-expected.lst:115.52-115.54: - 112 000055 03 PIC 99$B. - 113 error: a leading currency symbol cannot follow 9 - 114 000056 03 PIC 0$99. - 115 > error: a leading currency symbol cannot follow B, 0 or / +listings.at-3669-expected.lst:107.52-107.54: + 104 000055 03 PIC 99$B. + 105 error: B, 0 or / cannot follow a trailing currency symbol + 106 000056 03 PIC 0$99. + 107 > error: a leading currency symbol cannot follow B, 0 or / ---- ^^ - 116 000057 03 PIC PPPVP9. - 117 error: P must be at start or end of PICTURE string + 108 000057 03 PIC PPPVP9. + 109 error: P must be at start or end of PICTURE string >> Error: Invalid syntax -listings.at-3684-expected.lst:117.7-117.8: - 114 000056 03 PIC 0$99. - 115 error: a leading currency symbol cannot follow B, 0 or / - 116 000057 03 PIC PPPVP9. - 117 > error: P must be at start or end of PICTURE string +listings.at-3669-expected.lst:109.7-109.8: + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / + 108 000057 03 PIC PPPVP9. + 109 > error: P must be at start or end of PICTURE string ---- ^ - 118 error: V cannot follow a P which is after the decimal point - 119 000058 01 missing-symbols. + 110 error: V cannot follow a P which is after the decimal point + 111 000058 01 missing-symbols. >> Error: Invalid syntax -listings.at-3684-expected.lst:117.32: - 114 000056 03 PIC 0$99. - 115 error: a leading currency symbol cannot follow B, 0 or / - 116 000057 03 PIC PPPVP9. - 117 > error: P must be at start or end of PICTURE string +listings.at-3669-expected.lst:109.32: + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / + 108 000057 03 PIC PPPVP9. + 109 > error: P must be at start or end of PICTURE string ---- ^ - 118 error: V cannot follow a P which is after the decimal point - 119 000058 01 missing-symbols. + 110 error: V cannot follow a P which is after the decimal point + 111 000058 01 missing-symbols. >> Hint: Missing PROGRAM -listings.at-3684-expected.lst:117.33-117.35: - 114 000056 03 PIC 0$99. - 115 error: a leading currency symbol cannot follow B, 0 or / - 116 000057 03 PIC PPPVP9. - 117 > error: P must be at start or end of PICTURE string +listings.at-3669-expected.lst:109.33-109.35: + 106 000056 03 PIC 0$99. + 107 error: a leading currency symbol cannot follow B, 0 or / + 108 000057 03 PIC PPPVP9. + 109 > error: P must be at start or end of PICTURE string ---- ^^ - 118 error: V cannot follow a P which is after the decimal point - 119 000058 01 missing-symbols. + 110 error: V cannot follow a P which is after the decimal point + 111 000058 01 missing-symbols. >> Error: Invalid syntax -listings.at-3684-expected.lst:119.19-119.34: - 116 000057 03 PIC PPPVP9. - 117 error: P must be at start or end of PICTURE string - 118 error: V cannot follow a P which is after the decimal point - 119 > 000058 01 missing-symbols. +listings.at-3669-expected.lst:111.19-111.34: + 108 000057 03 PIC PPPVP9. + 109 error: P must be at start or end of PICTURE string + 110 error: V cannot follow a P which is after the decimal point + 111 > 000058 01 missing-symbols. ---- ^^^^^^^^^^^^^^^ - 120 000059 03 PIC B(5). - 121 error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 + 112 000059 03 PIC B(5). + 113 error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 >> Error: Invalid syntax -listings.at-3684-expected.lst:120.19-120.21: - 117 error: P must be at start or end of PICTURE string - 118 error: V cannot follow a P which is after the decimal point - 119 000058 01 missing-symbols. - 120 > 000059 03 PIC B(5). +listings.at-3669-expected.lst:112.19-112.21: + 109 error: P must be at start or end of PICTURE string + 110 error: V cannot follow a P which is after the decimal point + 111 000058 01 missing-symbols. + 112 > 000059 03 PIC B(5). ---- ^^ - 121 error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 - 122 + and *; or at least two of the set +, - and the currency symbol + 113 error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 + 114 + and *; or at least two of the set +, - and the currency symbol >> Error: Invalid syntax -listings.at-3684-expected.lst:153.6-153.7: - 150 000079 03 PIC ++.++. - 151 000080 03 PIC $(integer-constant). - 152 000081 03 PIC $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ - 153 > warning: uncommon parentheses +listings.at-3669-expected.lst:145.6-145.7: + 142 000079 03 PIC ++.++. + 143 000080 03 PIC $(integer-constant). + 144 000081 03 PIC $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ + 145 > warning: uncommon parentheses ---- ^ - 154 000082 -(integer-constant). *> CHECKME: should this be really valid? - 155 000083 + 146 000082 -(integer-constant). *> CHECKME: should this be really valid? + 147 000083 >> Error: Unexpected indicator: `g' -listings.at-3684-expected.lst:158.68-158.72: - 155 000083 - 156 000084 - 157 000085 01 PC-COLOR-BACKGROUND-TABLE. - 158 > 000086 05 BIT-BACKGROUND-BLACK PIC 1(8) BIT VALUE B"00000000". +listings.at-3669-expected.lst:150.68-150.72: + 147 000083 + 148 000084 + 149 000085 01 PC-COLOR-BACKGROUND-TABLE. + 150 > 000086 05 BIT-BACKGROUND-BLACK PIC 1(8) BIT VALUE B"00000000". ---- ^^^^ - 159 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". - 160 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". + 151 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". + 152 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". >> Error: Missing continuation of `00' -listings.at-3684-expected.lst:159.68-159.72: - 156 000084 - 157 000085 01 PC-COLOR-BACKGROUND-TABLE. - 158 000086 05 BIT-BACKGROUND-BLACK PIC 1(8) BIT VALUE B"00000000". - 159 > 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". +listings.at-3669-expected.lst:151.68-151.72: + 148 000084 + 149 000085 01 PC-COLOR-BACKGROUND-TABLE. + 150 000086 05 BIT-BACKGROUND-BLACK PIC 1(8) BIT VALUE B"00000000". + 151 > 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". ---- ^^^^ - 160 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". - 161 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". + 152 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". + 153 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". >> Error: Missing continuation of `00' -listings.at-3684-expected.lst:160.68-160.72: - 157 000085 01 PC-COLOR-BACKGROUND-TABLE. - 158 000086 05 BIT-BACKGROUND-BLACK PIC 1(8) BIT VALUE B"00000000". - 159 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". - 160 > 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". +listings.at-3669-expected.lst:152.68-152.72: + 149 000085 01 PC-COLOR-BACKGROUND-TABLE. + 150 000086 05 BIT-BACKGROUND-BLACK PIC 1(8) BIT VALUE B"00000000". + 151 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". + 152 > 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". ---- ^^^^ - 161 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". - 162 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". + 153 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". + 154 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". >> Error: Missing continuation of `00' -listings.at-3684-expected.lst:161.68-161.72: - 158 000086 05 BIT-BACKGROUND-BLACK PIC 1(8) BIT VALUE B"00000000". - 159 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". - 160 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". - 161 > 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". +listings.at-3669-expected.lst:153.68-153.72: + 150 000086 05 BIT-BACKGROUND-BLACK PIC 1(8) BIT VALUE B"00000000". + 151 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". + 152 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". + 153 > 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". ---- ^^^^ - 162 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". - 163 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". + 154 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". + 155 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". >> Error: Missing continuation of `00' -listings.at-3684-expected.lst:162.68-162.72: - 159 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". - 160 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". - 161 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". - 162 > 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". +listings.at-3669-expected.lst:154.68-154.72: + 151 000087 05 BIT-BACKGROUND-BLUE PIC 1(8) BIT VALUE B"00010000". + 152 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". + 153 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". + 154 > 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". ---- ^^^^ - 163 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". - 164 000092 05 BIT-BACKGROUND-BROWN PIC 1(8) BIT VALUE B"01100000". + 155 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". + 156 000092 05 BIT-BACKGROUND-BROWN PIC 1(8) BIT VALUE B"01100000". >> Error: Missing continuation of `01' -listings.at-3684-expected.lst:163.68-163.72: - 160 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". - 161 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". - 162 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". - 163 > 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". +listings.at-3669-expected.lst:155.68-155.72: + 152 000088 05 BIT-BACKGROUND-GREEN PIC 1(8) BIT VALUE B"00100000". + 153 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". + 154 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". + 155 > 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". ---- ^^^^ - 164 000092 05 BIT-BACKGROUND-BROWN PIC 1(8) BIT VALUE B"01100000". - 165 000093 05 BIT-BACKGROUND-LIGHT-GRAY PIC 1(8) BIT VALUE B"01110000". + 156 000092 05 BIT-BACKGROUND-BROWN PIC 1(8) BIT VALUE B"01100000". + 157 000093 05 BIT-BACKGROUND-LIGHT-GRAY PIC 1(8) BIT VALUE B"01110000". >> Error: Missing continuation of `01' -listings.at-3684-expected.lst:164.68-164.72: - 161 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". - 162 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". - 163 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". - 164 > 000092 05 BIT-BACKGROUND-BROWN PIC 1(8) BIT VALUE B"01100000". +listings.at-3669-expected.lst:156.68-156.72: + 153 000089 05 BIT-BACKGROUND-CYAN PIC 1(8) BIT VALUE B"00110000". + 154 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". + 155 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". + 156 > 000092 05 BIT-BACKGROUND-BROWN PIC 1(8) BIT VALUE B"01100000". ---- ^^^^ - 165 000093 05 BIT-BACKGROUND-LIGHT-GRAY PIC 1(8) BIT VALUE B"01110000". - 166 000094 01 FILLER REDEFINES PC-COLOR-BACKGROUND-TABLE. + 157 000093 05 BIT-BACKGROUND-LIGHT-GRAY PIC 1(8) BIT VALUE B"01110000". + 158 000094 01 FILLER REDEFINES PC-COLOR-BACKGROUND-TABLE. >> Error: Missing continuation of `01' -listings.at-3684-expected.lst:165.68-165.72: - 162 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". - 163 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". - 164 000092 05 BIT-BACKGROUND-BROWN PIC 1(8) BIT VALUE B"01100000". - 165 > 000093 05 BIT-BACKGROUND-LIGHT-GRAY PIC 1(8) BIT VALUE B"01110000". +listings.at-3669-expected.lst:157.68-157.72: + 154 000090 05 BIT-BACKGROUND-RED PIC 1(8) BIT VALUE B"01000000". + 155 000091 05 BIT-BACKGROUND-MAGENTA PIC 1(8) BIT VALUE B"01010000". + 156 000092 05 BIT-BACKGROUND-BROWN PIC 1(8) BIT VALUE B"01100000". + 157 > 000093 05 BIT-BACKGROUND-LIGHT-GRAY PIC 1(8) BIT VALUE B"01110000". ---- ^^^^ - 166 000094 01 FILLER REDEFINES PC-COLOR-BACKGROUND-TABLE. - 167 000095 05 COLOR-BACKGROUND + 158 000094 01 FILLER REDEFINES PC-COLOR-BACKGROUND-TABLE. + 159 000095 05 COLOR-BACKGROUND >> Error: Missing continuation of `01' -listings.at-3684-expected.lst:170.6-170.7: - 167 000095 05 COLOR-BACKGROUND - 168 000096 OCCURS 8 TIMES PIC 1(8) BIT. +listings.at-3669-expected.lst:162.6-162.7: + 159 000095 05 COLOR-BACKGROUND + 160 000096 OCCURS 8 TIMES PIC 1(8) BIT. + 161 + 162 > SIZE TYPE LVL NAME PICTURE +---- ^ + 163 + 164 WORKING-STORAGE SECTION +>> Error: Unexpected indicator: `T' + +listings.at-3669-expected.lst:164.6-164.7: + 161 + 162 SIZE TYPE LVL NAME PICTURE + 163 + 164 > WORKING-STORAGE SECTION +---- ^ + 165 + 166 00000 ALPHANUMERIC 01 empty-pic INVALID +>> Error: Unexpected indicator: `W' + +listings.at-3669-expected.lst:166.6-166.7: + 163 + 164 WORKING-STORAGE SECTION + 165 + 166 > 00000 ALPHANUMERIC 01 empty-pic INVALID +---- ^ + 167 + 168 00077 ALPHANUMERIC 01 too-long-pic XXXXXXXXXXXXXXXXXXXX... +>> Error: Unexpected indicator: `A' + +listings.at-3669-expected.lst:168.6-168.7: + 165 + 166 00000 ALPHANUMERIC 01 empty-pic INVALID + 167 + 168 > 00077 ALPHANUMERIC 01 too-long-pic XXXXXXXXXXXXXXXXXXXX... +---- ^ 169 - 170 > SIZE TYPE LVL NAME PICTURE + 170 00000 ALPHANUMERIC 01 too-long-pic2 INVALID +>> Error: Unexpected indicator: `A' + +listings.at-3669-expected.lst:170.6-170.7: + 167 + 168 00077 ALPHANUMERIC 01 too-long-pic XXXXXXXXXXXXXXXXXXXX... + 169 + 170 > 00000 ALPHANUMERIC 01 too-long-pic2 INVALID ---- ^ 171 - 172 WORKING-STORAGE SECTION ->> Error: Unexpected indicator: `T' + 172 00000 GROUP 01 multiple-symbols +>> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:172.6-172.7: +listings.at-3669-expected.lst:172.6-172.7: 169 - 170 SIZE TYPE LVL NAME PICTURE + 170 00000 ALPHANUMERIC 01 too-long-pic2 INVALID 171 - 172 > WORKING-STORAGE SECTION + 172 > 00000 GROUP 01 multiple-symbols ---- ^ - 173 - 174 00000 ALPHANUMERIC 01 empty-pic INVALID ->> Error: Unexpected indicator: `W' + 173 00000 ALPHANUMERIC 03 FILLER INVALID + 174 00000 ALPHANUMERIC 03 FILLER INVALID +>> Error: Unexpected indicator: `G' -listings.at-3684-expected.lst:174.6-174.7: +listings.at-3669-expected.lst:173.6-173.7: + 170 00000 ALPHANUMERIC 01 too-long-pic2 INVALID 171 - 172 WORKING-STORAGE SECTION - 173 - 174 > 00000 ALPHANUMERIC 01 empty-pic INVALID + 172 00000 GROUP 01 multiple-symbols + 173 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 175 - 176 00077 ALPHANUMERIC 01 too-long-pic XXXXXXXXXXXXXXXXXXXX... + 174 00000 ALPHANUMERIC 03 FILLER INVALID + 175 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:176.6-176.7: - 173 - 174 00000 ALPHANUMERIC 01 empty-pic INVALID - 175 - 176 > 00077 ALPHANUMERIC 01 too-long-pic XXXXXXXXXXXXXXXXXXXX... +listings.at-3669-expected.lst:174.6-174.7: + 171 + 172 00000 GROUP 01 multiple-symbols + 173 00000 ALPHANUMERIC 03 FILLER INVALID + 174 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 177 - 178 00000 ALPHANUMERIC 01 too-long-pic2 INVALID + 175 00000 ALPHANUMERIC 03 FILLER INVALID + 176 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:178.6-178.7: - 175 - 176 00077 ALPHANUMERIC 01 too-long-pic XXXXXXXXXXXXXXXXXXXX... - 177 - 178 > 00000 ALPHANUMERIC 01 too-long-pic2 INVALID +listings.at-3669-expected.lst:175.6-175.7: + 172 00000 GROUP 01 multiple-symbols + 173 00000 ALPHANUMERIC 03 FILLER INVALID + 174 00000 ALPHANUMERIC 03 FILLER INVALID + 175 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 179 - 180 00000 GROUP 01 multiple-symbols + 176 00000 ALPHANUMERIC 03 FILLER INVALID + 177 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:180.6-180.7: - 177 - 178 00000 ALPHANUMERIC 01 too-long-pic2 INVALID - 179 - 180 > 00000 GROUP 01 multiple-symbols +listings.at-3669-expected.lst:176.6-176.7: + 173 00000 ALPHANUMERIC 03 FILLER INVALID + 174 00000 ALPHANUMERIC 03 FILLER INVALID + 175 00000 ALPHANUMERIC 03 FILLER INVALID + 176 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 181 00000 ALPHANUMERIC 03 FILLER INVALID - 182 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `G' + 177 00000 ALPHANUMERIC 03 FILLER INVALID + 178 00000 ALPHANUMERIC 03 FILLER INVALID +>> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:181.6-181.7: - 178 00000 ALPHANUMERIC 01 too-long-pic2 INVALID - 179 - 180 00000 GROUP 01 multiple-symbols - 181 > 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:177.6-177.7: + 174 00000 ALPHANUMERIC 03 FILLER INVALID + 175 00000 ALPHANUMERIC 03 FILLER INVALID + 176 00000 ALPHANUMERIC 03 FILLER INVALID + 177 > 00000 ALPHANUMERIC 03 FILLER INVALID +---- ^ + 178 00000 ALPHANUMERIC 03 FILLER INVALID + 179 00000 ALPHANUMERIC 03 FILLER INVALID +>> Error: Unexpected indicator: `A' + +listings.at-3669-expected.lst:178.6-178.7: + 175 00000 ALPHANUMERIC 03 FILLER INVALID + 176 00000 ALPHANUMERIC 03 FILLER INVALID + 177 00000 ALPHANUMERIC 03 FILLER INVALID + 178 > 00000 ALPHANUMERIC 03 FILLER INVALID +---- ^ + 179 00000 ALPHANUMERIC 03 FILLER INVALID + 180 +>> Error: Unexpected indicator: `A' + +listings.at-3669-expected.lst:179.6-179.7: + 176 00000 ALPHANUMERIC 03 FILLER INVALID + 177 00000 ALPHANUMERIC 03 FILLER INVALID + 178 00000 ALPHANUMERIC 03 FILLER INVALID + 179 > 00000 ALPHANUMERIC 03 FILLER INVALID +---- ^ + 180 + 181 00000 GROUP 01 non-symbols +>> Error: Unexpected indicator: `A' + +listings.at-3669-expected.lst:181.6-181.7: + 178 00000 ALPHANUMERIC 03 FILLER INVALID + 179 00000 ALPHANUMERIC 03 FILLER INVALID + 180 + 181 > 00000 GROUP 01 non-symbols ---- ^ 182 00000 ALPHANUMERIC 03 FILLER INVALID 183 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `A' +>> Error: Unexpected indicator: `G' -listings.at-3684-expected.lst:182.6-182.7: - 179 - 180 00000 GROUP 01 multiple-symbols - 181 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:182.6-182.7: + 179 00000 ALPHANUMERIC 03 FILLER INVALID + 180 + 181 00000 GROUP 01 non-symbols 182 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 183 00000 ALPHANUMERIC 03 FILLER INVALID 184 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:183.6-183.7: - 180 00000 GROUP 01 multiple-symbols - 181 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:183.6-183.7: + 180 + 181 00000 GROUP 01 non-symbols 182 00000 ALPHANUMERIC 03 FILLER INVALID 183 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 184 00000 ALPHANUMERIC 03 FILLER INVALID - 185 00000 ALPHANUMERIC 03 FILLER INVALID + 185 >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:184.6-184.7: - 181 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:184.6-184.7: + 181 00000 GROUP 01 non-symbols 182 00000 ALPHANUMERIC 03 FILLER INVALID 183 00000 ALPHANUMERIC 03 FILLER INVALID 184 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 185 00000 ALPHANUMERIC 03 FILLER INVALID - 186 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:185.6-185.7: - 182 00000 ALPHANUMERIC 03 FILLER INVALID - 183 00000 ALPHANUMERIC 03 FILLER INVALID - 184 00000 ALPHANUMERIC 03 FILLER INVALID - 185 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 186 00000 ALPHANUMERIC 03 FILLER INVALID - 187 00000 ALPHANUMERIC 03 FILLER INVALID + 185 + 186 00050 NUMERIC 01 too-many-digits 9(50) >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:186.6-186.7: +listings.at-3669-expected.lst:186.6-186.7: 183 00000 ALPHANUMERIC 03 FILLER INVALID 184 00000 ALPHANUMERIC 03 FILLER INVALID - 185 00000 ALPHANUMERIC 03 FILLER INVALID - 186 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 187 00000 ALPHANUMERIC 03 FILLER INVALID - 188 ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:187.6-187.7: - 184 00000 ALPHANUMERIC 03 FILLER INVALID - 185 00000 ALPHANUMERIC 03 FILLER INVALID - 186 00000 ALPHANUMERIC 03 FILLER INVALID - 187 > 00000 ALPHANUMERIC 03 FILLER INVALID + 185 + 186 > 00050 NUMERIC 01 too-many-digits 9(50) ---- ^ - 188 - 189 00000 GROUP 01 non-symbols ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:189.6-189.7: - 186 00000 ALPHANUMERIC 03 FILLER INVALID - 187 00000 ALPHANUMERIC 03 FILLER INVALID - 188 - 189 > 00000 GROUP 01 non-symbols ----- ^ - 190 00000 ALPHANUMERIC 03 FILLER INVALID - 191 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `G' + 187 + 188 00000 ALPHANUMERIC 01 too-long-number-in-parens INVALID +>> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:190.6-190.7: - 187 00000 ALPHANUMERIC 03 FILLER INVALID - 188 - 189 00000 GROUP 01 non-symbols - 190 > 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:188.6-188.7: + 185 + 186 00050 NUMERIC 01 too-many-digits 9(50) + 187 + 188 > 00000 ALPHANUMERIC 01 too-long-number-in-parens INVALID ---- ^ - 191 00000 ALPHANUMERIC 03 FILLER INVALID - 192 00000 ALPHANUMERIC 03 FILLER INVALID + 189 + 190 00000 ALPHANUMERIC 01 nested-parens INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:191.6-191.7: - 188 - 189 00000 GROUP 01 non-symbols - 190 00000 ALPHANUMERIC 03 FILLER INVALID - 191 > 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:190.6-190.7: + 187 + 188 00000 ALPHANUMERIC 01 too-long-number-in-parens INVALID + 189 + 190 > 00000 ALPHANUMERIC 01 nested-parens INVALID ---- ^ - 192 00000 ALPHANUMERIC 03 FILLER INVALID - 193 + 191 + 192 00000 ALPHANUMERIC 01 unbalanced-parens INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:192.6-192.7: - 189 00000 GROUP 01 non-symbols - 190 00000 ALPHANUMERIC 03 FILLER INVALID - 191 00000 ALPHANUMERIC 03 FILLER INVALID - 192 > 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:192.6-192.7: + 189 + 190 00000 ALPHANUMERIC 01 nested-parens INVALID + 191 + 192 > 00000 ALPHANUMERIC 01 unbalanced-parens INVALID ---- ^ 193 - 194 00050 NUMERIC 01 too-many-digits 9(50) + 194 00000 ALPHANUMERIC 01 multiple-pairs-of-parens INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:194.6-194.7: - 191 00000 ALPHANUMERIC 03 FILLER INVALID - 192 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:194.6-194.7: + 191 + 192 00000 ALPHANUMERIC 01 unbalanced-parens INVALID 193 - 194 > 00050 NUMERIC 01 too-many-digits 9(50) + 194 > 00000 ALPHANUMERIC 01 multiple-pairs-of-parens INVALID ---- ^ 195 - 196 00000 ALPHANUMERIC 01 too-long-number-in-parens INVALID ->> Error: Unexpected indicator: `N' + 196 00000 ALPHANUMERIC 01 no-digit-in-parens INVALID +>> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:196.6-196.7: +listings.at-3669-expected.lst:196.6-196.7: 193 - 194 00050 NUMERIC 01 too-many-digits 9(50) + 194 00000 ALPHANUMERIC 01 multiple-pairs-of-parens INVALID 195 - 196 > 00000 ALPHANUMERIC 01 too-long-number-in-parens INVALID + 196 > 00000 ALPHANUMERIC 01 no-digit-in-parens INVALID ---- ^ 197 - 198 00000 ALPHANUMERIC 01 nested-parens INVALID + 198 00000 GROUP 01 mutually-exclusive-symbols >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:198.6-198.7: +listings.at-3669-expected.lst:198.6-198.7: 195 - 196 00000 ALPHANUMERIC 01 too-long-number-in-parens INVALID + 196 00000 ALPHANUMERIC 01 no-digit-in-parens INVALID 197 - 198 > 00000 ALPHANUMERIC 01 nested-parens INVALID + 198 > 00000 GROUP 01 mutually-exclusive-symbols ---- ^ - 199 - 200 00000 ALPHANUMERIC 01 unbalanced-parens INVALID + 199 00000 ALPHANUMERIC 03 FILLER INVALID + 200 00000 ALPHANUMERIC 03 FILLER INVALID +>> Error: Unexpected indicator: `G' + +listings.at-3669-expected.lst:199.6-199.7: + 196 00000 ALPHANUMERIC 01 no-digit-in-parens INVALID + 197 + 198 00000 GROUP 01 mutually-exclusive-symbols + 199 > 00000 ALPHANUMERIC 03 FILLER INVALID +---- ^ + 200 00000 ALPHANUMERIC 03 FILLER INVALID + 201 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:200.6-200.7: +listings.at-3669-expected.lst:200.6-200.7: 197 - 198 00000 ALPHANUMERIC 01 nested-parens INVALID - 199 - 200 > 00000 ALPHANUMERIC 01 unbalanced-parens INVALID + 198 00000 GROUP 01 mutually-exclusive-symbols + 199 00000 ALPHANUMERIC 03 FILLER INVALID + 200 > 00000 ALPHANUMERIC 03 FILLER INVALID +---- ^ + 201 00000 ALPHANUMERIC 03 FILLER INVALID + 202 00000 ALPHANUMERIC 03 FILLER INVALID +>> Error: Unexpected indicator: `A' + +listings.at-3669-expected.lst:201.6-201.7: + 198 00000 GROUP 01 mutually-exclusive-symbols + 199 00000 ALPHANUMERIC 03 FILLER INVALID + 200 00000 ALPHANUMERIC 03 FILLER INVALID + 201 > 00000 ALPHANUMERIC 03 FILLER INVALID +---- ^ + 202 00000 ALPHANUMERIC 03 FILLER INVALID + 203 00000 ALPHANUMERIC 03 FILLER INVALID +>> Error: Unexpected indicator: `A' + +listings.at-3669-expected.lst:202.6-202.7: + 199 00000 ALPHANUMERIC 03 FILLER INVALID + 200 00000 ALPHANUMERIC 03 FILLER INVALID + 201 00000 ALPHANUMERIC 03 FILLER INVALID + 202 > 00000 ALPHANUMERIC 03 FILLER INVALID +---- ^ + 203 00000 ALPHANUMERIC 03 FILLER INVALID + 204 00000 ALPHANUMERIC 03 FILLER INVALID +>> Error: Unexpected indicator: `A' + +listings.at-3669-expected.lst:203.6-203.7: + 200 00000 ALPHANUMERIC 03 FILLER INVALID + 201 00000 ALPHANUMERIC 03 FILLER INVALID + 202 00000 ALPHANUMERIC 03 FILLER INVALID + 203 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 201 - 202 00000 ALPHANUMERIC 01 multiple-pairs-of-parens INVALID + 204 00000 ALPHANUMERIC 03 FILLER INVALID + 205 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:202.6-202.7: - 199 - 200 00000 ALPHANUMERIC 01 unbalanced-parens INVALID - 201 - 202 > 00000 ALPHANUMERIC 01 multiple-pairs-of-parens INVALID +listings.at-3669-expected.lst:204.6-204.7: + 201 00000 ALPHANUMERIC 03 FILLER INVALID + 202 00000 ALPHANUMERIC 03 FILLER INVALID + 203 00000 ALPHANUMERIC 03 FILLER INVALID + 204 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 203 - 204 00000 ALPHANUMERIC 01 no-digit-in-parens INVALID + 205 00000 ALPHANUMERIC 03 FILLER INVALID + 206 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:204.6-204.7: - 201 - 202 00000 ALPHANUMERIC 01 multiple-pairs-of-parens INVALID - 203 - 204 > 00000 ALPHANUMERIC 01 no-digit-in-parens INVALID +listings.at-3669-expected.lst:205.6-205.7: + 202 00000 ALPHANUMERIC 03 FILLER INVALID + 203 00000 ALPHANUMERIC 03 FILLER INVALID + 204 00000 ALPHANUMERIC 03 FILLER INVALID + 205 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 205 - 206 00000 GROUP 01 mutually-exclusive-symbols + 206 00000 ALPHANUMERIC 03 FILLER INVALID + 207 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:206.6-206.7: - 203 - 204 00000 ALPHANUMERIC 01 no-digit-in-parens INVALID - 205 - 206 > 00000 GROUP 01 mutually-exclusive-symbols +listings.at-3669-expected.lst:206.6-206.7: + 203 00000 ALPHANUMERIC 03 FILLER INVALID + 204 00000 ALPHANUMERIC 03 FILLER INVALID + 205 00000 ALPHANUMERIC 03 FILLER INVALID + 206 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 207 00000 ALPHANUMERIC 03 FILLER INVALID 208 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `G' +>> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:207.6-207.7: - 204 00000 ALPHANUMERIC 01 no-digit-in-parens INVALID - 205 - 206 00000 GROUP 01 mutually-exclusive-symbols +listings.at-3669-expected.lst:207.6-207.7: + 204 00000 ALPHANUMERIC 03 FILLER INVALID + 205 00000 ALPHANUMERIC 03 FILLER INVALID + 206 00000 ALPHANUMERIC 03 FILLER INVALID 207 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 208 00000 ALPHANUMERIC 03 FILLER INVALID 209 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:208.6-208.7: - 205 - 206 00000 GROUP 01 mutually-exclusive-symbols +listings.at-3669-expected.lst:208.6-208.7: + 205 00000 ALPHANUMERIC 03 FILLER INVALID + 206 00000 ALPHANUMERIC 03 FILLER INVALID 207 00000 ALPHANUMERIC 03 FILLER INVALID 208 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ @@ -4339,8 +4279,8 @@ listings.at-3684-expected.lst:208.6-208.7: 210 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:209.6-209.7: - 206 00000 GROUP 01 mutually-exclusive-symbols +listings.at-3669-expected.lst:209.6-209.7: + 206 00000 ALPHANUMERIC 03 FILLER INVALID 207 00000 ALPHANUMERIC 03 FILLER INVALID 208 00000 ALPHANUMERIC 03 FILLER INVALID 209 > 00000 ALPHANUMERIC 03 FILLER INVALID @@ -4349,7 +4289,7 @@ listings.at-3684-expected.lst:209.6-209.7: 211 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:210.6-210.7: +listings.at-3669-expected.lst:210.6-210.7: 207 00000 ALPHANUMERIC 03 FILLER INVALID 208 00000 ALPHANUMERIC 03 FILLER INVALID 209 00000 ALPHANUMERIC 03 FILLER INVALID @@ -4359,7 +4299,7 @@ listings.at-3684-expected.lst:210.6-210.7: 212 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:211.6-211.7: +listings.at-3669-expected.lst:211.6-211.7: 208 00000 ALPHANUMERIC 03 FILLER INVALID 209 00000 ALPHANUMERIC 03 FILLER INVALID 210 00000 ALPHANUMERIC 03 FILLER INVALID @@ -4369,59 +4309,49 @@ listings.at-3684-expected.lst:211.6-211.7: 213 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:212.6-212.7: +listings.at-3669-expected.lst:212.6-212.7: 209 00000 ALPHANUMERIC 03 FILLER INVALID 210 00000 ALPHANUMERIC 03 FILLER INVALID 211 00000 ALPHANUMERIC 03 FILLER INVALID 212 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 213 00000 ALPHANUMERIC 03 FILLER INVALID - 214 00000 ALPHANUMERIC 03 FILLER INVALID + 214 >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:213.6-213.7: +listings.at-3669-expected.lst:213.6-213.7: 210 00000 ALPHANUMERIC 03 FILLER INVALID 211 00000 ALPHANUMERIC 03 FILLER INVALID 212 00000 ALPHANUMERIC 03 FILLER INVALID 213 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 214 00000 ALPHANUMERIC 03 FILLER INVALID - 215 00000 ALPHANUMERIC 03 FILLER INVALID + 214 + 215 00000 GROUP 01 non-rightmost-leftmost-symbols >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:214.6-214.7: - 211 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:215.6-215.7: 212 00000 ALPHANUMERIC 03 FILLER INVALID 213 00000 ALPHANUMERIC 03 FILLER INVALID - 214 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 215 00000 ALPHANUMERIC 03 FILLER INVALID - 216 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:215.6-215.7: - 212 00000 ALPHANUMERIC 03 FILLER INVALID - 213 00000 ALPHANUMERIC 03 FILLER INVALID - 214 00000 ALPHANUMERIC 03 FILLER INVALID - 215 > 00000 ALPHANUMERIC 03 FILLER INVALID + 214 + 215 > 00000 GROUP 01 non-rightmost-leftmost-symbols ---- ^ 216 00000 ALPHANUMERIC 03 FILLER INVALID 217 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `A' +>> Error: Unexpected indicator: `G' -listings.at-3684-expected.lst:216.6-216.7: +listings.at-3669-expected.lst:216.6-216.7: 213 00000 ALPHANUMERIC 03 FILLER INVALID - 214 00000 ALPHANUMERIC 03 FILLER INVALID - 215 00000 ALPHANUMERIC 03 FILLER INVALID + 214 + 215 00000 GROUP 01 non-rightmost-leftmost-symbols 216 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 217 00000 ALPHANUMERIC 03 FILLER INVALID 218 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:217.6-217.7: - 214 00000 ALPHANUMERIC 03 FILLER INVALID - 215 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:217.6-217.7: + 214 + 215 00000 GROUP 01 non-rightmost-leftmost-symbols 216 00000 ALPHANUMERIC 03 FILLER INVALID 217 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ @@ -4429,8 +4359,8 @@ listings.at-3684-expected.lst:217.6-217.7: 219 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:218.6-218.7: - 215 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:218.6-218.7: + 215 00000 GROUP 01 non-rightmost-leftmost-symbols 216 00000 ALPHANUMERIC 03 FILLER INVALID 217 00000 ALPHANUMERIC 03 FILLER INVALID 218 > 00000 ALPHANUMERIC 03 FILLER INVALID @@ -4439,7 +4369,7 @@ listings.at-3684-expected.lst:218.6-218.7: 220 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:219.6-219.7: +listings.at-3669-expected.lst:219.6-219.7: 216 00000 ALPHANUMERIC 03 FILLER INVALID 217 00000 ALPHANUMERIC 03 FILLER INVALID 218 00000 ALPHANUMERIC 03 FILLER INVALID @@ -4449,1024 +4379,884 @@ listings.at-3684-expected.lst:219.6-219.7: 221 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:220.6-220.7: +listings.at-3669-expected.lst:220.6-220.7: 217 00000 ALPHANUMERIC 03 FILLER INVALID 218 00000 ALPHANUMERIC 03 FILLER INVALID 219 00000 ALPHANUMERIC 03 FILLER INVALID 220 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 221 00000 ALPHANUMERIC 03 FILLER INVALID - 222 + 222 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:221.6-221.7: +listings.at-3669-expected.lst:221.6-221.7: 218 00000 ALPHANUMERIC 03 FILLER INVALID 219 00000 ALPHANUMERIC 03 FILLER INVALID 220 00000 ALPHANUMERIC 03 FILLER INVALID 221 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 222 - 223 00000 GROUP 01 non-rightmost-leftmost-symbols + 222 00000 ALPHANUMERIC 03 FILLER INVALID + 223 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:223.6-223.7: +listings.at-3669-expected.lst:222.6-222.7: + 219 00000 ALPHANUMERIC 03 FILLER INVALID 220 00000 ALPHANUMERIC 03 FILLER INVALID 221 00000 ALPHANUMERIC 03 FILLER INVALID - 222 - 223 > 00000 GROUP 01 non-rightmost-leftmost-symbols + 222 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 224 00000 ALPHANUMERIC 03 FILLER INVALID - 225 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `G' + 223 00000 ALPHANUMERIC 03 FILLER INVALID + 224 +>> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:224.6-224.7: +listings.at-3669-expected.lst:223.6-223.7: + 220 00000 ALPHANUMERIC 03 FILLER INVALID 221 00000 ALPHANUMERIC 03 FILLER INVALID - 222 - 223 00000 GROUP 01 non-rightmost-leftmost-symbols - 224 > 00000 ALPHANUMERIC 03 FILLER INVALID + 222 00000 ALPHANUMERIC 03 FILLER INVALID + 223 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 225 00000 ALPHANUMERIC 03 FILLER INVALID - 226 00000 ALPHANUMERIC 03 FILLER INVALID + 224 + 225 00000 GROUP 01 missing-symbols >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:225.6-225.7: - 222 - 223 00000 GROUP 01 non-rightmost-leftmost-symbols - 224 00000 ALPHANUMERIC 03 FILLER INVALID - 225 > 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:225.6-225.7: + 222 00000 ALPHANUMERIC 03 FILLER INVALID + 223 00000 ALPHANUMERIC 03 FILLER INVALID + 224 + 225 > 00000 GROUP 01 missing-symbols ---- ^ 226 00000 ALPHANUMERIC 03 FILLER INVALID 227 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `A' +>> Error: Unexpected indicator: `G' -listings.at-3684-expected.lst:226.6-226.7: - 223 00000 GROUP 01 non-rightmost-leftmost-symbols - 224 00000 ALPHANUMERIC 03 FILLER INVALID - 225 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:226.6-226.7: + 223 00000 ALPHANUMERIC 03 FILLER INVALID + 224 + 225 00000 GROUP 01 missing-symbols 226 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 227 00000 ALPHANUMERIC 03 FILLER INVALID 228 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:227.6-227.7: - 224 00000 ALPHANUMERIC 03 FILLER INVALID - 225 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:227.6-227.7: + 224 + 225 00000 GROUP 01 missing-symbols 226 00000 ALPHANUMERIC 03 FILLER INVALID 227 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ 228 00000 ALPHANUMERIC 03 FILLER INVALID - 229 00000 ALPHANUMERIC 03 FILLER INVALID + 229 >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:228.6-228.7: - 225 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:228.6-228.7: + 225 00000 GROUP 01 missing-symbols 226 00000 ALPHANUMERIC 03 FILLER INVALID 227 00000 ALPHANUMERIC 03 FILLER INVALID 228 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 229 00000 ALPHANUMERIC 03 FILLER INVALID - 230 00000 ALPHANUMERIC 03 FILLER INVALID + 229 + 230 00000 GROUP 01 invalid-constant >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:229.6-229.7: - 226 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:230.6-230.7: 227 00000 ALPHANUMERIC 03 FILLER INVALID 228 00000 ALPHANUMERIC 03 FILLER INVALID - 229 > 00000 ALPHANUMERIC 03 FILLER INVALID + 229 + 230 > 00000 GROUP 01 invalid-constant ---- ^ - 230 00000 ALPHANUMERIC 03 FILLER INVALID 231 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:230.6-230.7: - 227 00000 ALPHANUMERIC 03 FILLER INVALID - 228 00000 ALPHANUMERIC 03 FILLER INVALID - 229 00000 ALPHANUMERIC 03 FILLER INVALID - 230 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 231 00000 ALPHANUMERIC 03 FILLER INVALID - 232 ->> Error: Unexpected indicator: `A' + 232 00000 ALPHANUMERIC 03 FILLER INVALID +>> Error: Unexpected indicator: `G' -listings.at-3684-expected.lst:231.6-231.7: +listings.at-3669-expected.lst:231.6-231.7: 228 00000 ALPHANUMERIC 03 FILLER INVALID - 229 00000 ALPHANUMERIC 03 FILLER INVALID - 230 00000 ALPHANUMERIC 03 FILLER INVALID + 229 + 230 00000 GROUP 01 invalid-constant 231 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 232 - 233 00000 GROUP 01 missing-symbols + 232 00000 ALPHANUMERIC 03 FILLER INVALID + 233 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:233.6-233.7: - 230 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:232.6-232.7: + 229 + 230 00000 GROUP 01 invalid-constant 231 00000 ALPHANUMERIC 03 FILLER INVALID - 232 - 233 > 00000 GROUP 01 missing-symbols + 232 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ + 233 00000 ALPHANUMERIC 03 FILLER INVALID 234 00000 ALPHANUMERIC 03 FILLER INVALID - 235 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `G' - -listings.at-3684-expected.lst:234.6-234.7: - 231 00000 ALPHANUMERIC 03 FILLER INVALID - 232 - 233 00000 GROUP 01 missing-symbols - 234 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 235 00000 ALPHANUMERIC 03 FILLER INVALID - 236 00000 ALPHANUMERIC 03 FILLER INVALID >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:235.6-235.7: - 232 - 233 00000 GROUP 01 missing-symbols - 234 00000 ALPHANUMERIC 03 FILLER INVALID - 235 > 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:233.6-233.7: + 230 00000 GROUP 01 invalid-constant + 231 00000 ALPHANUMERIC 03 FILLER INVALID + 232 00000 ALPHANUMERIC 03 FILLER INVALID + 233 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 236 00000 ALPHANUMERIC 03 FILLER INVALID - 237 ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:236.6-236.7: - 233 00000 GROUP 01 missing-symbols 234 00000 ALPHANUMERIC 03 FILLER INVALID - 235 00000 ALPHANUMERIC 03 FILLER INVALID - 236 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 237 - 238 00000 GROUP 01 invalid-constant ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:238.6-238.7: - 235 00000 ALPHANUMERIC 03 FILLER INVALID - 236 00000 ALPHANUMERIC 03 FILLER INVALID - 237 - 238 > 00000 GROUP 01 invalid-constant ----- ^ - 239 00000 ALPHANUMERIC 03 FILLER INVALID - 240 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `G' - -listings.at-3684-expected.lst:239.6-239.7: - 236 00000 ALPHANUMERIC 03 FILLER INVALID - 237 - 238 00000 GROUP 01 invalid-constant - 239 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 240 00000 ALPHANUMERIC 03 FILLER INVALID - 241 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:240.6-240.7: - 237 - 238 00000 GROUP 01 invalid-constant - 239 00000 ALPHANUMERIC 03 FILLER INVALID - 240 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 241 00000 ALPHANUMERIC 03 FILLER INVALID - 242 00000 ALPHANUMERIC 03 FILLER INVALID ->> Error: Unexpected indicator: `A' - -listings.at-3684-expected.lst:241.6-241.7: - 238 00000 GROUP 01 invalid-constant - 239 00000 ALPHANUMERIC 03 FILLER INVALID - 240 00000 ALPHANUMERIC 03 FILLER INVALID - 241 > 00000 ALPHANUMERIC 03 FILLER INVALID ----- ^ - 242 00000 ALPHANUMERIC 03 FILLER INVALID - 243 + 235 >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:242.6-242.7: - 239 00000 ALPHANUMERIC 03 FILLER INVALID - 240 00000 ALPHANUMERIC 03 FILLER INVALID - 241 00000 ALPHANUMERIC 03 FILLER INVALID - 242 > 00000 ALPHANUMERIC 03 FILLER INVALID +listings.at-3669-expected.lst:234.6-234.7: + 231 00000 ALPHANUMERIC 03 FILLER INVALID + 232 00000 ALPHANUMERIC 03 FILLER INVALID + 233 00000 ALPHANUMERIC 03 FILLER INVALID + 234 > 00000 ALPHANUMERIC 03 FILLER INVALID ---- ^ - 243 - 244 00086 GROUP 01 valid-pics + 235 + 236 00086 GROUP 01 valid-pics >> Error: Unexpected indicator: `A' -listings.at-3684-expected.lst:244.6-244.7: - 241 00000 ALPHANUMERIC 03 FILLER INVALID - 242 00000 ALPHANUMERIC 03 FILLER INVALID - 243 - 244 > 00086 GROUP 01 valid-pics +listings.at-3669-expected.lst:236.6-236.7: + 233 00000 ALPHANUMERIC 03 FILLER INVALID + 234 00000 ALPHANUMERIC 03 FILLER INVALID + 235 + 236 > 00086 GROUP 01 valid-pics ---- ^ - 245 00002 NUMERIC 03 FILLER VP9B - 246 00002 NUMERIC 03 FILLER B9P(3) + 237 00002 NUMERIC 03 FILLER VP9B + 238 00002 NUMERIC 03 FILLER B9P(3) >> Error: Unexpected indicator: `G' -listings.at-3684-expected.lst:245.6-245.7: - 242 00000 ALPHANUMERIC 03 FILLER INVALID - 243 - 244 00086 GROUP 01 valid-pics - 245 > 00002 NUMERIC 03 FILLER VP9B +listings.at-3669-expected.lst:237.6-237.7: + 234 00000 ALPHANUMERIC 03 FILLER INVALID + 235 + 236 00086 GROUP 01 valid-pics + 237 > 00002 NUMERIC 03 FILLER VP9B ---- ^ - 246 00002 NUMERIC 03 FILLER B9P(3) - 247 00004 NUMERIC 03 FILLER B$$$ + 238 00002 NUMERIC 03 FILLER B9P(3) + 239 00004 NUMERIC 03 FILLER B$$$ >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:246.6-246.7: - 243 - 244 00086 GROUP 01 valid-pics - 245 00002 NUMERIC 03 FILLER VP9B - 246 > 00002 NUMERIC 03 FILLER B9P(3) +listings.at-3669-expected.lst:238.6-238.7: + 235 + 236 00086 GROUP 01 valid-pics + 237 00002 NUMERIC 03 FILLER VP9B + 238 > 00002 NUMERIC 03 FILLER B9P(3) ---- ^ - 247 00004 NUMERIC 03 FILLER B$$$ - 248 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ + 239 00004 NUMERIC 03 FILLER B$$$ + 240 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:247.6-247.7: - 244 00086 GROUP 01 valid-pics - 245 00002 NUMERIC 03 FILLER VP9B - 246 00002 NUMERIC 03 FILLER B9P(3) - 247 > 00004 NUMERIC 03 FILLER B$$$ +listings.at-3669-expected.lst:239.6-239.7: + 236 00086 GROUP 01 valid-pics + 237 00002 NUMERIC 03 FILLER VP9B + 238 00002 NUMERIC 03 FILLER B9P(3) + 239 > 00004 NUMERIC 03 FILLER B$$$ ---- ^ - 248 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ - 249 00005 NUMERIC 03 FILLER +(5)P(3) + 240 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ + 241 00005 NUMERIC 03 FILLER +(5)P(3) >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:248.6-248.7: - 245 00002 NUMERIC 03 FILLER VP9B - 246 00002 NUMERIC 03 FILLER B9P(3) - 247 00004 NUMERIC 03 FILLER B$$$ - 248 > 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ +listings.at-3669-expected.lst:240.6-240.7: + 237 00002 NUMERIC 03 FILLER VP9B + 238 00002 NUMERIC 03 FILLER B9P(3) + 239 00004 NUMERIC 03 FILLER B$$$ + 240 > 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ ---- ^ - 249 00005 NUMERIC 03 FILLER +(5)P(3) - 250 00005 NUMERIC 03 FILLER ++.++ + 241 00005 NUMERIC 03 FILLER +(5)P(3) + 242 00005 NUMERIC 03 FILLER ++.++ >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:249.6-249.7: - 246 00002 NUMERIC 03 FILLER B9P(3) - 247 00004 NUMERIC 03 FILLER B$$$ - 248 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ - 249 > 00005 NUMERIC 03 FILLER +(5)P(3) +listings.at-3669-expected.lst:241.6-241.7: + 238 00002 NUMERIC 03 FILLER B9P(3) + 239 00004 NUMERIC 03 FILLER B$$$ + 240 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ + 241 > 00005 NUMERIC 03 FILLER +(5)P(3) ---- ^ - 250 00005 NUMERIC 03 FILLER ++.++ - 251 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) + 242 00005 NUMERIC 03 FILLER ++.++ + 243 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:250.6-250.7: - 247 00004 NUMERIC 03 FILLER B$$$ - 248 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ - 249 00005 NUMERIC 03 FILLER +(5)P(3) - 250 > 00005 NUMERIC 03 FILLER ++.++ +listings.at-3669-expected.lst:242.6-242.7: + 239 00004 NUMERIC 03 FILLER B$$$ + 240 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ + 241 00005 NUMERIC 03 FILLER +(5)P(3) + 242 > 00005 NUMERIC 03 FILLER ++.++ ---- ^ - 251 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) - 252 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... + 243 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) + 244 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:251.6-251.7: - 248 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ - 249 00005 NUMERIC 03 FILLER +(5)P(3) - 250 00005 NUMERIC 03 FILLER ++.++ - 251 > 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) +listings.at-3669-expected.lst:243.6-243.7: + 240 00014 NUMERIC 03 FILLER 0000+B0+++0B,+ + 241 00005 NUMERIC 03 FILLER +(5)P(3) + 242 00005 NUMERIC 03 FILLER ++.++ + 243 > 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) ---- ^ - 252 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... - 253 + 244 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... + 245 >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:252.6-252.7: - 249 00005 NUMERIC 03 FILLER +(5)P(3) - 250 00005 NUMERIC 03 FILLER ++.++ - 251 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) - 252 > 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... +listings.at-3669-expected.lst:244.6-244.7: + 241 00005 NUMERIC 03 FILLER +(5)P(3) + 242 00005 NUMERIC 03 FILLER ++.++ + 243 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) + 244 > 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... ---- ^ - 253 - 254 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE + 245 + 246 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:254.6-254.7: - 251 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) - 252 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... - 253 - 254 > 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE +listings.at-3669-expected.lst:246.6-246.7: + 243 00005 NUMERIC 03 FILLER $(INTEGER-CONSTANT) + 244 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... + 245 + 246 > 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE ---- ^ - 255 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) - 256 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) + 247 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) + 248 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) >> Error: Unexpected indicator: `G' -listings.at-3684-expected.lst:255.6-255.7: - 252 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... - 253 - 254 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE - 255 > 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) +listings.at-3669-expected.lst:247.6-247.7: + 244 00049 NUMERIC 03 FILLER $$$$$$$$$$$$$$$$$$$$... + 245 + 246 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE + 247 > 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) ---- ^ - 256 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) - 257 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) + 248 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) + 249 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:256.6-256.7: - 253 - 254 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE - 255 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) - 256 > 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) +listings.at-3669-expected.lst:248.6-248.7: + 245 + 246 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE + 247 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) + 248 > 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) ---- ^ - 257 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) - 258 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) + 249 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) + 250 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:257.6-257.7: - 254 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE - 255 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) - 256 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) - 257 > 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) +listings.at-3669-expected.lst:249.6-249.7: + 246 00008 GROUP 01 PC-COLOR-BACKGROUND-TABLE + 247 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) + 248 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) + 249 > 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) ---- ^ - 258 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) - 259 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) + 250 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) + 251 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:258.6-258.7: - 255 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) - 256 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) - 257 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) - 258 > 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) +listings.at-3669-expected.lst:250.6-250.7: + 247 00001 NUMERIC 05 BIT-BACKGROUND-BLACK 1(8) + 248 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) + 249 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) + 250 > 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) ---- ^ - 259 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) - 260 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) + 251 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) + 252 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:259.6-259.7: - 256 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) - 257 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) - 258 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) - 259 > 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) +listings.at-3669-expected.lst:251.6-251.7: + 248 00001 NUMERIC 05 BIT-BACKGROUND-BLUE 1(8) + 249 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) + 250 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) + 251 > 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) ---- ^ - 260 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) - 261 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) + 252 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) + 253 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:260.6-260.7: - 257 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) - 258 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) - 259 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) - 260 > 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) +listings.at-3669-expected.lst:252.6-252.7: + 249 00001 NUMERIC 05 BIT-BACKGROUND-GREEN 1(8) + 250 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) + 251 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) + 252 > 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) ---- ^ - 261 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) - 262 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) + 253 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) + 254 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:261.6-261.7: - 258 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) - 259 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) - 260 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) - 261 > 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) +listings.at-3669-expected.lst:253.6-253.7: + 250 00001 NUMERIC 05 BIT-BACKGROUND-CYAN 1(8) + 251 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) + 252 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) + 253 > 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) ---- ^ - 262 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) - 263 + 254 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) + 255 >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:262.6-262.7: - 259 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) - 260 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) - 261 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) - 262 > 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) +listings.at-3669-expected.lst:254.6-254.7: + 251 00001 NUMERIC 05 BIT-BACKGROUND-RED 1(8) + 252 00001 NUMERIC 05 BIT-BACKGROUND-MAGENTA 1(8) + 253 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) + 254 > 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) ---- ^ - 263 - 264 00008 GROUP 01 FILLER, REDEFINES PC-COLOR-BACKGROUND-TABLE + 255 + 256 00008 GROUP 01 FILLER, REDEFINES PC-COLOR-BACKGROUND-TABLE >> Error: Unexpected indicator: `N' -listings.at-3684-expected.lst:264.6-264.7: - 261 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) - 262 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) - 263 - 264 > 00008 GROUP 01 FILLER, REDEFINES PC-COLOR-BACKGROUND-TABLE +listings.at-3669-expected.lst:256.6-256.7: + 253 00001 NUMERIC 05 BIT-BACKGROUND-BROWN 1(8) + 254 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) + 255 + 256 > 00008 GROUP 01 FILLER, REDEFINES PC-COLOR-BACKGROUND-TABLE ---- ^ - 265 00001 BOOLEAN 05 COLOR-BACKGROUND 1(8), OCCURS 8 - 266 + 257 00001 BOOLEAN 05 COLOR-BACKGROUND 1(8), OCCURS 8 + 258 >> Error: Unexpected indicator: `G' -listings.at-3684-expected.lst:265.6-265.7: - 262 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) - 263 - 264 00008 GROUP 01 FILLER, REDEFINES PC-COLOR-BACKGROUND-TABLE - 265 > 00001 BOOLEAN 05 COLOR-BACKGROUND 1(8), OCCURS 8 +listings.at-3669-expected.lst:257.6-257.7: + 254 00001 NUMERIC 05 BIT-BACKGROUND-LIGHT-GRAY 1(8) + 255 + 256 00008 GROUP 01 FILLER, REDEFINES PC-COLOR-BACKGROUND-TABLE + 257 > 00001 BOOLEAN 05 COLOR-BACKGROUND 1(8), OCCURS 8 ---- ^ - 266 - 267 + 258 + 259 >> Error: Unexpected indicator: `B' -listings.at-3684-expected.lst:269.6-269.7: - 266 - 267 - 268 - 269 > Error/Warning summary: +listings.at-3669-expected.lst:261.6-261.7: + 258 + 259 + 260 + 261 > Error/Warning summary: ---- ^ - 270 - 271 prog.cob:7: error: missing PICTURE string + 262 + 263 prog.cob:7: error: missing PICTURE string >> Error: Unexpected indicator: `W' -listings.at-3684-expected.lst:271.6-271.7: - 268 - 269 Error/Warning summary: - 270 - 271 > prog.cob:7: error: missing PICTURE string ----- ^ - 272 prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters - 273 prog.cob:16: error: CR or DB may only occur once in a PICTURE string ->> Error: Unexpected indicator: `o' - -listings.at-3684-expected.lst:272.6-272.7: - 269 Error/Warning summary: - 270 - 271 prog.cob:7: error: missing PICTURE string - 272 > prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters ----- ^ - 273 prog.cob:16: error: CR or DB may only occur once in a PICTURE string - 274 prog.cob:17: error: CR or DB may only occur once in a PICTURE string ->> Error: Unexpected indicator: `o' - -listings.at-3684-expected.lst:273.6-273.7: - 270 - 271 prog.cob:7: error: missing PICTURE string - 272 prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters - 273 > prog.cob:16: error: CR or DB may only occur once in a PICTURE string ----- ^ - 274 prog.cob:17: error: CR or DB may only occur once in a PICTURE string - 275 prog.cob:18: error: S may only occur once in a PICTURE string ->> Error: Unexpected indicator: `o' - -listings.at-3684-expected.lst:274.6-274.7: - 271 prog.cob:7: error: missing PICTURE string - 272 prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters - 273 prog.cob:16: error: CR or DB may only occur once in a PICTURE string - 274 > prog.cob:17: error: CR or DB may only occur once in a PICTURE string ----- ^ - 275 prog.cob:18: error: S may only occur once in a PICTURE string - 276 prog.cob:18: error: S must be at start of PICTURE string ->> Error: Unexpected indicator: `o' - -listings.at-3684-expected.lst:275.6-275.7: - 272 prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters - 273 prog.cob:16: error: CR or DB may only occur once in a PICTURE string - 274 prog.cob:17: error: CR or DB may only occur once in a PICTURE string - 275 > prog.cob:18: error: S may only occur once in a PICTURE string ----- ^ - 276 prog.cob:18: error: S must be at start of PICTURE string - 277 prog.cob:19: error: . may only occur once in a PICTURE string ->> Error: Unexpected indicator: `o' - -listings.at-3684-expected.lst:276.6-276.7: - 273 prog.cob:16: error: CR or DB may only occur once in a PICTURE string - 274 prog.cob:17: error: CR or DB may only occur once in a PICTURE string - 275 prog.cob:18: error: S may only occur once in a PICTURE string - 276 > prog.cob:18: error: S must be at start of PICTURE string ----- ^ - 277 prog.cob:19: error: . may only occur once in a PICTURE string - 278 prog.cob:20: error: V may only occur once in a PICTURE string ->> Error: Unexpected indicator: `o' - -listings.at-3684-expected.lst:277.6-277.7: - 274 prog.cob:17: error: CR or DB may only occur once in a PICTURE string - 275 prog.cob:18: error: S may only occur once in a PICTURE string - 276 prog.cob:18: error: S must be at start of PICTURE string - 277 > prog.cob:19: error: . may only occur once in a PICTURE string ----- ^ - 278 prog.cob:20: error: V may only occur once in a PICTURE string - 279 prog.cob:21: error: a trailing +/- sign cannot follow a leading +/- sign ->> Error: Unexpected indicator: `o' - -listings.at-3684-expected.lst:278.6-278.7: - 275 prog.cob:18: error: S may only occur once in a PICTURE string - 276 prog.cob:18: error: S must be at start of PICTURE string - 277 prog.cob:19: error: . may only occur once in a PICTURE string - 278 > prog.cob:20: error: V may only occur once in a PICTURE string +listings.at-3669-expected.lst:263.6-263.7: + 260 + 261 Error/Warning summary: + 262 + 263 > prog.cob:7: error: missing PICTURE string ---- ^ - 279 prog.cob:21: error: a trailing +/- sign cannot follow a leading +/- sign - 280 prog.cob:22: error: a leading +/- sign cannot follow a leading currency symbol + 264 prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters + 265 prog.cob:16: error: CR or DB may only occur once in a PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:279.6-279.7: - 276 prog.cob:18: error: S must be at start of PICTURE string - 277 prog.cob:19: error: . may only occur once in a PICTURE string - 278 prog.cob:20: error: V may only occur once in a PICTURE string - 279 > prog.cob:21: error: a trailing +/- sign cannot follow a leading +/- sign +listings.at-3669-expected.lst:264.6-264.7: + 261 Error/Warning summary: + 262 + 263 prog.cob:7: error: missing PICTURE string + 264 > prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters ---- ^ - 280 prog.cob:22: error: a leading +/- sign cannot follow a leading currency symbol - 281 prog.cob:22: error: a trailing currency symbol cannot follow a leading currency symbol + 265 prog.cob:16: error: CR or DB may only occur once in a PICTURE string + 266 prog.cob:17: error: CR or DB may only occur once in a PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:280.6-280.7: - 277 prog.cob:19: error: . may only occur once in a PICTURE string - 278 prog.cob:20: error: V may only occur once in a PICTURE string - 279 prog.cob:21: error: a trailing +/- sign cannot follow a leading +/- sign - 280 > prog.cob:22: error: a leading +/- sign cannot follow a leading currency symbol +listings.at-3669-expected.lst:265.6-265.7: + 262 + 263 prog.cob:7: error: missing PICTURE string + 264 prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters + 265 > prog.cob:16: error: CR or DB may only occur once in a PICTURE string ---- ^ - 281 prog.cob:22: error: a trailing currency symbol cannot follow a leading currency symbol - 282 prog.cob:22: error: a trailing +/- sign cannot follow a leading +/- sign + 266 prog.cob:17: error: CR or DB may only occur once in a PICTURE string + 267 prog.cob:18: error: S may only occur once in a PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:281.6-281.7: - 278 prog.cob:20: error: V may only occur once in a PICTURE string - 279 prog.cob:21: error: a trailing +/- sign cannot follow a leading +/- sign - 280 prog.cob:22: error: a leading +/- sign cannot follow a leading currency symbol - 281 > prog.cob:22: error: a trailing currency symbol cannot follow a leading currency symbol +listings.at-3669-expected.lst:266.6-266.7: + 263 prog.cob:7: error: missing PICTURE string + 264 prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters + 265 prog.cob:16: error: CR or DB may only occur once in a PICTURE string + 266 > prog.cob:17: error: CR or DB may only occur once in a PICTURE string ---- ^ - 282 prog.cob:22: error: a trailing +/- sign cannot follow a leading +/- sign - 283 prog.cob:24: error: invalid PICTURE character 'K' + 267 prog.cob:18: error: S may only occur once in a PICTURE string + 268 prog.cob:18: error: S must be at start of PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:282.6-282.7: - 279 prog.cob:21: error: a trailing +/- sign cannot follow a leading +/- sign - 280 prog.cob:22: error: a leading +/- sign cannot follow a leading currency symbol - 281 prog.cob:22: error: a trailing currency symbol cannot follow a leading currency symbol - 282 > prog.cob:22: error: a trailing +/- sign cannot follow a leading +/- sign +listings.at-3669-expected.lst:267.6-267.7: + 264 prog.cob:10: error: PICTURE string may not contain more than 255 characters; contains 301 characters + 265 prog.cob:16: error: CR or DB may only occur once in a PICTURE string + 266 prog.cob:17: error: CR or DB may only occur once in a PICTURE string + 267 > prog.cob:18: error: S may only occur once in a PICTURE string ---- ^ - 283 prog.cob:24: error: invalid PICTURE character 'K' - 284 prog.cob:25: error: C must be followed by R + 268 prog.cob:18: error: S must be at start of PICTURE string + 269 prog.cob:19: error: . may only occur once in a PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:283.6-283.7: - 280 prog.cob:22: error: a leading +/- sign cannot follow a leading currency symbol - 281 prog.cob:22: error: a trailing currency symbol cannot follow a leading currency symbol - 282 prog.cob:22: error: a trailing +/- sign cannot follow a leading +/- sign - 283 > prog.cob:24: error: invalid PICTURE character 'K' +listings.at-3669-expected.lst:268.6-268.7: + 265 prog.cob:16: error: CR or DB may only occur once in a PICTURE string + 266 prog.cob:17: error: CR or DB may only occur once in a PICTURE string + 267 prog.cob:18: error: S may only occur once in a PICTURE string + 268 > prog.cob:18: error: S must be at start of PICTURE string ---- ^ - 284 prog.cob:25: error: C must be followed by R - 285 prog.cob:26: error: D must be followed by B + 269 prog.cob:19: error: . may only occur once in a PICTURE string + 270 prog.cob:20: error: V may only occur once in a PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:284.6-284.7: - 281 prog.cob:22: error: a trailing currency symbol cannot follow a leading currency symbol - 282 prog.cob:22: error: a trailing +/- sign cannot follow a leading +/- sign - 283 prog.cob:24: error: invalid PICTURE character 'K' - 284 > prog.cob:25: error: C must be followed by R +listings.at-3669-expected.lst:269.6-269.7: + 266 prog.cob:17: error: CR or DB may only occur once in a PICTURE string + 267 prog.cob:18: error: S may only occur once in a PICTURE string + 268 prog.cob:18: error: S must be at start of PICTURE string + 269 > prog.cob:19: error: . may only occur once in a PICTURE string ---- ^ - 285 prog.cob:26: error: D must be followed by B - 286 prog.cob:27: error: numeric field cannot be larger than 38 digits + 270 prog.cob:20: error: V may only occur once in a PICTURE string + 271 prog.cob:21: error: floating '+' symbols cannot have a '9' between them >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:285.6-285.7: - 282 prog.cob:22: error: a trailing +/- sign cannot follow a leading +/- sign - 283 prog.cob:24: error: invalid PICTURE character 'K' - 284 prog.cob:25: error: C must be followed by R - 285 > prog.cob:26: error: D must be followed by B +listings.at-3669-expected.lst:270.6-270.7: + 267 prog.cob:18: error: S may only occur once in a PICTURE string + 268 prog.cob:18: error: S must be at start of PICTURE string + 269 prog.cob:19: error: . may only occur once in a PICTURE string + 270 > prog.cob:20: error: V may only occur once in a PICTURE string ---- ^ - 286 prog.cob:27: error: numeric field cannot be larger than 38 digits - 287 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses + 271 prog.cob:21: error: floating '+' symbols cannot have a '9' between them + 272 prog.cob:22: error: floating '$' symbols cannot have a '9' between them >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:286.6-286.7: - 283 prog.cob:24: error: invalid PICTURE character 'K' - 284 prog.cob:25: error: C must be followed by R - 285 prog.cob:26: error: D must be followed by B - 286 > prog.cob:27: error: numeric field cannot be larger than 38 digits +listings.at-3669-expected.lst:271.6-271.7: + 268 prog.cob:18: error: S must be at start of PICTURE string + 269 prog.cob:19: error: . may only occur once in a PICTURE string + 270 prog.cob:20: error: V may only occur once in a PICTURE string + 271 > prog.cob:21: error: floating '+' symbols cannot have a '9' between them ---- ^ - 287 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses - 288 prog.cob:29: error: parentheses must be preceded by a picture symbol + 272 prog.cob:22: error: floating '$' symbols cannot have a '9' between them + 273 prog.cob:24: error: invalid PICTURE character 'K' >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:287.6-287.7: - 284 prog.cob:25: error: C must be followed by R - 285 prog.cob:26: error: D must be followed by B - 286 prog.cob:27: error: numeric field cannot be larger than 38 digits - 287 > prog.cob:28: error: only up to 10 significant digits are permitted within parentheses +listings.at-3669-expected.lst:272.6-272.7: + 269 prog.cob:19: error: . may only occur once in a PICTURE string + 270 prog.cob:20: error: V may only occur once in a PICTURE string + 271 prog.cob:21: error: floating '+' symbols cannot have a '9' between them + 272 > prog.cob:22: error: floating '$' symbols cannot have a '9' between them ---- ^ - 288 prog.cob:29: error: parentheses must be preceded by a picture symbol - 289 prog.cob:30: error: unbalanced parentheses + 273 prog.cob:24: error: invalid PICTURE character 'K' + 274 prog.cob:25: error: C must be followed by R >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:288.6-288.7: - 285 prog.cob:26: error: D must be followed by B - 286 prog.cob:27: error: numeric field cannot be larger than 38 digits - 287 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses - 288 > prog.cob:29: error: parentheses must be preceded by a picture symbol +listings.at-3669-expected.lst:273.6-273.7: + 270 prog.cob:20: error: V may only occur once in a PICTURE string + 271 prog.cob:21: error: floating '+' symbols cannot have a '9' between them + 272 prog.cob:22: error: floating '$' symbols cannot have a '9' between them + 273 > prog.cob:24: error: invalid PICTURE character 'K' ---- ^ - 289 prog.cob:30: error: unbalanced parentheses - 290 prog.cob:31: error: parentheses must be preceded by a picture symbol + 274 prog.cob:25: error: C must be followed by R + 275 prog.cob:26: error: D must be followed by B >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:289.6-289.7: - 286 prog.cob:27: error: numeric field cannot be larger than 38 digits - 287 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses - 288 prog.cob:29: error: parentheses must be preceded by a picture symbol - 289 > prog.cob:30: error: unbalanced parentheses +listings.at-3669-expected.lst:274.6-274.7: + 271 prog.cob:21: error: floating '+' symbols cannot have a '9' between them + 272 prog.cob:22: error: floating '$' symbols cannot have a '9' between them + 273 prog.cob:24: error: invalid PICTURE character 'K' + 274 > prog.cob:25: error: C must be followed by R ---- ^ - 290 prog.cob:31: error: parentheses must be preceded by a picture symbol - 291 prog.cob:32: error: parentheses must contain an unsigned integer + 275 prog.cob:26: error: D must be followed by B + 276 prog.cob:27: error: numeric field cannot be larger than 38 digits >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:290.6-290.7: - 287 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses - 288 prog.cob:29: error: parentheses must be preceded by a picture symbol - 289 prog.cob:30: error: unbalanced parentheses - 290 > prog.cob:31: error: parentheses must be preceded by a picture symbol +listings.at-3669-expected.lst:275.6-275.7: + 272 prog.cob:22: error: floating '$' symbols cannot have a '9' between them + 273 prog.cob:24: error: invalid PICTURE character 'K' + 274 prog.cob:25: error: C must be followed by R + 275 > prog.cob:26: error: D must be followed by B ---- ^ - 291 prog.cob:32: error: parentheses must contain an unsigned integer - 292 prog.cob:34: error: . cannot follow a P which is after the decimal point + 276 prog.cob:27: error: numeric field cannot be larger than 38 digits + 277 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:291.6-291.7: - 288 prog.cob:29: error: parentheses must be preceded by a picture symbol - 289 prog.cob:30: error: unbalanced parentheses - 290 prog.cob:31: error: parentheses must be preceded by a picture symbol - 291 > prog.cob:32: error: parentheses must contain an unsigned integer +listings.at-3669-expected.lst:276.6-276.7: + 273 prog.cob:24: error: invalid PICTURE character 'K' + 274 prog.cob:25: error: C must be followed by R + 275 prog.cob:26: error: D must be followed by B + 276 > prog.cob:27: error: numeric field cannot be larger than 38 digits ---- ^ - 292 prog.cob:34: error: . cannot follow a P which is after the decimal point - 293 prog.cob:35: error: . cannot follow V + 277 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses + 278 prog.cob:29: error: parentheses must be preceded by a picture symbol >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:292.6-292.7: - 289 prog.cob:30: error: unbalanced parentheses - 290 prog.cob:31: error: parentheses must be preceded by a picture symbol - 291 prog.cob:32: error: parentheses must contain an unsigned integer - 292 > prog.cob:34: error: . cannot follow a P which is after the decimal point +listings.at-3669-expected.lst:277.6-277.7: + 274 prog.cob:25: error: C must be followed by R + 275 prog.cob:26: error: D must be followed by B + 276 prog.cob:27: error: numeric field cannot be larger than 38 digits + 277 > prog.cob:28: error: only up to 10 significant digits are permitted within parentheses ---- ^ - 293 prog.cob:35: error: . cannot follow V - 294 prog.cob:36: error: cannot have both Z and * in PICTURE string + 278 prog.cob:29: error: parentheses must be preceded by a picture symbol + 279 prog.cob:30: error: unbalanced parentheses >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:293.6-293.7: - 290 prog.cob:31: error: parentheses must be preceded by a picture symbol - 291 prog.cob:32: error: parentheses must contain an unsigned integer - 292 prog.cob:34: error: . cannot follow a P which is after the decimal point - 293 > prog.cob:35: error: . cannot follow V +listings.at-3669-expected.lst:278.6-278.7: + 275 prog.cob:26: error: D must be followed by B + 276 prog.cob:27: error: numeric field cannot be larger than 38 digits + 277 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses + 278 > prog.cob:29: error: parentheses must be preceded by a picture symbol ---- ^ - 294 prog.cob:36: error: cannot have both Z and * in PICTURE string - 295 prog.cob:37: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point + 279 prog.cob:30: error: unbalanced parentheses + 280 prog.cob:31: error: parentheses must be preceded by a picture symbol >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:294.6-294.7: - 291 prog.cob:32: error: parentheses must contain an unsigned integer - 292 prog.cob:34: error: . cannot follow a P which is after the decimal point - 293 prog.cob:35: error: . cannot follow V - 294 > prog.cob:36: error: cannot have both Z and * in PICTURE string +listings.at-3669-expected.lst:279.6-279.7: + 276 prog.cob:27: error: numeric field cannot be larger than 38 digits + 277 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses + 278 prog.cob:29: error: parentheses must be preceded by a picture symbol + 279 > prog.cob:30: error: unbalanced parentheses ---- ^ - 295 prog.cob:37: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point - 296 prog.cob:37: error: a trailing +/- sign may only occur once in a PICTURE string + 280 prog.cob:31: error: parentheses must be preceded by a picture symbol + 281 prog.cob:32: error: parentheses must contain an unsigned integer >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:295.6-295.7: - 292 prog.cob:34: error: . cannot follow a P which is after the decimal point - 293 prog.cob:35: error: . cannot follow V - 294 prog.cob:36: error: cannot have both Z and * in PICTURE string - 295 > prog.cob:37: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point +listings.at-3669-expected.lst:280.6-280.7: + 277 prog.cob:28: error: only up to 10 significant digits are permitted within parentheses + 278 prog.cob:29: error: parentheses must be preceded by a picture symbol + 279 prog.cob:30: error: unbalanced parentheses + 280 > prog.cob:31: error: parentheses must be preceded by a picture symbol ---- ^ - 296 prog.cob:37: error: a trailing +/- sign may only occur once in a PICTURE string - 297 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 281 prog.cob:32: error: parentheses must contain an unsigned integer + 282 prog.cob:34: error: . cannot follow a P which is after the decimal point >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:296.6-296.7: - 293 prog.cob:35: error: . cannot follow V - 294 prog.cob:36: error: cannot have both Z and * in PICTURE string - 295 prog.cob:37: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point - 296 > prog.cob:37: error: a trailing +/- sign may only occur once in a PICTURE string +listings.at-3669-expected.lst:281.6-281.7: + 278 prog.cob:29: error: parentheses must be preceded by a picture symbol + 279 prog.cob:30: error: unbalanced parentheses + 280 prog.cob:31: error: parentheses must be preceded by a picture symbol + 281 > prog.cob:32: error: parentheses must contain an unsigned integer ---- ^ - 297 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point - 298 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 282 prog.cob:34: error: . cannot follow a P which is after the decimal point + 283 prog.cob:35: error: . cannot follow V >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:297.6-297.7: - 294 prog.cob:36: error: cannot have both Z and * in PICTURE string - 295 prog.cob:37: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point - 296 prog.cob:37: error: a trailing +/- sign may only occur once in a PICTURE string - 297 > prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point +listings.at-3669-expected.lst:282.6-282.7: + 279 prog.cob:30: error: unbalanced parentheses + 280 prog.cob:31: error: parentheses must be preceded by a picture symbol + 281 prog.cob:32: error: parentheses must contain an unsigned integer + 282 > prog.cob:34: error: . cannot follow a P which is after the decimal point ---- ^ - 298 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point - 299 prog.cob:40: error: A or X cannot follow N + 283 prog.cob:35: error: . cannot follow V + 284 prog.cob:36: error: cannot have both Z and * in PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:298.6-298.7: - 295 prog.cob:37: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point - 296 prog.cob:37: error: a trailing +/- sign may only occur once in a PICTURE string - 297 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point - 298 > prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point +listings.at-3669-expected.lst:283.6-283.7: + 280 prog.cob:31: error: parentheses must be preceded by a picture symbol + 281 prog.cob:32: error: parentheses must contain an unsigned integer + 282 prog.cob:34: error: . cannot follow a P which is after the decimal point + 283 > prog.cob:35: error: . cannot follow V ---- ^ - 299 prog.cob:40: error: A or X cannot follow N - 300 prog.cob:41: error: N cannot follow A or X + 284 prog.cob:36: error: cannot have both Z and * in PICTURE string + 285 prog.cob:37: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:299.6-299.7: - 296 prog.cob:37: error: a trailing +/- sign may only occur once in a PICTURE string - 297 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point - 298 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point - 299 > prog.cob:40: error: A or X cannot follow N +listings.at-3669-expected.lst:284.6-284.7: + 281 prog.cob:32: error: parentheses must contain an unsigned integer + 282 prog.cob:34: error: . cannot follow a P which is after the decimal point + 283 prog.cob:35: error: . cannot follow V + 284 > prog.cob:36: error: cannot have both Z and * in PICTURE string ---- ^ - 300 prog.cob:41: error: N cannot follow A or X - 301 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X + 285 prog.cob:37: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string + 286 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:300.6-300.7: - 297 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point - 298 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point - 299 prog.cob:40: error: A or X cannot follow N - 300 > prog.cob:41: error: N cannot follow A or X +listings.at-3669-expected.lst:285.6-285.7: + 282 prog.cob:34: error: . cannot follow a P which is after the decimal point + 283 prog.cob:35: error: . cannot follow V + 284 prog.cob:36: error: cannot have both Z and * in PICTURE string + 285 > prog.cob:37: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string ---- ^ - 301 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X - 302 prog.cob:43: error: A or X cannot follow . + 286 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 287 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:301.6-301.7: - 298 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point - 299 prog.cob:40: error: A or X cannot follow N - 300 prog.cob:41: error: N cannot follow A or X - 301 > prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X +listings.at-3669-expected.lst:286.6-286.7: + 283 prog.cob:35: error: . cannot follow V + 284 prog.cob:36: error: cannot have both Z and * in PICTURE string + 285 prog.cob:37: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string + 286 > prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point ---- ^ - 302 prog.cob:43: error: A or X cannot follow . - 303 prog.cob:44: error: A or X cannot follow S + 287 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 288 prog.cob:40: error: A or X cannot follow N >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:302.6-302.7: - 299 prog.cob:40: error: A or X cannot follow N - 300 prog.cob:41: error: N cannot follow A or X - 301 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X - 302 > prog.cob:43: error: A or X cannot follow . +listings.at-3669-expected.lst:287.6-287.7: + 284 prog.cob:36: error: cannot have both Z and * in PICTURE string + 285 prog.cob:37: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string + 286 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 287 > prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point ---- ^ - 303 prog.cob:44: error: A or X cannot follow S - 304 prog.cob:45: error: a leading +/- sign cannot follow B, 0 or / + 288 prog.cob:40: error: A or X cannot follow N + 289 prog.cob:41: error: N cannot follow A or X >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:303.6-303.7: - 300 prog.cob:41: error: N cannot follow A or X - 301 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X - 302 prog.cob:43: error: A or X cannot follow . - 303 > prog.cob:44: error: A or X cannot follow S +listings.at-3669-expected.lst:288.6-288.7: + 285 prog.cob:37: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string + 286 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 287 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 288 > prog.cob:40: error: A or X cannot follow N ---- ^ - 304 prog.cob:45: error: a leading +/- sign cannot follow B, 0 or / - 305 prog.cob:45: error: a leading +/- sign cannot follow a floating currency symbol string which is before the decimal point + 289 prog.cob:41: error: N cannot follow A or X + 290 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:304.6-304.7: - 301 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X - 302 prog.cob:43: error: A or X cannot follow . - 303 prog.cob:44: error: A or X cannot follow S - 304 > prog.cob:45: error: a leading +/- sign cannot follow B, 0 or / +listings.at-3669-expected.lst:289.6-289.7: + 286 prog.cob:38: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 287 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 288 prog.cob:40: error: A or X cannot follow N + 289 > prog.cob:41: error: N cannot follow A or X ---- ^ - 305 prog.cob:45: error: a leading +/- sign cannot follow a floating currency symbol string which is before the decimal point - 306 prog.cob:45: error: a leading +/- sign may only occur once in a PICTURE string + 290 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X + 291 prog.cob:43: error: A or X cannot follow . >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:305.6-305.7: - 302 prog.cob:43: error: A or X cannot follow . - 303 prog.cob:44: error: A or X cannot follow S - 304 prog.cob:45: error: a leading +/- sign cannot follow B, 0 or / - 305 > prog.cob:45: error: a leading +/- sign cannot follow a floating currency symbol string which is before the decimal point +listings.at-3669-expected.lst:290.6-290.7: + 287 prog.cob:39: error: a Z or * which is before the decimal point cannot follow a floating currency symbol string which is before the decimal point + 288 prog.cob:40: error: A or X cannot follow N + 289 prog.cob:41: error: N cannot follow A or X + 290 > prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X ---- ^ - 306 prog.cob:45: error: a leading +/- sign may only occur once in a PICTURE string - 307 prog.cob:45: error: a trailing +/- sign cannot follow a leading +/- sign + 291 prog.cob:43: error: A or X cannot follow . + 292 prog.cob:44: error: A or X cannot follow S >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:306.6-306.7: - 303 prog.cob:44: error: A or X cannot follow S - 304 prog.cob:45: error: a leading +/- sign cannot follow B, 0 or / - 305 prog.cob:45: error: a leading +/- sign cannot follow a floating currency symbol string which is before the decimal point - 306 > prog.cob:45: error: a leading +/- sign may only occur once in a PICTURE string +listings.at-3669-expected.lst:291.6-291.7: + 288 prog.cob:40: error: A or X cannot follow N + 289 prog.cob:41: error: N cannot follow A or X + 290 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X + 291 > prog.cob:43: error: A or X cannot follow . ---- ^ - 307 prog.cob:45: error: a trailing +/- sign cannot follow a leading +/- sign - 308 prog.cob:45: error: a trailing +/- sign may only occur once in a PICTURE string + 292 prog.cob:44: error: A or X cannot follow S + 293 prog.cob:45: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:307.6-307.7: - 304 prog.cob:45: error: a leading +/- sign cannot follow B, 0 or / - 305 prog.cob:45: error: a leading +/- sign cannot follow a floating currency symbol string which is before the decimal point - 306 prog.cob:45: error: a leading +/- sign may only occur once in a PICTURE string - 307 > prog.cob:45: error: a trailing +/- sign cannot follow a leading +/- sign +listings.at-3669-expected.lst:292.6-292.7: + 289 prog.cob:41: error: N cannot follow A or X + 290 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X + 291 prog.cob:43: error: A or X cannot follow . + 292 > prog.cob:44: error: A or X cannot follow S ---- ^ - 308 prog.cob:45: error: a trailing +/- sign may only occur once in a PICTURE string - 309 prog.cob:46: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point + 293 prog.cob:45: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string + 294 prog.cob:46: error: floating '+' symbols cannot have a '9' between them >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:308.6-308.7: - 305 prog.cob:45: error: a leading +/- sign cannot follow a floating currency symbol string which is before the decimal point - 306 prog.cob:45: error: a leading +/- sign may only occur once in a PICTURE string - 307 prog.cob:45: error: a trailing +/- sign cannot follow a leading +/- sign - 308 > prog.cob:45: error: a trailing +/- sign may only occur once in a PICTURE string +listings.at-3669-expected.lst:293.6-293.7: + 290 prog.cob:42: error: a Z or * which is before the decimal point cannot follow A or X + 291 prog.cob:43: error: A or X cannot follow . + 292 prog.cob:44: error: A or X cannot follow S + 293 > prog.cob:45: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string ---- ^ - 309 prog.cob:46: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point - 310 prog.cob:47: error: CR or DB cannot follow a leading +/- sign + 294 prog.cob:46: error: floating '+' symbols cannot have a '9' between them + 295 prog.cob:47: error: CR or DB cannot follow a leading +/- sign >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:309.6-309.7: - 306 prog.cob:45: error: a leading +/- sign may only occur once in a PICTURE string - 307 prog.cob:45: error: a trailing +/- sign cannot follow a leading +/- sign - 308 prog.cob:45: error: a trailing +/- sign may only occur once in a PICTURE string - 309 > prog.cob:46: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point +listings.at-3669-expected.lst:294.6-294.7: + 291 prog.cob:43: error: A or X cannot follow . + 292 prog.cob:44: error: A or X cannot follow S + 293 prog.cob:45: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string + 294 > prog.cob:46: error: floating '+' symbols cannot have a '9' between them ---- ^ - 310 prog.cob:47: error: CR or DB cannot follow a leading +/- sign - 311 prog.cob:48: error: CR or DB cannot follow a leading +/- sign + 295 prog.cob:47: error: CR or DB cannot follow a leading +/- sign + 296 prog.cob:48: error: CR or DB cannot follow a leading +/- sign >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:310.6-310.7: - 307 prog.cob:45: error: a trailing +/- sign cannot follow a leading +/- sign - 308 prog.cob:45: error: a trailing +/- sign may only occur once in a PICTURE string - 309 prog.cob:46: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point - 310 > prog.cob:47: error: CR or DB cannot follow a leading +/- sign +listings.at-3669-expected.lst:295.6-295.7: + 292 prog.cob:44: error: A or X cannot follow S + 293 prog.cob:45: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string + 294 prog.cob:46: error: floating '+' symbols cannot have a '9' between them + 295 > prog.cob:47: error: CR or DB cannot follow a leading +/- sign ---- ^ - 311 prog.cob:48: error: CR or DB cannot follow a leading +/- sign - 312 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / + 296 prog.cob:48: error: CR or DB cannot follow a leading +/- sign + 297 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:311.6-311.7: - 308 prog.cob:45: error: a trailing +/- sign may only occur once in a PICTURE string - 309 prog.cob:46: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point - 310 prog.cob:47: error: CR or DB cannot follow a leading +/- sign - 311 > prog.cob:48: error: CR or DB cannot follow a leading +/- sign +listings.at-3669-expected.lst:296.6-296.7: + 293 prog.cob:45: error: only one of the symbols '-' , '+' or '$' may occur multiple times in a PICTURE string + 294 prog.cob:46: error: floating '+' symbols cannot have a '9' between them + 295 prog.cob:47: error: CR or DB cannot follow a leading +/- sign + 296 > prog.cob:48: error: CR or DB cannot follow a leading +/- sign ---- ^ - 312 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / - 313 prog.cob:51: error: a leading +/- sign cannot follow 9 + 297 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / + 298 prog.cob:51: error: a leading +/- sign cannot follow 9 >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:312.6-312.7: - 309 prog.cob:46: error: a trailing +/- sign cannot follow a floating +/- string which is before the decimal point - 310 prog.cob:47: error: CR or DB cannot follow a leading +/- sign - 311 prog.cob:48: error: CR or DB cannot follow a leading +/- sign - 312 > prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / +listings.at-3669-expected.lst:297.6-297.7: + 294 prog.cob:46: error: floating '+' symbols cannot have a '9' between them + 295 prog.cob:47: error: CR or DB cannot follow a leading +/- sign + 296 prog.cob:48: error: CR or DB cannot follow a leading +/- sign + 297 > prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / ---- ^ - 313 prog.cob:51: error: a leading +/- sign cannot follow 9 - 314 prog.cob:52: error: B, 0 or / cannot follow CR or DB + 298 prog.cob:51: error: a leading +/- sign cannot follow 9 + 299 prog.cob:52: error: B, 0 or / cannot follow CR or DB >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:313.6-313.7: - 310 prog.cob:47: error: CR or DB cannot follow a leading +/- sign - 311 prog.cob:48: error: CR or DB cannot follow a leading +/- sign - 312 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / - 313 > prog.cob:51: error: a leading +/- sign cannot follow 9 +listings.at-3669-expected.lst:298.6-298.7: + 295 prog.cob:47: error: CR or DB cannot follow a leading +/- sign + 296 prog.cob:48: error: CR or DB cannot follow a leading +/- sign + 297 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / + 298 > prog.cob:51: error: a leading +/- sign cannot follow 9 ---- ^ - 314 prog.cob:52: error: B, 0 or / cannot follow CR or DB - 315 prog.cob:53: error: 9 cannot follow CR or DB + 299 prog.cob:52: error: B, 0 or / cannot follow CR or DB + 300 prog.cob:53: error: 9 cannot follow CR or DB >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:314.6-314.7: - 311 prog.cob:48: error: CR or DB cannot follow a leading +/- sign - 312 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / - 313 prog.cob:51: error: a leading +/- sign cannot follow 9 - 314 > prog.cob:52: error: B, 0 or / cannot follow CR or DB +listings.at-3669-expected.lst:299.6-299.7: + 296 prog.cob:48: error: CR or DB cannot follow a leading +/- sign + 297 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / + 298 prog.cob:51: error: a leading +/- sign cannot follow 9 + 299 > prog.cob:52: error: B, 0 or / cannot follow CR or DB ---- ^ - 315 prog.cob:53: error: 9 cannot follow CR or DB - 316 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 + 300 prog.cob:53: error: 9 cannot follow CR or DB + 301 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:315.6-315.7: - 312 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / - 313 prog.cob:51: error: a leading +/- sign cannot follow 9 - 314 prog.cob:52: error: B, 0 or / cannot follow CR or DB - 315 > prog.cob:53: error: 9 cannot follow CR or DB +listings.at-3669-expected.lst:300.6-300.7: + 297 prog.cob:50: error: a leading +/- sign cannot follow B, 0 or / + 298 prog.cob:51: error: a leading +/- sign cannot follow 9 + 299 prog.cob:52: error: B, 0 or / cannot follow CR or DB + 300 > prog.cob:53: error: 9 cannot follow CR or DB ---- ^ - 316 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 - 317 prog.cob:55: error: a leading currency symbol cannot follow 9 + 301 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 + 302 prog.cob:55: error: B, 0 or / cannot follow a trailing currency symbol >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:316.6-316.7: - 313 prog.cob:51: error: a leading +/- sign cannot follow 9 - 314 prog.cob:52: error: B, 0 or / cannot follow CR or DB - 315 prog.cob:53: error: 9 cannot follow CR or DB - 316 > prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 +listings.at-3669-expected.lst:301.6-301.7: + 298 prog.cob:51: error: a leading +/- sign cannot follow 9 + 299 prog.cob:52: error: B, 0 or / cannot follow CR or DB + 300 prog.cob:53: error: 9 cannot follow CR or DB + 301 > prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 ---- ^ - 317 prog.cob:55: error: a leading currency symbol cannot follow 9 - 318 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / + 302 prog.cob:55: error: B, 0 or / cannot follow a trailing currency symbol + 303 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:317.6-317.7: - 314 prog.cob:52: error: B, 0 or / cannot follow CR or DB - 315 prog.cob:53: error: 9 cannot follow CR or DB - 316 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 - 317 > prog.cob:55: error: a leading currency symbol cannot follow 9 +listings.at-3669-expected.lst:302.6-302.7: + 299 prog.cob:52: error: B, 0 or / cannot follow CR or DB + 300 prog.cob:53: error: 9 cannot follow CR or DB + 301 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 + 302 > prog.cob:55: error: B, 0 or / cannot follow a trailing currency symbol ---- ^ - 318 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / - 319 prog.cob:57: error: P must be at start or end of PICTURE string + 303 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / + 304 prog.cob:57: error: P must be at start or end of PICTURE string >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:318.6-318.7: - 315 prog.cob:53: error: 9 cannot follow CR or DB - 316 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 - 317 prog.cob:55: error: a leading currency symbol cannot follow 9 - 318 > prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / +listings.at-3669-expected.lst:303.6-303.7: + 300 prog.cob:53: error: 9 cannot follow CR or DB + 301 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 + 302 prog.cob:55: error: B, 0 or / cannot follow a trailing currency symbol + 303 > prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / ---- ^ - 319 prog.cob:57: error: P must be at start or end of PICTURE string - 320 prog.cob:57: error: V cannot follow a P which is after the decimal point + 304 prog.cob:57: error: P must be at start or end of PICTURE string + 305 prog.cob:57: error: V cannot follow a P which is after the decimal point >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:319.6-319.7: - 316 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 - 317 prog.cob:55: error: a leading currency symbol cannot follow 9 - 318 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / - 319 > prog.cob:57: error: P must be at start or end of PICTURE string +listings.at-3669-expected.lst:304.6-304.7: + 301 prog.cob:54: error: a floating currency symbol string which is before the decimal point cannot follow 9 + 302 prog.cob:55: error: B, 0 or / cannot follow a trailing currency symbol + 303 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / + 304 > prog.cob:57: error: P must be at start or end of PICTURE string ---- ^ - 320 prog.cob:57: error: V cannot follow a P which is after the decimal point - 321 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 305 prog.cob:57: error: V cannot follow a P which is after the decimal point + 306 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:320.6-320.7: - 317 prog.cob:55: error: a leading currency symbol cannot follow 9 - 318 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / - 319 prog.cob:57: error: P must be at start or end of PICTURE string - 320 > prog.cob:57: error: V cannot follow a P which is after the decimal point +listings.at-3669-expected.lst:305.6-305.7: + 302 prog.cob:55: error: B, 0 or / cannot follow a trailing currency symbol + 303 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / + 304 prog.cob:57: error: P must be at start or end of PICTURE string + 305 > prog.cob:57: error: V cannot follow a P which is after the decimal point ---- ^ - 321 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 322 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 306 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 307 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:321.6-321.7: - 318 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / - 319 prog.cob:57: error: P must be at start or end of PICTURE string - 320 prog.cob:57: error: V cannot follow a P which is after the decimal point - 321 > prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol +listings.at-3669-expected.lst:306.6-306.7: + 303 prog.cob:56: error: a leading currency symbol cannot follow B, 0 or / + 304 prog.cob:57: error: P must be at start or end of PICTURE string + 305 prog.cob:57: error: V cannot follow a P which is after the decimal point + 306 > prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol ---- ^ - 322 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 323 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 307 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 308 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:322.6-322.7: - 319 prog.cob:57: error: P must be at start or end of PICTURE string - 320 prog.cob:57: error: V cannot follow a P which is after the decimal point - 321 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 322 > prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol +listings.at-3669-expected.lst:307.6-307.7: + 304 prog.cob:57: error: P must be at start or end of PICTURE string + 305 prog.cob:57: error: V cannot follow a P which is after the decimal point + 306 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 307 > prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol ---- ^ - 323 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 324 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer + 308 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 309 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:323.6-323.7: - 320 prog.cob:57: error: V cannot follow a P which is after the decimal point - 321 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 322 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 323 > prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol +listings.at-3669-expected.lst:308.6-308.7: + 305 prog.cob:57: error: V cannot follow a P which is after the decimal point + 306 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 307 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 308 > prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol ---- ^ - 324 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer - 325 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer + 309 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer + 310 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:324.6-324.7: - 321 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 322 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 323 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 324 > prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer +listings.at-3669-expected.lst:309.6-309.7: + 306 prog.cob:59: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 307 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 308 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 309 > prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer ---- ^ - 325 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer - 326 prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer + 310 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer + 311 prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:325.6-325.7: - 322 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 323 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 324 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer - 325 > prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer +listings.at-3669-expected.lst:310.6-310.7: + 307 prog.cob:60: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 308 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 309 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer + 310 > prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer ---- ^ - 326 prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer - 327 prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined + 311 prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer + 312 prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:326.6-326.7: - 323 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol - 324 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer - 325 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer - 326 > prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer +listings.at-3669-expected.lst:311.6-311.7: + 308 prog.cob:61: error: PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol + 309 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer + 310 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer + 311 > prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer ---- ^ - 327 prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined - 328 prog.cob:81: warning: uncommon parentheses + 312 prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined + 313 prog.cob:81: warning: uncommon parentheses >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:327.6-327.7: - 324 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer - 325 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer - 326 prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer - 327 > prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined +listings.at-3669-expected.lst:312.6-312.7: + 309 prog.cob:67: error: 'STR-CONSTANT' is not an unsigned positive integer + 310 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer + 311 prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer + 312 > prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined ---- ^ - 328 prog.cob:81: warning: uncommon parentheses - 329 + 313 prog.cob:81: warning: uncommon parentheses + 314 >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:328.6-328.7: - 325 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer - 326 prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer - 327 prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined - 328 > prog.cob:81: warning: uncommon parentheses +listings.at-3669-expected.lst:313.6-313.7: + 310 prog.cob:68: error: 'FLOAT-CONSTANT' is not an unsigned positive integer + 311 prog.cob:69: error: 'SIGNED-CONSTANT' is not an unsigned positive integer + 312 prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined + 313 > prog.cob:81: warning: uncommon parentheses ---- ^ - 329 - 330 1 warning in compilation group + 314 + 315 1 warning in compilation group >> Error: Unexpected indicator: `o' -listings.at-3684-expected.lst:330.6-330.7: - 327 prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined - 328 prog.cob:81: warning: uncommon parentheses - 329 - 330 > 1 warning in compilation group +listings.at-3669-expected.lst:315.6-315.7: + 312 prog.cob:70: error: 'UNSEEN-CONSTANT' is not defined + 313 prog.cob:81: warning: uncommon parentheses + 314 + 315 > 1 warning in compilation group ---- ^ - 331 57 errors in compilation group + 316 50 errors in compilation group >> Error: Unexpected indicator: `i' -listings.at-3684-expected.lst:331.6-331.7: - 328 prog.cob:81: warning: uncommon parentheses - 329 - 330 1 warning in compilation group - 331 > 57 errors in compilation group +listings.at-3669-expected.lst:316.6-316.7: + 313 prog.cob:81: warning: uncommon parentheses + 314 + 315 1 warning in compilation group + 316 > 50 errors in compilation group ---- ^ >> Error: Unexpected indicator: `o' -Considering: import/gnucobol/tests/testsuite.src/listings.at:3703:0 -listings.at-3703-prog.cob:1.7-1.8: +Considering: import/gnucobol/tests/testsuite.src/listings.at:3688:0 +listings.at-3688-prog.cob:1.7-1.8: 1 > 000001 $SET SOURCEFORMAT "VARIABLE" ---- ^ 2 000010 IDENTIFICATION DIVISION. 3 000020 PROGRAM-ID. prog. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/listings.at:3740:0 -Considering: import/gnucobol/tests/testsuite.src/listings.at:3825:0 -listings.at-3825-prog.cob:6.7-6.23: +Considering: import/gnucobol/tests/testsuite.src/listings.at:3725:0 +Considering: import/gnucobol/tests/testsuite.src/listings.at:3810:0 +listings.at-3810-prog.cob:6.7-6.23: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -5478,7 +5268,7 @@ listings.at-3825-prog.cob:6.7-6.23: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -listings.at-3825-prog.cob:7.7-7.24: +listings.at-3810-prog.cob:7.7-7.24: 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. 6 COPY "copy.inc". @@ -5490,7 +5280,7 @@ listings.at-3825-prog.cob:7.7-7.24: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -listings.at-3825-prog.cob:9.7-9.20: +listings.at-3810-prog.cob:9.7-9.20: 6 COPY "copy.inc". 7 COPY "copy2.inc". 8 PROCEDURE DIVISION. @@ -5500,7 +5290,7 @@ listings.at-3825-prog.cob:9.7-9.20: 11 END-DISPLAY. >> Error: Invalid >>LISTING compiler directive -listings.at-3825-prog.cob:12.7-12.20: +listings.at-3810-prog.cob:12.7-12.20: 9 >>LISTING OFF 10 DISPLAY TEST1-VAR NO ADVANCING 11 END-DISPLAY. @@ -5509,8 +5299,8 @@ listings.at-3825-prog.cob:12.7-12.20: 13 STOP RUN. >> Error: Invalid >>LISTING compiler directive -Considering: import/gnucobol/tests/testsuite.src/listings.at:3921:0 -listings.at-3921-prog.cob:6.7-6.23: +Considering: import/gnucobol/tests/testsuite.src/listings.at:3906:0 +listings.at-3906-prog.cob:6.7-6.23: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -5522,7 +5312,7 @@ listings.at-3921-prog.cob:6.7-6.23: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -listings.at-3921-prog.cob:7.7-7.24: +listings.at-3906-prog.cob:7.7-7.24: 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. 6 COPY "copy.inc". @@ -5534,7 +5324,7 @@ listings.at-3921-prog.cob:7.7-7.24: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -listings.at-3921-prog.cob:9.0-9.13: +listings.at-3906-prog.cob:9.0-9.13: 6 COPY "copy.inc". 7 COPY "copy2.inc". 8 PROCEDURE DIVISION. @@ -5544,7 +5334,7 @@ listings.at-3921-prog.cob:9.0-9.13: 11 END-DISPLAY. >> Error: Invalid >>LISTING compiler directive -listings.at-3921-prog.cob:12.0-12.13: +listings.at-3906-prog.cob:12.0-12.13: 9 >>LISTING OFF 10 DISPLAY TEST1-VAR NO ADVANCING 11 END-DISPLAY. @@ -5553,15 +5343,15 @@ listings.at-3921-prog.cob:12.0-12.13: 13 STOP RUN. >> Error: Invalid >>LISTING compiler directive -Considering: import/gnucobol/tests/testsuite.src/listings.at:4001:0 -listings.at-4001-prog.cob:1.11-1.16: +Considering: import/gnucobol/tests/testsuite.src/listings.at:3986:0 +listings.at-3986-prog.cob:1.11-1.16: 1 > TITLE "GnuCOBOL lists IBM" ---- ^^^^^ 2 IDENTIFICATION DIVISION. 3 SKIP1 >> Error: Invalid syntax -listings.at-4001-prog.cob:3.11-3.16: +listings.at-3986-prog.cob:3.11-3.16: 1 TITLE "GnuCOBOL lists IBM" 2 IDENTIFICATION DIVISION. 3 > SKIP1 @@ -5570,7 +5360,7 @@ listings.at-4001-prog.cob:3.11-3.16: 5 SKIP2 >> Error: Invalid syntax -listings.at-4001-prog.cob:5.11-5.16: +listings.at-3986-prog.cob:5.11-5.16: 2 IDENTIFICATION DIVISION. 3 SKIP1 4 PROGRAM-ID. prog. @@ -5580,7 +5370,7 @@ listings.at-4001-prog.cob:5.11-5.16: 7 SKIP3 >> Error: Invalid syntax -listings.at-4001-prog.cob:7.11-7.16: +listings.at-3986-prog.cob:7.11-7.16: 4 PROGRAM-ID. prog. 5 SKIP2 6 DATA DIVISION. @@ -5590,7 +5380,7 @@ listings.at-4001-prog.cob:7.11-7.16: 9 01 TITLE-01 PIC X(2). >> Error: Invalid syntax -listings.at-4001-prog.cob:11.11-11.16: +listings.at-3986-prog.cob:11.11-11.16: 8 WORKING-STORAGE SECTION. 9 01 TITLE-01 PIC X(2). 10 01 TITLE-02 PIC X(2). @@ -5600,7 +5390,7 @@ listings.at-4001-prog.cob:11.11-11.16: 13 EJECT >> Error: Invalid syntax -listings.at-4001-prog.cob:13.12: +listings.at-3986-prog.cob:13.12: 10 01 TITLE-02 PIC X(2). 11 TITLE "here goes the code" 12 PROCEDURE DIVISION. @@ -5610,7 +5400,7 @@ listings.at-4001-prog.cob:13.12: 15 TITLE-02. >> Hint: Missing . -listings.at-4001-prog.cob:14.11-14.15: +listings.at-3986-prog.cob:14.11-14.15: 11 TITLE "here goes the code" 12 PROCEDURE DIVISION. 13 EJECT @@ -5620,9 +5410,9 @@ listings.at-4001-prog.cob:14.11-14.15: 16 STOP RUN. >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/listings.at:4057:0 -Considering: import/gnucobol/tests/testsuite.src/listings.at:4091:0 -listings.at-4091-prog2.cob:6.0-6.6: +Considering: import/gnucobol/tests/testsuite.src/listings.at:4042:0 +Considering: import/gnucobol/tests/testsuite.src/listings.at:4076:0 +listings.at-4076-prog2.cob:6.0-6.6: 3 PROGRAM-ID. prog2. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -5632,9 +5422,9 @@ listings.at-4091-prog2.cob:6.0-6.6: 8 STOP RUN. >> Error: Invalid >>PAGE compiler directive -Considering: import/gnucobol/tests/testsuite.src/listings.at:4177:0 -Considering: import/gnucobol/tests/testsuite.src/listings.at:5827:0 -listings.at-5827-prog.cob:16.25-16.33: +Considering: import/gnucobol/tests/testsuite.src/listings.at:4162:0 +Considering: import/gnucobol/tests/testsuite.src/listings.at:5812:0 +listings.at-5812-prog.cob:16.25-16.33: 13 FILE-CONTROL. 14 15 SELECT TRANSACTION-DATA @@ -5644,7 +5434,7 @@ listings.at-5827-prog.cob:16.25-16.33: 18 >> Warning: Ignored EXTERNAL (implementation pending) -listings.at-5827-prog.cob:20.25-20.33: +listings.at-5812-prog.cob:20.25-20.33: 17 ORGANIZATION IS LINE SEQUENTIAL. 18 19 SELECT REPORT-FILE @@ -5654,7 +5444,7 @@ listings.at-5827-prog.cob:20.25-20.33: 22 DATA DIVISION. >> Warning: Ignored EXTERNAL (implementation pending) -listings.at-5827-prog.cob:20.34-20.38: +listings.at-5812-prog.cob:20.34-20.38: 17 ORGANIZATION IS LINE SEQUENTIAL. 18 19 SELECT REPORT-FILE @@ -5664,7 +5454,7 @@ listings.at-5827-prog.cob:20.34-20.38: 22 DATA DIVISION. >> Error: Invalid syntax -listings.at-5827-prog.cob:20.38: +listings.at-5812-prog.cob:20.38: 17 ORGANIZATION IS LINE SEQUENTIAL. 18 19 SELECT REPORT-FILE @@ -5674,7 +5464,7 @@ listings.at-5827-prog.cob:20.38: 22 DATA DIVISION. >> Hint: Missing SEQUENTIAL -listings.at-5827-prog.cob:20.39-20.48: +listings.at-5812-prog.cob:20.39-20.48: 17 ORGANIZATION IS LINE SEQUENTIAL. 18 19 SELECT REPORT-FILE @@ -5684,5 +5474,5 @@ listings.at-5827-prog.cob:20.39-20.48: 22 DATA DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/listings.at:6143:0 -Considering: import/gnucobol/tests/testsuite.src/listings.at:6955:0 +Considering: import/gnucobol/tests/testsuite.src/listings.at:6128:0 +Considering: import/gnucobol/tests/testsuite.src/listings.at:6940:0 diff --git a/test/output-tests/run_extensions.expected b/test/output-tests/run_extensions.expected index 73c92b6a7..b562ddb67 100644 --- a/test/output-tests/run_extensions.expected +++ b/test/output-tests/run_extensions.expected @@ -1431,8 +1431,8 @@ Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2143:0 Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2166:0 Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2213:0 Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2210:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2279:0 -run_extensions.at-2279-prog.cob:14.31: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2286:0 +run_extensions.at-2286-prog.cob:14.31: 11 PROCEDURE DIVISION. 12 DISPLAY tally WITH NO ADVANCING. 13 GOBACK. @@ -1440,27 +1440,27 @@ run_extensions.at-2279-prog.cob:14.31: ---- ^ >> Hint: Missing END PROGRAM . -run_extensions.at-2279-prog.cob:15.0: +run_extensions.at-2286-prog.cob:15.0: 12 DISPLAY tally WITH NO ADVANCING. 13 GOBACK. 14 END PROGRAM nested. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2306:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2366:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2365:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2313:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2373:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2372:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2493:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2498:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2478:0 Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2486:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2491:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2471:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2479:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2483:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2538:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2541:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2544:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2547:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2595:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2595:0 -run_extensions.at-2595-prog1.cob:5.24-5.33: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2490:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2545:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2548:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2551:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2554:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2602:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2602:0 +run_extensions.at-2602-prog1.cob:5.24-5.33: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog1. 4 PROCEDURE DIVISION. @@ -1468,12 +1468,12 @@ run_extensions.at-2595-prog1.cob:5.24-5.33: ---- ^^^^^^^^^ >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2595:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2638:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2639:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2700:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2699:0 -run_extensions.at-2699-prog.cob:9.30: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2602:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2645:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2646:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2711:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2710:0 +run_extensions.at-2710-prog.cob:9.30: 6 FILE-CONTROL. 7 SELECT TEST-FILE ASSIGN KEYBOARD 8 ORGANIZATION IS LINE SEQUENTIAL. @@ -1483,7 +1483,7 @@ run_extensions.at-2699-prog.cob:9.30: 11 DATA DIVISION. >> Hint: Missing USING -run_extensions.at-2699-prog.cob:9.32-9.39: +run_extensions.at-2710-prog.cob:9.32-9.39: 6 FILE-CONTROL. 7 SELECT TEST-FILE ASSIGN KEYBOARD 8 ORGANIZATION IS LINE SEQUENTIAL. @@ -1493,9 +1493,9 @@ run_extensions.at-2699-prog.cob:9.32-9.39: 11 DATA DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2761:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2760:0 -run_extensions.at-2760-prog.cob:9.30: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2772:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2771:0 +run_extensions.at-2771-prog.cob:9.30: 6 FILE-CONTROL. 7 SELECT TEST-FILE ASSIGN KEYBOARD 8 ORGANIZATION IS LINE SEQUENTIAL. @@ -1505,7 +1505,7 @@ run_extensions.at-2760-prog.cob:9.30: 11 SELECT SORT-FILE. >> Hint: Missing USING -run_extensions.at-2760-prog.cob:9.32-9.39: +run_extensions.at-2771-prog.cob:9.32-9.39: 6 FILE-CONTROL. 7 SELECT TEST-FILE ASSIGN KEYBOARD 8 ORGANIZATION IS LINE SEQUENTIAL. @@ -1515,7 +1515,7 @@ run_extensions.at-2760-prog.cob:9.32-9.39: 11 SELECT SORT-FILE. >> Error: Invalid syntax -run_extensions.at-2760-prog.cob:11.23-11.24: +run_extensions.at-2771-prog.cob:11.23-11.24: 8 ORGANIZATION IS LINE SEQUENTIAL. 9 SELECT TEST-OUT ASSIGN DISPLAY 10 ORGANIZATION IS LINE SEQUENTIAL. @@ -1525,8 +1525,8 @@ run_extensions.at-2760-prog.cob:11.23-11.24: 13 FILE SECTION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2809:0 -run_extensions.at-2809-prog.cob:26.24: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2820:0 +run_extensions.at-2820-prog.cob:26.24: 23 END-ACCEPT. 24 DISPLAY "(" Y ")" 25 END-DISPLAY. @@ -1536,7 +1536,7 @@ run_extensions.at-2809-prog.cob:26.24: 28 DISPLAY "(" Z ")" >> Hint: Missing -run_extensions.at-2809-prog.cob:26.25-26.40: +run_extensions.at-2820-prog.cob:26.25-26.40: 23 END-ACCEPT. 24 DISPLAY "(" Y ")" 25 END-DISPLAY. @@ -1546,11 +1546,11 @@ run_extensions.at-2809-prog.cob:26.25-26.40: 28 DISPLAY "(" Z ")" >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2835:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2861:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2885:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2998:0 -run_extensions.at-2998-prog.cob:11.11-11.17: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2846:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2872:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:2896:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3009:0 +run_extensions.at-3009-prog.cob:11.11-11.17: 8 ON IS SWIT1-ON 9 OFF IS SWIT1-OFF 10 . @@ -1560,8 +1560,8 @@ run_extensions.at-2998-prog.cob:11.11-11.17: 13 OFF IS SWIT2-OFF >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3066:0 -run_extensions.at-3066-prog.cob:36.19-36.25: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3077:0 +run_extensions.at-3077-prog.cob:36.19-36.25: 33 10 SECOND-VARIANT-B REDEFINES SECOND-HEADER. 34 20 PART-B-SECOND PIC X(3879). 35 PROCEDURE DIVISION. @@ -1571,7 +1571,7 @@ run_extensions.at-3066-prog.cob:36.19-36.25: 38 DISPLAY "Test 1 " Z. >> Error: Invalid syntax -run_extensions.at-3066-prog.cob:39.19-39.25: +run_extensions.at-3077-prog.cob:39.19-39.25: 36 MOVE LENGTH OF XMAIN TO Z. 37 IF Z NOT = 8 38 DISPLAY "Test 1 " Z. @@ -1581,7 +1581,7 @@ run_extensions.at-3066-prog.cob:39.19-39.25: 41 DISPLAY "Test 2 " Z. >> Error: Invalid syntax -run_extensions.at-3066-prog.cob:42.19-42.25: +run_extensions.at-3077-prog.cob:42.19-42.25: 39 MOVE LENGTH OF XMAINRED TO Z. 40 IF Z NOT = 9 41 DISPLAY "Test 2 " Z. @@ -1591,7 +1591,7 @@ run_extensions.at-3066-prog.cob:42.19-42.25: 44 DISPLAY "Test 3 " Z. >> Error: Invalid syntax -run_extensions.at-3066-prog.cob:45.19-45.25: +run_extensions.at-3077-prog.cob:45.19-45.25: 42 MOVE LENGTH OF XMAIN03 TO Z. 43 IF Z NOT = 5 44 DISPLAY "Test 3 " Z. @@ -1601,7 +1601,7 @@ run_extensions.at-3066-prog.cob:45.19-45.25: 47 DISPLAY "Test 4 " Z. >> Error: Invalid syntax -run_extensions.at-3066-prog.cob:48.19-48.25: +run_extensions.at-3077-prog.cob:48.19-48.25: 45 MOVE LENGTH OF XMAIN0501 TO Z. 46 IF Z NOT = 4 47 DISPLAY "Test 4 " Z. @@ -1611,7 +1611,7 @@ run_extensions.at-3066-prog.cob:48.19-48.25: 50 DISPLAY "Test 5 " Z. >> Error: Invalid syntax -run_extensions.at-3066-prog.cob:52.22-52.28: +run_extensions.at-3077-prog.cob:52.22-52.28: 49 IF Z NOT = 5 50 DISPLAY "Test 5 " Z. 51 IF LENGTH OF USE-FIRST NOT = 33211 @@ -1621,7 +1621,7 @@ run_extensions.at-3066-prog.cob:52.22-52.28: 54 DISPLAY LENGTH OF USE-SECOND END-DISPLAY. >> Error: Invalid syntax -run_extensions.at-3066-prog.cob:54.22-54.28: +run_extensions.at-3077-prog.cob:54.22-54.28: 51 IF LENGTH OF USE-FIRST NOT = 33211 52 DISPLAY LENGTH OF USE-FIRST END-DISPLAY. 53 IF LENGTH OF USE-SECOND NOT = 27241 @@ -1630,9 +1630,9 @@ run_extensions.at-3066-prog.cob:54.22-54.28: 55 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3092:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3117:0 -run_extensions.at-3117-prog.cob:7.11-7.15: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3103:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3128:0 +run_extensions.at-3128-prog.cob:7.11-7.15: 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. 6 01 TERMINAL PIC XX VALUE "OK". @@ -1642,7 +1642,7 @@ run_extensions.at-3117-prog.cob:7.11-7.15: 9 DISPLAY TERMINAL SEND. >> Error: Invalid syntax -run_extensions.at-3117-prog.cob:9.32-9.33: +run_extensions.at-3128-prog.cob:9.32-9.33: 6 01 TERMINAL PIC XX VALUE "OK". 7 01 SEND PIC XX VALUE "OK". 8 PROCEDURE DIVISION. @@ -1651,7 +1651,7 @@ run_extensions.at-3117-prog.cob:9.32-9.33: 10 STOP RUN. >> Error: Invalid syntax -run_extensions.at-3117-prog.cob:9.32: +run_extensions.at-3128-prog.cob:9.32: 6 01 TERMINAL PIC XX VALUE "OK". 7 01 SEND PIC XX VALUE "OK". 8 PROCEDURE DIVISION. @@ -1660,30 +1660,30 @@ run_extensions.at-3117-prog.cob:9.32: 10 STOP RUN. >> Hint: Missing FROM -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3162:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3238:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3237:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3240:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3283:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3282:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3329:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3328:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3354:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3383:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3403:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3429:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3454:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3479:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3506:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3533:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3560:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3587:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3614:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3641:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3667:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3694:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4117:0 -run_extensions.at-4117-prog.cob:11.53: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3173:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3249:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3248:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3251:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3294:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3293:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3340:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3339:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3365:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3394:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3414:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3440:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3465:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3490:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3517:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3544:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3571:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3598:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3625:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3652:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3678:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:3705:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4128:0 +run_extensions.at-4128-prog.cob:11.53: 8 05 OPTIONRECORD OCCURS 2 TIMES. 9 10 ONAME PIC X(25). 10 10 HAS-VALUE PIC 9. @@ -1693,7 +1693,7 @@ run_extensions.at-4117-prog.cob:11.53: 13 >> Hint: Missing -run_extensions.at-4117-prog.cob:11.54-11.58: +run_extensions.at-4128-prog.cob:11.54-11.58: 8 05 OPTIONRECORD OCCURS 2 TIMES. 9 10 ONAME PIC X(25). 10 10 HAS-VALUE PIC 9. @@ -1703,8 +1703,8 @@ run_extensions.at-4117-prog.cob:11.54-11.58: 13 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4119:0 -run_extensions.at-4119-prog2.cob:14.53: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4130:0 +run_extensions.at-4130-prog2.cob:14.53: 11 05 OPTIONRECORD OCCURS 3 TIMES. 12 10 ONAME PIC X(25). 13 10 HAS-VALUE PIC 9. @@ -1714,7 +1714,7 @@ run_extensions.at-4119-prog2.cob:14.53: 16 >> Hint: Missing -run_extensions.at-4119-prog2.cob:14.54-14.58: +run_extensions.at-4130-prog2.cob:14.54-14.58: 11 05 OPTIONRECORD OCCURS 3 TIMES. 12 10 ONAME PIC X(25). 13 10 HAS-VALUE PIC 9. @@ -1724,8 +1724,8 @@ run_extensions.at-4119-prog2.cob:14.54-14.58: 16 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4123:0 -run_extensions.at-4123-prog3.cob:12.53: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4134:0 +run_extensions.at-4134-prog3.cob:12.53: 9 05 OPTIONRECORD OCCURS 3 TIMES. 10 10 ONAME PIC X(25). 11 10 HAS-VALUE PIC 9. @@ -1735,7 +1735,7 @@ run_extensions.at-4123-prog3.cob:12.53: 14 01 LONGIND PIC 99. >> Hint: Missing -run_extensions.at-4123-prog3.cob:12.54-12.58: +run_extensions.at-4134-prog3.cob:12.54-12.58: 9 05 OPTIONRECORD OCCURS 3 TIMES. 10 10 ONAME PIC X(25). 11 10 HAS-VALUE PIC 9. @@ -1745,8 +1745,8 @@ run_extensions.at-4123-prog3.cob:12.54-12.58: 14 01 LONGIND PIC 99. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4125:0 -run_extensions.at-4125-prog4.cob:12.53: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4136:0 +run_extensions.at-4136-prog4.cob:12.53: 9 05 OPTIONRECORD OCCURS 3 TIMES. 10 10 ONAME PIC X(25). 11 10 HAS-VALUE PIC 9. @@ -1756,7 +1756,7 @@ run_extensions.at-4125-prog4.cob:12.53: 14 01 LONGIND PIC 99. >> Hint: Missing -run_extensions.at-4125-prog4.cob:12.54-12.58: +run_extensions.at-4136-prog4.cob:12.54-12.58: 9 05 OPTIONRECORD OCCURS 3 TIMES. 10 10 ONAME PIC X(25). 11 10 HAS-VALUE PIC 9. @@ -1766,8 +1766,8 @@ run_extensions.at-4125-prog4.cob:12.54-12.58: 14 01 LONGIND PIC 99. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4129:0 -run_extensions.at-4129-prog5.cob:12.53: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4140:0 +run_extensions.at-4140-prog5.cob:12.53: 9 05 OPTIONRECORD OCCURS 2 TIMES. 10 10 ONAME PIC X(45). 11 10 HAS-VALUE PIC 9. @@ -1777,7 +1777,7 @@ run_extensions.at-4129-prog5.cob:12.53: 14 01 LONGIND PIC 99. >> Hint: Missing -run_extensions.at-4129-prog5.cob:12.54-12.58: +run_extensions.at-4140-prog5.cob:12.54-12.58: 9 05 OPTIONRECORD OCCURS 2 TIMES. 10 10 ONAME PIC X(45). 11 10 HAS-VALUE PIC 9. @@ -1787,10 +1787,10 @@ run_extensions.at-4129-prog5.cob:12.54-12.58: 14 01 LONGIND PIC 99. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4192:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4247:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4381:0 -run_extensions.at-4381-prog.cob:68.33: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4203:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4258:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4392:0 +run_extensions.at-4392-prog.cob:68.33: 65 END-IF 66 67 SET ENVIRONMENT "TZ" TO "PST8PDT" @@ -1800,7 +1800,7 @@ run_extensions.at-4381-prog.cob:68.33: 70 END-CALL >> Hint: Missing -run_extensions.at-4381-prog.cob:68.34-68.41: +run_extensions.at-4392-prog.cob:68.34-68.41: 65 END-IF 66 67 SET ENVIRONMENT "TZ" TO "PST8PDT" @@ -1810,8 +1810,8 @@ run_extensions.at-4381-prog.cob:68.34-68.41: 70 END-CALL >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4379:0 -run_extensions.at-4379-test_errno.c:7.6-7.7: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4390:0 +run_extensions.at-4390-test_errno.c:7.6-7.7: 4 5 #include 6 @@ -1821,7 +1821,7 @@ run_extensions.at-4379-test_errno.c:7.6-7.7: 9 { >> Error: Unexpected indicator: `T' -run_extensions.at-4379-test_errno.c:7.7-7.8: +run_extensions.at-4390-test_errno.c:7.7-7.8: 4 5 #include 6 @@ -1831,7 +1831,7 @@ run_extensions.at-4379-test_errno.c:7.7-7.8: 9 { >> Error: Invalid syntax -run_extensions.at-4379-test_errno.c:8.6-8.7: +run_extensions.at-4390-test_errno.c:8.6-8.7: 5 #include 6 7 COB_EXT_EXPORT int @@ -1841,7 +1841,7 @@ run_extensions.at-4379-test_errno.c:8.6-8.7: 10 FILE *fail; >> Error: Unexpected indicator: `r' -run_extensions.at-4379-test_errno.c:10.6-10.7: +run_extensions.at-4390-test_errno.c:10.6-10.7: 7 COB_EXT_EXPORT int 8 test_errno(void) 9 { @@ -1851,7 +1851,7 @@ run_extensions.at-4379-test_errno.c:10.6-10.7: 12 if (errno != 2) { >> Error: Unexpected indicator: `L' -run_extensions.at-4379-test_errno.c:11.6-11.7: +run_extensions.at-4390-test_errno.c:11.6-11.7: 8 test_errno(void) 9 { 10 FILE *fail; @@ -1861,7 +1861,7 @@ run_extensions.at-4379-test_errno.c:11.6-11.7: 13 printf("BAD ERRNO %d", errno); >> Error: Unexpected indicator: `i' -run_extensions.at-4379-test_errno.c:14.6-14.7: +run_extensions.at-4390-test_errno.c:14.6-14.7: 11 fail = fopen("file-not-to-be-found", "r"); 12 if (errno != 2) { 13 printf("BAD ERRNO %d", errno); @@ -1871,7 +1871,7 @@ run_extensions.at-4379-test_errno.c:14.6-14.7: 16 } >> Error: Unexpected indicator: `e' -run_extensions.at-4379-test_errno.c:17.6-17.7: +run_extensions.at-4390-test_errno.c:17.6-17.7: 14 } else { 15 if (fail) fclose(fail); 16 } @@ -1880,8 +1880,8 @@ run_extensions.at-4379-test_errno.c:17.6-17.7: 18 } >> Error: Unexpected indicator: `t' -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4380:0 -run_extensions.at-4380-test_stdio.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4391:0 +run_extensions.at-4391-test_stdio.c:5.6-5.7: 2 #include 3 4 #include @@ -1891,7 +1891,7 @@ run_extensions.at-4380-test_stdio.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -run_extensions.at-4380-test_stdio.c:5.7-5.8: +run_extensions.at-4391-test_stdio.c:5.7-5.8: 2 #include 3 4 #include @@ -1901,7 +1901,7 @@ run_extensions.at-4380-test_stdio.c:5.7-5.8: 7 { >> Error: Invalid syntax -run_extensions.at-4380-test_stdio.c:6.6-6.7: +run_extensions.at-4391-test_stdio.c:6.6-6.7: 3 4 #include 5 COB_EXT_EXPORT int @@ -1911,7 +1911,7 @@ run_extensions.at-4380-test_stdio.c:6.6-6.7: 8 if (feof(si)) { >> Error: Unexpected indicator: `t' -run_extensions.at-4380-test_stdio.c:11.6-11.7: +run_extensions.at-4391-test_stdio.c:11.6-11.7: 8 if (feof(si)) { 9 fprintf(se, "BAD STDIN EOF\n"); 10 } @@ -1921,7 +1921,7 @@ run_extensions.at-4380-test_stdio.c:11.6-11.7: 13 } >> Error: Unexpected indicator: `r' -run_extensions.at-4380-test_stdio.c:12.6-12.7: +run_extensions.at-4391-test_stdio.c:12.6-12.7: 9 fprintf(se, "BAD STDIN EOF\n"); 10 } 11 fprintf(so, "OUT"); @@ -1930,14 +1930,14 @@ run_extensions.at-4380-test_stdio.c:12.6-12.7: 13 } >> Error: Unexpected indicator: `t' -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4454:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4597:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4672:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4767:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4796:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4834:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4853:0 -run_extensions.at-4853-progc.cob:12.7-12.25: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4465:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4608:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4683:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4778:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4807:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4845:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4864:0 +run_extensions.at-4864-progc.cob:12.7-12.25: 9 IF first-call NOT = SPACE 10 GOBACK. 11 MOVE 'X' TO first-call @@ -1948,8 +1948,8 @@ run_extensions.at-4853-progc.cob:12.7-12.25: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4892:0 -run_extensions.at-4892-prog.cob:7.7-7.8: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4903:0 +run_extensions.at-4903-prog.cob:7.7-7.8: 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. 6 01 var1 pic x. @@ -1959,7 +1959,7 @@ run_extensions.at-4892-prog.cob:7.7-7.8: 9 >> DISPLAY some.text-here >> Error: Invalid syntax -run_extensions.at-4892-prog.cob:9.7-9.32: +run_extensions.at-4903-prog.cob:9.7-9.32: 6 01 var1 pic x. 7 $DISPLAY MF compile time text # A.0-B;C *> without comment 8 01 var2 pic x. @@ -1969,7 +1969,7 @@ run_extensions.at-4892-prog.cob:9.7-9.32: 11 PROCEDURE DIVISION. >> Error: Invalid >>DISPLAY compiler directive -run_extensions.at-4892-prog.cob:12.7-12.34: +run_extensions.at-4903-prog.cob:12.7-12.34: 9 >> DISPLAY some.text-here 10 01 var3 pic x. 11 PROCEDURE DIVISION. @@ -1979,7 +1979,7 @@ run_extensions.at-4892-prog.cob:12.7-12.34: 14 $DISPLAY "MF compile time text" >> Error: Invalid >>DISPLAY compiler directive -run_extensions.at-4892-prog.cob:13.7-13.51: +run_extensions.at-4903-prog.cob:13.7-13.51: 10 01 var3 pic x. 11 PROCEDURE DIVISION. 12 >> DISPLAY other text #2 *> comment @@ -1989,7 +1989,7 @@ run_extensions.at-4892-prog.cob:13.7-13.51: 15 GOBACK. >> Error: Invalid >>DISPLAY compiler directive -run_extensions.at-4892-prog.cob:14.7-14.8: +run_extensions.at-4903-prog.cob:14.7-14.8: 11 PROCEDURE DIVISION. 12 >> DISPLAY other text #2 *> comment 13 >> DISPLAY "literal text... *> no comment" @@ -1998,22 +1998,22 @@ run_extensions.at-4892-prog.cob:14.7-14.8: 15 GOBACK. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4921:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4946:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4974:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5000:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5065:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5049:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5101:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5149:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5131:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5231:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5188:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5266:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5290:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5315:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5351:0 -run_extensions.at-5351-prog.cob:5.11-5.12: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4932:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4957:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:4985:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5011:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5076:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5060:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5112:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5160:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5142:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5242:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5199:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5277:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5301:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5326:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5362:0 +run_extensions.at-5362-prog.cob:5.11-5.12: 2 >>IF BINARY-COMP-1 IS DEFINED 3 $SET COMP-1(BINARY) 4 >>ELSE @@ -2023,8 +2023,8 @@ run_extensions.at-5351-prog.cob:5.11-5.12: 7 IDENTIFICATION DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5383:0 -run_extensions.at-5383-prog.cob:9.11-9.18: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5394:0 +run_extensions.at-5394-prog.cob:9.11-9.18: 6 77 VAR-1 PIC X(8) VALUE SPACES. 7 77 VAR-2 PIC 999. 8 PROCEDURE DIVISION. @@ -2034,7 +2034,7 @@ run_extensions.at-5383-prog.cob:9.11-9.18: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 >> Error: Invalid syntax -run_extensions.at-5383-prog.cob:9.26: +run_extensions.at-5394-prog.cob:9.26: 6 77 VAR-1 PIC X(8) VALUE SPACES. 7 77 VAR-2 PIC 999. 8 PROCEDURE DIVISION. @@ -2044,7 +2044,7 @@ run_extensions.at-5383-prog.cob:9.26: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 >> Hint: Missing . -run_extensions.at-5383-prog.cob:9.27-9.32: +run_extensions.at-5394-prog.cob:9.27-9.32: 6 77 VAR-1 PIC X(8) VALUE SPACES. 7 77 VAR-2 PIC 999. 8 PROCEDURE DIVISION. @@ -2054,7 +2054,7 @@ run_extensions.at-5383-prog.cob:9.27-9.32: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 >> Warning: Invalid syntax -run_extensions.at-5383-prog.cob:9.32: +run_extensions.at-5394-prog.cob:9.32: 6 77 VAR-1 PIC X(8) VALUE SPACES. 7 77 VAR-2 PIC 999. 8 PROCEDURE DIVISION. @@ -2064,7 +2064,7 @@ run_extensions.at-5383-prog.cob:9.32: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 >> Hint: Missing . -run_extensions.at-5383-prog.cob:9.33-9.36: +run_extensions.at-5394-prog.cob:9.33-9.36: 6 77 VAR-1 PIC X(8) VALUE SPACES. 7 77 VAR-2 PIC 999. 8 PROCEDURE DIVISION. @@ -2074,7 +2074,7 @@ run_extensions.at-5383-prog.cob:9.33-9.36: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 >> Warning: Invalid syntax -run_extensions.at-5383-prog.cob:11.52: +run_extensions.at-5394-prog.cob:11.52: 8 PROCEDURE DIVISION. 9 EXHIBIT CHANGED VAR-1 'X' 10 MOVE ALL 'X' TO VAR-1 @@ -2084,7 +2084,7 @@ run_extensions.at-5383-prog.cob:11.52: 13 EXHIBIT VAR-2 >> Hint: Missing . -run_extensions.at-5383-prog.cob:12.11-12.18: +run_extensions.at-5394-prog.cob:12.11-12.18: 9 EXHIBIT CHANGED VAR-1 'X' 10 MOVE ALL 'X' TO VAR-1 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 @@ -2094,7 +2094,7 @@ run_extensions.at-5383-prog.cob:12.11-12.18: 14 EXHIBIT SORT-RETURN TALLY >> Warning: Invalid syntax -run_extensions.at-5383-prog.cob:12.24: +run_extensions.at-5394-prog.cob:12.24: 9 EXHIBIT CHANGED VAR-1 'X' 10 MOVE ALL 'X' TO VAR-1 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 @@ -2104,7 +2104,7 @@ run_extensions.at-5383-prog.cob:12.24: 14 EXHIBIT SORT-RETURN TALLY >> Hint: Missing . -run_extensions.at-5383-prog.cob:12.25-12.30: +run_extensions.at-5394-prog.cob:12.25-12.30: 9 EXHIBIT CHANGED VAR-1 'X' 10 MOVE ALL 'X' TO VAR-1 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 @@ -2114,7 +2114,7 @@ run_extensions.at-5383-prog.cob:12.25-12.30: 14 EXHIBIT SORT-RETURN TALLY >> Warning: Invalid syntax -run_extensions.at-5383-prog.cob:12.30: +run_extensions.at-5394-prog.cob:12.30: 9 EXHIBIT CHANGED VAR-1 'X' 10 MOVE ALL 'X' TO VAR-1 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 @@ -2124,7 +2124,7 @@ run_extensions.at-5383-prog.cob:12.30: 14 EXHIBIT SORT-RETURN TALLY >> Hint: Missing . -run_extensions.at-5383-prog.cob:12.31-12.36: +run_extensions.at-5394-prog.cob:12.31-12.36: 9 EXHIBIT CHANGED VAR-1 'X' 10 MOVE ALL 'X' TO VAR-1 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 @@ -2134,7 +2134,7 @@ run_extensions.at-5383-prog.cob:12.31-12.36: 14 EXHIBIT SORT-RETURN TALLY >> Warning: Invalid syntax -run_extensions.at-5383-prog.cob:12.36: +run_extensions.at-5394-prog.cob:12.36: 9 EXHIBIT CHANGED VAR-1 'X' 10 MOVE ALL 'X' TO VAR-1 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 @@ -2144,7 +2144,7 @@ run_extensions.at-5383-prog.cob:12.36: 14 EXHIBIT SORT-RETURN TALLY >> Hint: Missing . -run_extensions.at-5383-prog.cob:12.37-12.40: +run_extensions.at-5394-prog.cob:12.37-12.40: 9 EXHIBIT CHANGED VAR-1 'X' 10 MOVE ALL 'X' TO VAR-1 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 @@ -2154,7 +2154,7 @@ run_extensions.at-5383-prog.cob:12.37-12.40: 14 EXHIBIT SORT-RETURN TALLY >> Warning: Invalid syntax -run_extensions.at-5383-prog.cob:13.24: +run_extensions.at-5394-prog.cob:13.24: 10 MOVE ALL 'X' TO VAR-1 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 12 EXHIBIT NAMED VAR-1 VAR-2 'Y' @@ -2164,7 +2164,7 @@ run_extensions.at-5383-prog.cob:13.24: 15 STOP RUN. >> Hint: Missing . -run_extensions.at-5383-prog.cob:14.11-14.18: +run_extensions.at-5394-prog.cob:14.11-14.18: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 12 EXHIBIT NAMED VAR-1 VAR-2 'Y' 13 EXHIBIT VAR-2 @@ -2173,7 +2173,7 @@ run_extensions.at-5383-prog.cob:14.11-14.18: 15 STOP RUN. >> Warning: Invalid syntax -run_extensions.at-5383-prog.cob:14.30: +run_extensions.at-5394-prog.cob:14.30: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 12 EXHIBIT NAMED VAR-1 VAR-2 'Y' 13 EXHIBIT VAR-2 @@ -2182,7 +2182,7 @@ run_extensions.at-5383-prog.cob:14.30: 15 STOP RUN. >> Hint: Missing . -run_extensions.at-5383-prog.cob:14.31-14.36: +run_extensions.at-5394-prog.cob:14.31-14.36: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 12 EXHIBIT NAMED VAR-1 VAR-2 'Y' 13 EXHIBIT VAR-2 @@ -2191,7 +2191,7 @@ run_extensions.at-5383-prog.cob:14.31-14.36: 15 STOP RUN. >> Warning: Invalid syntax -run_extensions.at-5383-prog.cob:14.36: +run_extensions.at-5394-prog.cob:14.36: 11 STRING "123" DELIMITED BY SIZE INTO VAR-1 12 EXHIBIT NAMED VAR-1 VAR-2 'Y' 13 EXHIBIT VAR-2 @@ -2200,7 +2200,7 @@ run_extensions.at-5383-prog.cob:14.36: 15 STOP RUN. >> Hint: Missing . -run_extensions.at-5383-prog.cob:15.11-15.15: +run_extensions.at-5394-prog.cob:15.11-15.15: 12 EXHIBIT NAMED VAR-1 VAR-2 'Y' 13 EXHIBIT VAR-2 14 EXHIBIT SORT-RETURN TALLY @@ -2208,8 +2208,8 @@ run_extensions.at-5383-prog.cob:15.11-15.15: ---- ^^^^ >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5468:0 -run_extensions.at-5468-prog.cob:33.18-33.19: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5479:0 +run_extensions.at-5479-prog.cob:33.18-33.19: 30 DISPLAY "(" XX2 " B-XOR " XX3 ") + 1 is " XX1. 31 COMPUTE XX1 = XX2 B-XOR (XX3 + 1). 32 DISPLAY XX2 " B-XOR (" XX3 " + 1) is " XX1. @@ -2219,7 +2219,7 @@ run_extensions.at-5468-prog.cob:33.18-33.19: 35 COMPUTE XX1 = XX2 B-AND XX3 . >> Error: Invalid syntax -run_extensions.at-5468-prog.cob:33.18: +run_extensions.at-5479-prog.cob:33.18: 30 DISPLAY "(" XX2 " B-XOR " XX3 ") + 1 is " XX1. 31 COMPUTE XX1 = XX2 B-XOR (XX3 + 1). 32 DISPLAY XX2 " B-XOR (" XX3 " + 1) is " XX1. @@ -2229,7 +2229,7 @@ run_extensions.at-5468-prog.cob:33.18: 35 COMPUTE XX1 = XX2 B-AND XX3 . >> Hint: Missing TO . -run_extensions.at-5468-prog.cob:33.21: +run_extensions.at-5479-prog.cob:33.21: 30 DISPLAY "(" XX2 " B-XOR " XX3 ") + 1 is " XX1. 31 COMPUTE XX1 = XX2 B-XOR (XX3 + 1). 32 DISPLAY XX2 " B-XOR (" XX3 " + 1) is " XX1. @@ -2239,7 +2239,7 @@ run_extensions.at-5468-prog.cob:33.21: 35 COMPUTE XX1 = XX2 B-AND XX3 . >> Hint: Missing . -run_extensions.at-5468-prog.cob:33.22-33.24: +run_extensions.at-5479-prog.cob:33.22-33.24: 30 DISPLAY "(" XX2 " B-XOR " XX3 ") + 1 is " XX1. 31 COMPUTE XX1 = XX2 B-XOR (XX3 + 1). 32 DISPLAY XX2 " B-XOR (" XX3 " + 1) is " XX1. @@ -2249,7 +2249,7 @@ run_extensions.at-5468-prog.cob:33.22-33.24: 35 COMPUTE XX1 = XX2 B-AND XX3 . >> Warning: Invalid syntax -run_extensions.at-5468-prog.cob:34.18-34.19: +run_extensions.at-5479-prog.cob:34.18-34.19: 31 COMPUTE XX1 = XX2 B-XOR (XX3 + 1). 32 DISPLAY XX2 " B-XOR (" XX3 " + 1) is " XX1. 33 MOVE x#09 TO XX3. @@ -2259,7 +2259,7 @@ run_extensions.at-5468-prog.cob:34.18-34.19: 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. >> Error: Invalid syntax -run_extensions.at-5468-prog.cob:34.18: +run_extensions.at-5479-prog.cob:34.18: 31 COMPUTE XX1 = XX2 B-XOR (XX3 + 1). 32 DISPLAY XX2 " B-XOR (" XX3 " + 1) is " XX1. 33 MOVE x#09 TO XX3. @@ -2269,7 +2269,7 @@ run_extensions.at-5468-prog.cob:34.18: 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. >> Hint: Missing TO -run_extensions.at-5468-prog.cob:34.21: +run_extensions.at-5479-prog.cob:34.21: 31 COMPUTE XX1 = XX2 B-XOR (XX3 + 1). 32 DISPLAY XX2 " B-XOR (" XX3 " + 1) is " XX1. 33 MOVE x#09 TO XX3. @@ -2279,7 +2279,7 @@ run_extensions.at-5468-prog.cob:34.21: 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. >> Hint: Missing . -run_extensions.at-5468-prog.cob:34.22-34.24: +run_extensions.at-5479-prog.cob:34.22-34.24: 31 COMPUTE XX1 = XX2 B-XOR (XX3 + 1). 32 DISPLAY XX2 " B-XOR (" XX3 " + 1) is " XX1. 33 MOVE x#09 TO XX3. @@ -2289,7 +2289,7 @@ run_extensions.at-5468-prog.cob:34.22-34.24: 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. >> Warning: Invalid syntax -run_extensions.at-5468-prog.cob:37.27-37.28: +run_extensions.at-5479-prog.cob:37.27-37.28: 34 MOVE x#0E TO XX2. 35 COMPUTE XX1 = XX2 B-AND XX3 . 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. @@ -2299,7 +2299,7 @@ run_extensions.at-5468-prog.cob:37.27-37.28: 39 COMPUTE XX1 = B-NOT XX2 . >> Error: Invalid syntax -run_extensions.at-5468-prog.cob:37.27: +run_extensions.at-5479-prog.cob:37.27: 34 MOVE x#0E TO XX2. 35 COMPUTE XX1 = XX2 B-AND XX3 . 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. @@ -2309,7 +2309,7 @@ run_extensions.at-5468-prog.cob:37.27: 39 COMPUTE XX1 = B-NOT XX2 . >> Hint: Missing ) . -run_extensions.at-5468-prog.cob:37.30: +run_extensions.at-5479-prog.cob:37.30: 34 MOVE x#0E TO XX2. 35 COMPUTE XX1 = XX2 B-AND XX3 . 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. @@ -2319,7 +2319,7 @@ run_extensions.at-5468-prog.cob:37.30: 39 COMPUTE XX1 = B-NOT XX2 . >> Hint: Missing . -run_extensions.at-5468-prog.cob:37.31-37.35: +run_extensions.at-5479-prog.cob:37.31-37.35: 34 MOVE x#0E TO XX2. 35 COMPUTE XX1 = XX2 B-AND XX3 . 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. @@ -2329,7 +2329,7 @@ run_extensions.at-5468-prog.cob:37.31-37.35: 39 COMPUTE XX1 = B-NOT XX2 . >> Warning: Invalid syntax -run_extensions.at-5468-prog.cob:37.37-37.38: +run_extensions.at-5479-prog.cob:37.37-37.38: 34 MOVE x#0E TO XX2. 35 COMPUTE XX1 = XX2 B-AND XX3 . 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. @@ -2339,7 +2339,7 @@ run_extensions.at-5468-prog.cob:37.37-37.38: 39 COMPUTE XX1 = B-NOT XX2 . >> Warning: Invalid syntax -run_extensions.at-5468-prog.cob:37.37: +run_extensions.at-5479-prog.cob:37.37: 34 MOVE x#0E TO XX2. 35 COMPUTE XX1 = XX2 B-AND XX3 . 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. @@ -2349,7 +2349,7 @@ run_extensions.at-5468-prog.cob:37.37: 39 COMPUTE XX1 = B-NOT XX2 . >> Hint: Missing . -run_extensions.at-5468-prog.cob:37.40-37.41: +run_extensions.at-5479-prog.cob:37.40-37.41: 34 MOVE x#0E TO XX2. 35 COMPUTE XX1 = XX2 B-AND XX3 . 36 DISPLAY XX2 " B-AND " XX3 " is " XX1. @@ -2359,7 +2359,7 @@ run_extensions.at-5468-prog.cob:37.40-37.41: 39 COMPUTE XX1 = B-NOT XX2 . >> Error: Invalid syntax -run_extensions.at-5468-prog.cob:41.32-41.33: +run_extensions.at-5479-prog.cob:41.32-41.33: 38 DISPLAY "x#05 B-OR x#22 is " XX1. 39 COMPUTE XX1 = B-NOT XX2 . 40 DISPLAY "B-NOT " XX2 " is " XX1. @@ -2369,7 +2369,7 @@ run_extensions.at-5468-prog.cob:41.32-41.33: 43 >> Warning: Invalid syntax -run_extensions.at-5468-prog.cob:41.32: +run_extensions.at-5479-prog.cob:41.32: 38 DISPLAY "x#05 B-OR x#22 is " XX1. 39 COMPUTE XX1 = B-NOT XX2 . 40 DISPLAY "B-NOT " XX2 " is " XX1. @@ -2379,7 +2379,7 @@ run_extensions.at-5468-prog.cob:41.32: 43 >> Hint: Missing . -run_extensions.at-5468-prog.cob:62.18-62.19: +run_extensions.at-5479-prog.cob:62.18-62.19: 59 DISPLAY "(" X2 " B-XOR " X3 ") + 1 is " X1. 60 COMPUTE X1 = X2 B-XOR (X3 + 1). 61 DISPLAY X2 " B-XOR (" X3 " + 1) is " X1. @@ -2389,7 +2389,7 @@ run_extensions.at-5468-prog.cob:62.18-62.19: 64 COMPUTE X1 = X2 B-AND X3 . >> Error: Invalid syntax -run_extensions.at-5468-prog.cob:62.18: +run_extensions.at-5479-prog.cob:62.18: 59 DISPLAY "(" X2 " B-XOR " X3 ") + 1 is " X1. 60 COMPUTE X1 = X2 B-XOR (X3 + 1). 61 DISPLAY X2 " B-XOR (" X3 " + 1) is " X1. @@ -2399,7 +2399,7 @@ run_extensions.at-5468-prog.cob:62.18: 64 COMPUTE X1 = X2 B-AND X3 . >> Hint: Missing TO . -run_extensions.at-5468-prog.cob:62.21: +run_extensions.at-5479-prog.cob:62.21: 59 DISPLAY "(" X2 " B-XOR " X3 ") + 1 is " X1. 60 COMPUTE X1 = X2 B-XOR (X3 + 1). 61 DISPLAY X2 " B-XOR (" X3 " + 1) is " X1. @@ -2409,7 +2409,7 @@ run_extensions.at-5468-prog.cob:62.21: 64 COMPUTE X1 = X2 B-AND X3 . >> Hint: Missing . -run_extensions.at-5468-prog.cob:62.22-62.24: +run_extensions.at-5479-prog.cob:62.22-62.24: 59 DISPLAY "(" X2 " B-XOR " X3 ") + 1 is " X1. 60 COMPUTE X1 = X2 B-XOR (X3 + 1). 61 DISPLAY X2 " B-XOR (" X3 " + 1) is " X1. @@ -2419,7 +2419,7 @@ run_extensions.at-5468-prog.cob:62.22-62.24: 64 COMPUTE X1 = X2 B-AND X3 . >> Warning: Invalid syntax -run_extensions.at-5468-prog.cob:63.18-63.19: +run_extensions.at-5479-prog.cob:63.18-63.19: 60 COMPUTE X1 = X2 B-XOR (X3 + 1). 61 DISPLAY X2 " B-XOR (" X3 " + 1) is " X1. 62 MOVE x#09 TO X3. @@ -2429,7 +2429,7 @@ run_extensions.at-5468-prog.cob:63.18-63.19: 65 DISPLAY X2 " B-AND " X3 " is " X1. >> Error: Invalid syntax -run_extensions.at-5468-prog.cob:63.18: +run_extensions.at-5479-prog.cob:63.18: 60 COMPUTE X1 = X2 B-XOR (X3 + 1). 61 DISPLAY X2 " B-XOR (" X3 " + 1) is " X1. 62 MOVE x#09 TO X3. @@ -2439,7 +2439,7 @@ run_extensions.at-5468-prog.cob:63.18: 65 DISPLAY X2 " B-AND " X3 " is " X1. >> Hint: Missing TO -run_extensions.at-5468-prog.cob:63.21: +run_extensions.at-5479-prog.cob:63.21: 60 COMPUTE X1 = X2 B-XOR (X3 + 1). 61 DISPLAY X2 " B-XOR (" X3 " + 1) is " X1. 62 MOVE x#09 TO X3. @@ -2449,7 +2449,7 @@ run_extensions.at-5468-prog.cob:63.21: 65 DISPLAY X2 " B-AND " X3 " is " X1. >> Hint: Missing . -run_extensions.at-5468-prog.cob:63.22-63.24: +run_extensions.at-5479-prog.cob:63.22-63.24: 60 COMPUTE X1 = X2 B-XOR (X3 + 1). 61 DISPLAY X2 " B-XOR (" X3 " + 1) is " X1. 62 MOVE x#09 TO X3. @@ -2459,7 +2459,7 @@ run_extensions.at-5468-prog.cob:63.22-63.24: 65 DISPLAY X2 " B-AND " X3 " is " X1. >> Warning: Invalid syntax -run_extensions.at-5468-prog.cob:68.31-68.32: +run_extensions.at-5479-prog.cob:68.31-68.32: 65 DISPLAY X2 " B-AND " X3 " is " X1. 66 COMPUTE X1 = B-NOT X2 . 67 DISPLAY "B-NOT " X2 " is " X1. @@ -2469,7 +2469,7 @@ run_extensions.at-5468-prog.cob:68.31-68.32: 70 STOP RUN. >> Warning: Invalid syntax -run_extensions.at-5468-prog.cob:68.31: +run_extensions.at-5479-prog.cob:68.31: 65 DISPLAY X2 " B-AND " X3 " is " X1. 66 COMPUTE X1 = B-NOT X2 . 67 DISPLAY "B-NOT " X2 " is " X1. @@ -2479,8 +2479,8 @@ run_extensions.at-5468-prog.cob:68.31: 70 STOP RUN. >> Hint: Missing . -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5547:0 -run_extensions.at-5547-prog.cob:11.18-11.19: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5558:0 +run_extensions.at-5558-prog.cob:11.18-11.19: 8 01 N1 PIC 9(4) COMP-5 VALUE 0. 9 01 N2 PIC 9(4) COMP-5 VALUE 0. 10 PROCEDURE DIVISION. @@ -2490,7 +2490,7 @@ run_extensions.at-5547-prog.cob:11.18-11.19: 13 COMPUTE X1 = (x#22 B-LEFT x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:11.18: +run_extensions.at-5558-prog.cob:11.18: 8 01 N1 PIC 9(4) COMP-5 VALUE 0. 9 01 N2 PIC 9(4) COMP-5 VALUE 0. 10 PROCEDURE DIVISION. @@ -2500,7 +2500,7 @@ run_extensions.at-5547-prog.cob:11.18: 13 COMPUTE X1 = (x#22 B-LEFT x#05). >> Hint: Missing TO -run_extensions.at-5547-prog.cob:11.21: +run_extensions.at-5558-prog.cob:11.21: 8 01 N1 PIC 9(4) COMP-5 VALUE 0. 9 01 N2 PIC 9(4) COMP-5 VALUE 0. 10 PROCEDURE DIVISION. @@ -2510,7 +2510,7 @@ run_extensions.at-5547-prog.cob:11.21: 13 COMPUTE X1 = (x#22 B-LEFT x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:11.22-11.24: +run_extensions.at-5558-prog.cob:11.22-11.24: 8 01 N1 PIC 9(4) COMP-5 VALUE 0. 9 01 N2 PIC 9(4) COMP-5 VALUE 0. 10 PROCEDURE DIVISION. @@ -2520,7 +2520,7 @@ run_extensions.at-5547-prog.cob:11.22-11.24: 13 COMPUTE X1 = (x#22 B-LEFT x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:13.26-13.27: +run_extensions.at-5558-prog.cob:13.26-13.27: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2530,7 +2530,7 @@ run_extensions.at-5547-prog.cob:13.26-13.27: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:13.26: +run_extensions.at-5558-prog.cob:13.26: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2540,7 +2540,7 @@ run_extensions.at-5547-prog.cob:13.26: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:13.29: +run_extensions.at-5558-prog.cob:13.29: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2550,7 +2550,7 @@ run_extensions.at-5547-prog.cob:13.29: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:13.30-13.36: +run_extensions.at-5558-prog.cob:13.30-13.36: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2560,7 +2560,7 @@ run_extensions.at-5547-prog.cob:13.30-13.36: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:13.36: +run_extensions.at-5558-prog.cob:13.36: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2570,7 +2570,7 @@ run_extensions.at-5547-prog.cob:13.36: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:13.37-13.38: +run_extensions.at-5558-prog.cob:13.37-13.38: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2580,7 +2580,7 @@ run_extensions.at-5547-prog.cob:13.37-13.38: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:13.38-13.39: +run_extensions.at-5558-prog.cob:13.38-13.39: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2590,7 +2590,7 @@ run_extensions.at-5547-prog.cob:13.38-13.39: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:13.38: +run_extensions.at-5558-prog.cob:13.38: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2600,7 +2600,7 @@ run_extensions.at-5547-prog.cob:13.38: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:13.41-13.42: +run_extensions.at-5558-prog.cob:13.41-13.42: 10 PROCEDURE DIVISION. 11 MOVE x#0A TO X2. 12 DISPLAY "Using PIC XX COMP-X" @@ -2610,7 +2610,7 @@ run_extensions.at-5547-prog.cob:13.41-13.42: 15 COMPUTE X1 = (x#22 B-RIGHT x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:15.26-15.27: +run_extensions.at-5558-prog.cob:15.26-15.27: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2620,7 +2620,7 @@ run_extensions.at-5547-prog.cob:15.26-15.27: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:15.26: +run_extensions.at-5558-prog.cob:15.26: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2630,7 +2630,7 @@ run_extensions.at-5547-prog.cob:15.26: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:15.29: +run_extensions.at-5558-prog.cob:15.29: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2640,7 +2640,7 @@ run_extensions.at-5547-prog.cob:15.29: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:15.30-15.37: +run_extensions.at-5558-prog.cob:15.30-15.37: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2650,7 +2650,7 @@ run_extensions.at-5547-prog.cob:15.30-15.37: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:15.37: +run_extensions.at-5558-prog.cob:15.37: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2660,7 +2660,7 @@ run_extensions.at-5547-prog.cob:15.37: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:15.38-15.39: +run_extensions.at-5558-prog.cob:15.38-15.39: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2670,7 +2670,7 @@ run_extensions.at-5547-prog.cob:15.38-15.39: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:15.39-15.40: +run_extensions.at-5558-prog.cob:15.39-15.40: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2680,7 +2680,7 @@ run_extensions.at-5547-prog.cob:15.39-15.40: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:15.39: +run_extensions.at-5558-prog.cob:15.39: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2690,7 +2690,7 @@ run_extensions.at-5547-prog.cob:15.39: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:15.42-15.43: +run_extensions.at-5558-prog.cob:15.42-15.43: 12 DISPLAY "Using PIC XX COMP-X" 13 COMPUTE X1 = (x#22 B-LEFT x#05). 14 DISPLAY " x#22 B-LEFT x#05 is " X1. @@ -2700,7 +2700,7 @@ run_extensions.at-5547-prog.cob:15.42-15.43: 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:17.26-17.27: +run_extensions.at-5558-prog.cob:17.26-17.27: 14 DISPLAY " x#22 B-LEFT x#05 is " X1. 15 COMPUTE X1 = (x#22 B-RIGHT x#02). 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. @@ -2710,7 +2710,7 @@ run_extensions.at-5547-prog.cob:17.26-17.27: 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:17.26: +run_extensions.at-5558-prog.cob:17.26: 14 DISPLAY " x#22 B-LEFT x#05 is " X1. 15 COMPUTE X1 = (x#22 B-RIGHT x#02). 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. @@ -2720,7 +2720,7 @@ run_extensions.at-5547-prog.cob:17.26: 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:17.29: +run_extensions.at-5558-prog.cob:17.29: 14 DISPLAY " x#22 B-LEFT x#05 is " X1. 15 COMPUTE X1 = (x#22 B-RIGHT x#02). 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. @@ -2730,7 +2730,7 @@ run_extensions.at-5547-prog.cob:17.29: 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:17.30-17.39: +run_extensions.at-5558-prog.cob:17.30-17.39: 14 DISPLAY " x#22 B-LEFT x#05 is " X1. 15 COMPUTE X1 = (x#22 B-RIGHT x#02). 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. @@ -2740,7 +2740,7 @@ run_extensions.at-5547-prog.cob:17.30-17.39: 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:17.41-17.42: +run_extensions.at-5558-prog.cob:17.41-17.42: 14 DISPLAY " x#22 B-LEFT x#05 is " X1. 15 COMPUTE X1 = (x#22 B-RIGHT x#02). 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. @@ -2750,7 +2750,7 @@ run_extensions.at-5547-prog.cob:17.41-17.42: 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:17.41: +run_extensions.at-5558-prog.cob:17.41: 14 DISPLAY " x#22 B-LEFT x#05 is " X1. 15 COMPUTE X1 = (x#22 B-RIGHT x#02). 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. @@ -2760,7 +2760,7 @@ run_extensions.at-5547-prog.cob:17.41: 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:17.44-17.45: +run_extensions.at-5558-prog.cob:17.44-17.45: 14 DISPLAY " x#22 B-LEFT x#05 is " X1. 15 COMPUTE X1 = (x#22 B-RIGHT x#02). 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. @@ -2770,7 +2770,7 @@ run_extensions.at-5547-prog.cob:17.44-17.45: 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:19.26-19.27: +run_extensions.at-5558-prog.cob:19.26-19.27: 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. @@ -2780,7 +2780,7 @@ run_extensions.at-5547-prog.cob:19.26-19.27: 21 COMPUTE X1 = (X2 B-LEFT x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:19.26: +run_extensions.at-5558-prog.cob:19.26: 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. @@ -2790,7 +2790,7 @@ run_extensions.at-5547-prog.cob:19.26: 21 COMPUTE X1 = (X2 B-LEFT x#05). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:19.29: +run_extensions.at-5558-prog.cob:19.29: 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. @@ -2800,7 +2800,7 @@ run_extensions.at-5547-prog.cob:19.29: 21 COMPUTE X1 = (X2 B-LEFT x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:19.30-19.39: +run_extensions.at-5558-prog.cob:19.30-19.39: 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. @@ -2810,7 +2810,7 @@ run_extensions.at-5547-prog.cob:19.30-19.39: 21 COMPUTE X1 = (X2 B-LEFT x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:19.41-19.42: +run_extensions.at-5558-prog.cob:19.41-19.42: 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. @@ -2820,7 +2820,7 @@ run_extensions.at-5547-prog.cob:19.41-19.42: 21 COMPUTE X1 = (X2 B-LEFT x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:19.41: +run_extensions.at-5558-prog.cob:19.41: 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. @@ -2830,7 +2830,7 @@ run_extensions.at-5547-prog.cob:19.41: 21 COMPUTE X1 = (X2 B-LEFT x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:19.44-19.45: +run_extensions.at-5558-prog.cob:19.44-19.45: 16 DISPLAY " x#22 B-RIGHT x#02 is " X1. 17 COMPUTE X1 = (x#22 B-SHIFT-L x#05). 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. @@ -2840,7 +2840,7 @@ run_extensions.at-5547-prog.cob:19.44-19.45: 21 COMPUTE X1 = (X2 B-LEFT x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:21.27: +run_extensions.at-5558-prog.cob:21.27: 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. @@ -2850,7 +2850,7 @@ run_extensions.at-5547-prog.cob:21.27: 23 COMPUTE X1 = (X2 B-RIGHT x#02). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:21.28-21.34: +run_extensions.at-5558-prog.cob:21.28-21.34: 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. @@ -2860,7 +2860,7 @@ run_extensions.at-5547-prog.cob:21.28-21.34: 23 COMPUTE X1 = (X2 B-RIGHT x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:21.34: +run_extensions.at-5558-prog.cob:21.34: 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. @@ -2870,7 +2870,7 @@ run_extensions.at-5547-prog.cob:21.34: 23 COMPUTE X1 = (X2 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:21.35-21.36: +run_extensions.at-5558-prog.cob:21.35-21.36: 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. @@ -2880,7 +2880,7 @@ run_extensions.at-5547-prog.cob:21.35-21.36: 23 COMPUTE X1 = (X2 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:21.36-21.37: +run_extensions.at-5558-prog.cob:21.36-21.37: 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. @@ -2890,7 +2890,7 @@ run_extensions.at-5547-prog.cob:21.36-21.37: 23 COMPUTE X1 = (X2 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:21.36: +run_extensions.at-5558-prog.cob:21.36: 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. @@ -2900,7 +2900,7 @@ run_extensions.at-5547-prog.cob:21.36: 23 COMPUTE X1 = (X2 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:21.39-21.40: +run_extensions.at-5558-prog.cob:21.39-21.40: 18 DISPLAY " x#22 B-SHIFT-L x#05 is " X1. 19 COMPUTE X1 = (x#22 B-SHIFT-R x#02). 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. @@ -2910,7 +2910,7 @@ run_extensions.at-5547-prog.cob:21.39-21.40: 23 COMPUTE X1 = (X2 B-RIGHT x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:23.27: +run_extensions.at-5558-prog.cob:23.27: 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. 21 COMPUTE X1 = (X2 B-LEFT x#05). 22 DISPLAY X2 " B-LEFT x#05 is " X1. @@ -2920,7 +2920,7 @@ run_extensions.at-5547-prog.cob:23.27: 25 MOVE x#7573 TO X2. >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:23.28-23.35: +run_extensions.at-5558-prog.cob:23.28-23.35: 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. 21 COMPUTE X1 = (X2 B-LEFT x#05). 22 DISPLAY X2 " B-LEFT x#05 is " X1. @@ -2930,7 +2930,7 @@ run_extensions.at-5547-prog.cob:23.28-23.35: 25 MOVE x#7573 TO X2. >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:23.35: +run_extensions.at-5558-prog.cob:23.35: 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. 21 COMPUTE X1 = (X2 B-LEFT x#05). 22 DISPLAY X2 " B-LEFT x#05 is " X1. @@ -2940,7 +2940,7 @@ run_extensions.at-5547-prog.cob:23.35: 25 MOVE x#7573 TO X2. >> Hint: Missing . -run_extensions.at-5547-prog.cob:23.36-23.37: +run_extensions.at-5558-prog.cob:23.36-23.37: 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. 21 COMPUTE X1 = (X2 B-LEFT x#05). 22 DISPLAY X2 " B-LEFT x#05 is " X1. @@ -2950,7 +2950,7 @@ run_extensions.at-5547-prog.cob:23.36-23.37: 25 MOVE x#7573 TO X2. >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:23.37-23.38: +run_extensions.at-5558-prog.cob:23.37-23.38: 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. 21 COMPUTE X1 = (X2 B-LEFT x#05). 22 DISPLAY X2 " B-LEFT x#05 is " X1. @@ -2960,7 +2960,7 @@ run_extensions.at-5547-prog.cob:23.37-23.38: 25 MOVE x#7573 TO X2. >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:23.37: +run_extensions.at-5558-prog.cob:23.37: 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. 21 COMPUTE X1 = (X2 B-LEFT x#05). 22 DISPLAY X2 " B-LEFT x#05 is " X1. @@ -2970,7 +2970,7 @@ run_extensions.at-5547-prog.cob:23.37: 25 MOVE x#7573 TO X2. >> Hint: Missing . -run_extensions.at-5547-prog.cob:23.40-23.41: +run_extensions.at-5558-prog.cob:23.40-23.41: 20 DISPLAY " x#22 B-SHIFT-R x#02 is " X1. 21 COMPUTE X1 = (X2 B-LEFT x#05). 22 DISPLAY X2 " B-LEFT x#05 is " X1. @@ -2980,7 +2980,7 @@ run_extensions.at-5547-prog.cob:23.40-23.41: 25 MOVE x#7573 TO X2. >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:25.18-25.19: +run_extensions.at-5558-prog.cob:25.18-25.19: 22 DISPLAY X2 " B-LEFT x#05 is " X1. 23 COMPUTE X1 = (X2 B-RIGHT x#02). 24 DISPLAY X2 " B-RIGHT x#02 is " X1. @@ -2990,7 +2990,7 @@ run_extensions.at-5547-prog.cob:25.18-25.19: 27 DISPLAY X2 " B-SHIFT-LC 4 is " X1. >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:25.18: +run_extensions.at-5558-prog.cob:25.18: 22 DISPLAY X2 " B-LEFT x#05 is " X1. 23 COMPUTE X1 = (X2 B-RIGHT x#02). 24 DISPLAY X2 " B-RIGHT x#02 is " X1. @@ -3000,7 +3000,7 @@ run_extensions.at-5547-prog.cob:25.18: 27 DISPLAY X2 " B-SHIFT-LC 4 is " X1. >> Hint: Missing TO . -run_extensions.at-5547-prog.cob:25.23: +run_extensions.at-5558-prog.cob:25.23: 22 DISPLAY X2 " B-LEFT x#05 is " X1. 23 COMPUTE X1 = (X2 B-RIGHT x#02). 24 DISPLAY X2 " B-RIGHT x#02 is " X1. @@ -3010,7 +3010,7 @@ run_extensions.at-5547-prog.cob:25.23: 27 DISPLAY X2 " B-SHIFT-LC 4 is " X1. >> Hint: Missing . -run_extensions.at-5547-prog.cob:25.24-25.26: +run_extensions.at-5558-prog.cob:25.24-25.26: 22 DISPLAY X2 " B-LEFT x#05 is " X1. 23 COMPUTE X1 = (X2 B-RIGHT x#02). 24 DISPLAY X2 " B-RIGHT x#02 is " X1. @@ -3020,7 +3020,7 @@ run_extensions.at-5547-prog.cob:25.24-25.26: 27 DISPLAY X2 " B-SHIFT-LC 4 is " X1. >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:26.27: +run_extensions.at-5558-prog.cob:26.27: 23 COMPUTE X1 = (X2 B-RIGHT x#02). 24 DISPLAY X2 " B-RIGHT x#02 is " X1. 25 MOVE x#7573 TO X2. @@ -3030,7 +3030,7 @@ run_extensions.at-5547-prog.cob:26.27: 28 COMPUTE X1 = (X2 B-SHIFT-RC 4). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:26.28-26.38: +run_extensions.at-5558-prog.cob:26.28-26.38: 23 COMPUTE X1 = (X2 B-RIGHT x#02). 24 DISPLAY X2 " B-RIGHT x#02 is " X1. 25 MOVE x#7573 TO X2. @@ -3040,7 +3040,7 @@ run_extensions.at-5547-prog.cob:26.28-26.38: 28 COMPUTE X1 = (X2 B-SHIFT-RC 4). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:26.40-26.41: +run_extensions.at-5558-prog.cob:26.40-26.41: 23 COMPUTE X1 = (X2 B-RIGHT x#02). 24 DISPLAY X2 " B-RIGHT x#02 is " X1. 25 MOVE x#7573 TO X2. @@ -3050,7 +3050,7 @@ run_extensions.at-5547-prog.cob:26.40-26.41: 28 COMPUTE X1 = (X2 B-SHIFT-RC 4). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:28.27: +run_extensions.at-5558-prog.cob:28.27: 25 MOVE x#7573 TO X2. 26 COMPUTE X1 = (X2 B-SHIFT-LC 4). 27 DISPLAY X2 " B-SHIFT-LC 4 is " X1. @@ -3060,7 +3060,7 @@ run_extensions.at-5547-prog.cob:28.27: 30 >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:28.28-28.38: +run_extensions.at-5558-prog.cob:28.28-28.38: 25 MOVE x#7573 TO X2. 26 COMPUTE X1 = (X2 B-SHIFT-LC 4). 27 DISPLAY X2 " B-SHIFT-LC 4 is " X1. @@ -3070,7 +3070,7 @@ run_extensions.at-5547-prog.cob:28.28-28.38: 30 >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:28.40-28.41: +run_extensions.at-5558-prog.cob:28.40-28.41: 25 MOVE x#7573 TO X2. 26 COMPUTE X1 = (X2 B-SHIFT-LC 4). 27 DISPLAY X2 " B-SHIFT-LC 4 is " X1. @@ -3080,7 +3080,7 @@ run_extensions.at-5547-prog.cob:28.40-28.41: 30 >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:33.26-33.27: +run_extensions.at-5558-prog.cob:33.26-33.27: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3090,7 +3090,7 @@ run_extensions.at-5547-prog.cob:33.26-33.27: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:33.26: +run_extensions.at-5558-prog.cob:33.26: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3100,7 +3100,7 @@ run_extensions.at-5547-prog.cob:33.26: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:33.29: +run_extensions.at-5558-prog.cob:33.29: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3110,7 +3110,7 @@ run_extensions.at-5547-prog.cob:33.29: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:33.30-33.36: +run_extensions.at-5558-prog.cob:33.30-33.36: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3120,7 +3120,7 @@ run_extensions.at-5547-prog.cob:33.30-33.36: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:33.36: +run_extensions.at-5558-prog.cob:33.36: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3130,7 +3130,7 @@ run_extensions.at-5547-prog.cob:33.36: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:33.37-33.38: +run_extensions.at-5558-prog.cob:33.37-33.38: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3140,7 +3140,7 @@ run_extensions.at-5547-prog.cob:33.37-33.38: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:33.38-33.39: +run_extensions.at-5558-prog.cob:33.38-33.39: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3150,7 +3150,7 @@ run_extensions.at-5547-prog.cob:33.38-33.39: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:33.38: +run_extensions.at-5558-prog.cob:33.38: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3160,7 +3160,7 @@ run_extensions.at-5547-prog.cob:33.38: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:33.41-33.42: +run_extensions.at-5558-prog.cob:33.41-33.42: 30 31 MOVE 10 TO N2. 32 DISPLAY "Using PIC 9(4) COMP-5" @@ -3170,7 +3170,7 @@ run_extensions.at-5547-prog.cob:33.41-33.42: 35 COMPUTE N1 = (x#22 B-RIGHT x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:35.26-35.27: +run_extensions.at-5558-prog.cob:35.26-35.27: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3180,7 +3180,7 @@ run_extensions.at-5547-prog.cob:35.26-35.27: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:35.26: +run_extensions.at-5558-prog.cob:35.26: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3190,7 +3190,7 @@ run_extensions.at-5547-prog.cob:35.26: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:35.29: +run_extensions.at-5558-prog.cob:35.29: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3200,7 +3200,7 @@ run_extensions.at-5547-prog.cob:35.29: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:35.30-35.37: +run_extensions.at-5558-prog.cob:35.30-35.37: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3210,7 +3210,7 @@ run_extensions.at-5547-prog.cob:35.30-35.37: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:35.37: +run_extensions.at-5558-prog.cob:35.37: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3220,7 +3220,7 @@ run_extensions.at-5547-prog.cob:35.37: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:35.38-35.39: +run_extensions.at-5558-prog.cob:35.38-35.39: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3230,7 +3230,7 @@ run_extensions.at-5547-prog.cob:35.38-35.39: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:35.39-35.40: +run_extensions.at-5558-prog.cob:35.39-35.40: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3240,7 +3240,7 @@ run_extensions.at-5547-prog.cob:35.39-35.40: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:35.39: +run_extensions.at-5558-prog.cob:35.39: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3250,7 +3250,7 @@ run_extensions.at-5547-prog.cob:35.39: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:35.42-35.43: +run_extensions.at-5558-prog.cob:35.42-35.43: 32 DISPLAY "Using PIC 9(4) COMP-5" 33 COMPUTE N1 = (x#22 B-LEFT x#05). 34 DISPLAY " x#22 B-LEFT x#05 is " N1. @@ -3260,7 +3260,7 @@ run_extensions.at-5547-prog.cob:35.42-35.43: 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:37.26-37.27: +run_extensions.at-5558-prog.cob:37.26-37.27: 34 DISPLAY " x#22 B-LEFT x#05 is " N1. 35 COMPUTE N1 = (x#22 B-RIGHT x#02). 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. @@ -3270,7 +3270,7 @@ run_extensions.at-5547-prog.cob:37.26-37.27: 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:37.26: +run_extensions.at-5558-prog.cob:37.26: 34 DISPLAY " x#22 B-LEFT x#05 is " N1. 35 COMPUTE N1 = (x#22 B-RIGHT x#02). 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. @@ -3280,7 +3280,7 @@ run_extensions.at-5547-prog.cob:37.26: 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:37.29: +run_extensions.at-5558-prog.cob:37.29: 34 DISPLAY " x#22 B-LEFT x#05 is " N1. 35 COMPUTE N1 = (x#22 B-RIGHT x#02). 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. @@ -3290,7 +3290,7 @@ run_extensions.at-5547-prog.cob:37.29: 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:37.30-37.39: +run_extensions.at-5558-prog.cob:37.30-37.39: 34 DISPLAY " x#22 B-LEFT x#05 is " N1. 35 COMPUTE N1 = (x#22 B-RIGHT x#02). 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. @@ -3300,7 +3300,7 @@ run_extensions.at-5547-prog.cob:37.30-37.39: 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:37.41-37.42: +run_extensions.at-5558-prog.cob:37.41-37.42: 34 DISPLAY " x#22 B-LEFT x#05 is " N1. 35 COMPUTE N1 = (x#22 B-RIGHT x#02). 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. @@ -3310,7 +3310,7 @@ run_extensions.at-5547-prog.cob:37.41-37.42: 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:37.41: +run_extensions.at-5558-prog.cob:37.41: 34 DISPLAY " x#22 B-LEFT x#05 is " N1. 35 COMPUTE N1 = (x#22 B-RIGHT x#02). 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. @@ -3320,7 +3320,7 @@ run_extensions.at-5547-prog.cob:37.41: 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:37.44-37.45: +run_extensions.at-5558-prog.cob:37.44-37.45: 34 DISPLAY " x#22 B-LEFT x#05 is " N1. 35 COMPUTE N1 = (x#22 B-RIGHT x#02). 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. @@ -3330,7 +3330,7 @@ run_extensions.at-5547-prog.cob:37.44-37.45: 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:39.26-39.27: +run_extensions.at-5558-prog.cob:39.26-39.27: 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. @@ -3340,7 +3340,7 @@ run_extensions.at-5547-prog.cob:39.26-39.27: 41 COMPUTE N1 = (N2 B-LEFT x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:39.26: +run_extensions.at-5558-prog.cob:39.26: 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. @@ -3350,7 +3350,7 @@ run_extensions.at-5547-prog.cob:39.26: 41 COMPUTE N1 = (N2 B-LEFT x#05). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:39.29: +run_extensions.at-5558-prog.cob:39.29: 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. @@ -3360,7 +3360,7 @@ run_extensions.at-5547-prog.cob:39.29: 41 COMPUTE N1 = (N2 B-LEFT x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:39.30-39.39: +run_extensions.at-5558-prog.cob:39.30-39.39: 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. @@ -3370,7 +3370,7 @@ run_extensions.at-5547-prog.cob:39.30-39.39: 41 COMPUTE N1 = (N2 B-LEFT x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:39.41-39.42: +run_extensions.at-5558-prog.cob:39.41-39.42: 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. @@ -3380,7 +3380,7 @@ run_extensions.at-5547-prog.cob:39.41-39.42: 41 COMPUTE N1 = (N2 B-LEFT x#05). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:39.41: +run_extensions.at-5558-prog.cob:39.41: 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. @@ -3390,7 +3390,7 @@ run_extensions.at-5547-prog.cob:39.41: 41 COMPUTE N1 = (N2 B-LEFT x#05). >> Hint: Missing . -run_extensions.at-5547-prog.cob:39.44-39.45: +run_extensions.at-5558-prog.cob:39.44-39.45: 36 DISPLAY " x#22 B-RIGHT x#02 is " N1. 37 COMPUTE N1 = (x#22 B-SHIFT-L x#05). 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. @@ -3400,7 +3400,7 @@ run_extensions.at-5547-prog.cob:39.44-39.45: 41 COMPUTE N1 = (N2 B-LEFT x#05). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:41.27: +run_extensions.at-5558-prog.cob:41.27: 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. @@ -3410,7 +3410,7 @@ run_extensions.at-5547-prog.cob:41.27: 43 COMPUTE N1 = (N2 B-RIGHT x#02). >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:41.28-41.34: +run_extensions.at-5558-prog.cob:41.28-41.34: 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. @@ -3420,7 +3420,7 @@ run_extensions.at-5547-prog.cob:41.28-41.34: 43 COMPUTE N1 = (N2 B-RIGHT x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:41.34: +run_extensions.at-5558-prog.cob:41.34: 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. @@ -3430,7 +3430,7 @@ run_extensions.at-5547-prog.cob:41.34: 43 COMPUTE N1 = (N2 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:41.35-41.36: +run_extensions.at-5558-prog.cob:41.35-41.36: 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. @@ -3440,7 +3440,7 @@ run_extensions.at-5547-prog.cob:41.35-41.36: 43 COMPUTE N1 = (N2 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:41.36-41.37: +run_extensions.at-5558-prog.cob:41.36-41.37: 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. @@ -3450,7 +3450,7 @@ run_extensions.at-5547-prog.cob:41.36-41.37: 43 COMPUTE N1 = (N2 B-RIGHT x#02). >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:41.36: +run_extensions.at-5558-prog.cob:41.36: 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. @@ -3460,7 +3460,7 @@ run_extensions.at-5547-prog.cob:41.36: 43 COMPUTE N1 = (N2 B-RIGHT x#02). >> Hint: Missing . -run_extensions.at-5547-prog.cob:41.39-41.40: +run_extensions.at-5558-prog.cob:41.39-41.40: 38 DISPLAY " x#22 B-SHIFT-L x#05 is " N1. 39 COMPUTE N1 = (x#22 B-SHIFT-R x#02). 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. @@ -3470,7 +3470,7 @@ run_extensions.at-5547-prog.cob:41.39-41.40: 43 COMPUTE N1 = (N2 B-RIGHT x#02). >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:43.27: +run_extensions.at-5558-prog.cob:43.27: 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. 41 COMPUTE N1 = (N2 B-LEFT x#05). 42 DISPLAY N2 " B-LEFT x#05 is " N1. @@ -3480,7 +3480,7 @@ run_extensions.at-5547-prog.cob:43.27: 45 STOP RUN. >> Hint: Missing ) . -run_extensions.at-5547-prog.cob:43.28-43.35: +run_extensions.at-5558-prog.cob:43.28-43.35: 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. 41 COMPUTE N1 = (N2 B-LEFT x#05). 42 DISPLAY N2 " B-LEFT x#05 is " N1. @@ -3490,7 +3490,7 @@ run_extensions.at-5547-prog.cob:43.28-43.35: 45 STOP RUN. >> Error: Invalid syntax -run_extensions.at-5547-prog.cob:43.35: +run_extensions.at-5558-prog.cob:43.35: 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. 41 COMPUTE N1 = (N2 B-LEFT x#05). 42 DISPLAY N2 " B-LEFT x#05 is " N1. @@ -3500,7 +3500,7 @@ run_extensions.at-5547-prog.cob:43.35: 45 STOP RUN. >> Hint: Missing . -run_extensions.at-5547-prog.cob:43.36-43.37: +run_extensions.at-5558-prog.cob:43.36-43.37: 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. 41 COMPUTE N1 = (N2 B-LEFT x#05). 42 DISPLAY N2 " B-LEFT x#05 is " N1. @@ -3510,7 +3510,7 @@ run_extensions.at-5547-prog.cob:43.36-43.37: 45 STOP RUN. >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:43.37-43.38: +run_extensions.at-5558-prog.cob:43.37-43.38: 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. 41 COMPUTE N1 = (N2 B-LEFT x#05). 42 DISPLAY N2 " B-LEFT x#05 is " N1. @@ -3520,7 +3520,7 @@ run_extensions.at-5547-prog.cob:43.37-43.38: 45 STOP RUN. >> Warning: Invalid syntax -run_extensions.at-5547-prog.cob:43.37: +run_extensions.at-5558-prog.cob:43.37: 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. 41 COMPUTE N1 = (N2 B-LEFT x#05). 42 DISPLAY N2 " B-LEFT x#05 is " N1. @@ -3530,7 +3530,7 @@ run_extensions.at-5547-prog.cob:43.37: 45 STOP RUN. >> Hint: Missing . -run_extensions.at-5547-prog.cob:43.40-43.41: +run_extensions.at-5558-prog.cob:43.40-43.41: 40 DISPLAY " x#22 B-SHIFT-R x#02 is " N1. 41 COMPUTE N1 = (N2 B-LEFT x#05). 42 DISPLAY N2 " B-LEFT x#05 is " N1. @@ -3540,8 +3540,8 @@ run_extensions.at-5547-prog.cob:43.40-43.41: 45 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5599:0 -run_extensions.at-5599-prog.cob:12.18: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5610:0 +run_extensions.at-5610-prog.cob:12.18: 9 03 FLOAT-BINARY-128 USAGE COMPUTATIONAL-15 VALUE 1.0. 10 11 PROCEDURE DIVISION. @@ -3551,7 +3551,7 @@ run_extensions.at-5599-prog.cob:12.18: 14 DISPLAY FLOAT-BINARY-64 >> Hint: Missing -run_extensions.at-5599-prog.cob:12.19-12.34: +run_extensions.at-5610-prog.cob:12.19-12.34: 9 03 FLOAT-BINARY-128 USAGE COMPUTATIONAL-15 VALUE 1.0. 10 11 PROCEDURE DIVISION. @@ -3561,7 +3561,7 @@ run_extensions.at-5599-prog.cob:12.19-12.34: 14 DISPLAY FLOAT-BINARY-64 >> Error: Invalid syntax -run_extensions.at-5599-prog.cob:14.18: +run_extensions.at-5610-prog.cob:14.18: 11 PROCEDURE DIVISION. 12 DISPLAY FLOAT-BINARY-32 13 @@ -3571,7 +3571,7 @@ run_extensions.at-5599-prog.cob:14.18: 16 DISPLAY FLOAT-BINARY-64 >> Hint: Missing -run_extensions.at-5599-prog.cob:14.19-14.34: +run_extensions.at-5610-prog.cob:14.19-14.34: 11 PROCEDURE DIVISION. 12 DISPLAY FLOAT-BINARY-32 13 @@ -3581,7 +3581,7 @@ run_extensions.at-5599-prog.cob:14.19-14.34: 16 DISPLAY FLOAT-BINARY-64 >> Error: Invalid syntax -run_extensions.at-5599-prog.cob:15.38: +run_extensions.at-5610-prog.cob:15.38: 12 DISPLAY FLOAT-BINARY-32 13 14 DISPLAY FLOAT-BINARY-64 @@ -3591,7 +3591,7 @@ run_extensions.at-5599-prog.cob:15.38: 17 ADD -1.111111111011E302 TO FLOAT-BINARY-64 >> Hint: Missing -run_extensions.at-5599-prog.cob:15.39-15.54: +run_extensions.at-5610-prog.cob:15.39-15.54: 12 DISPLAY FLOAT-BINARY-32 13 14 DISPLAY FLOAT-BINARY-64 @@ -3601,7 +3601,7 @@ run_extensions.at-5599-prog.cob:15.39-15.54: 17 ADD -1.111111111011E302 TO FLOAT-BINARY-64 >> Error: Invalid syntax -run_extensions.at-5599-prog.cob:16.18: +run_extensions.at-5610-prog.cob:16.18: 13 14 DISPLAY FLOAT-BINARY-64 15 MOVE 9.899999999999E+304 TO FLOAT-BINARY-64 @@ -3611,7 +3611,7 @@ run_extensions.at-5599-prog.cob:16.18: 18 DISPLAY FLOAT-BINARY-64 >> Hint: Missing -run_extensions.at-5599-prog.cob:16.19-16.34: +run_extensions.at-5610-prog.cob:16.19-16.34: 13 14 DISPLAY FLOAT-BINARY-64 15 MOVE 9.899999999999E+304 TO FLOAT-BINARY-64 @@ -3621,7 +3621,7 @@ run_extensions.at-5599-prog.cob:16.19-16.34: 18 DISPLAY FLOAT-BINARY-64 >> Error: Invalid syntax -run_extensions.at-5599-prog.cob:17.38-17.53: +run_extensions.at-5610-prog.cob:17.38-17.53: 14 DISPLAY FLOAT-BINARY-64 15 MOVE 9.899999999999E+304 TO FLOAT-BINARY-64 16 DISPLAY FLOAT-BINARY-64 @@ -3631,7 +3631,7 @@ run_extensions.at-5599-prog.cob:17.38-17.53: 19 >> Error: Invalid syntax -run_extensions.at-5599-prog.cob:18.18: +run_extensions.at-5610-prog.cob:18.18: 15 MOVE 9.899999999999E+304 TO FLOAT-BINARY-64 16 DISPLAY FLOAT-BINARY-64 17 ADD -1.111111111011E302 TO FLOAT-BINARY-64 @@ -3641,7 +3641,7 @@ run_extensions.at-5599-prog.cob:18.18: 20 *> NOTE: FLOAT-BINARY-128 is only syntax-checked as support for >> Hint: Missing -run_extensions.at-5599-prog.cob:18.19-18.34: +run_extensions.at-5610-prog.cob:18.19-18.34: 15 MOVE 9.899999999999E+304 TO FLOAT-BINARY-64 16 DISPLAY FLOAT-BINARY-64 17 ADD -1.111111111011E302 TO FLOAT-BINARY-64 @@ -3651,14 +3651,14 @@ run_extensions.at-5599-prog.cob:18.19-18.34: 20 *> NOTE: FLOAT-BINARY-128 is only syntax-checked as support for >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5732:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5786:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5757:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5865:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5934:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6022:0 -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6094:0 -run_extensions.at-6094-prog.cob:15.42-15.50: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5743:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5797:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5768:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5876:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:5945:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6033:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6105:0 +run_extensions.at-6105-prog.cob:15.42-15.50: 12 *> 13 MOVE 0 TO W01-INDEX. 14 INSPECT W01-STRING @@ -3668,7 +3668,7 @@ run_extensions.at-6094-prog.cob:15.42-15.50: 17 THEN >> Error: Invalid syntax -run_extensions.at-6094-prog.cob:21.40-21.48: +run_extensions.at-6105-prog.cob:21.40-21.48: 18 DISPLAY 'Bad Result for Inspect Trailing Case 1' 19 END-IF. 20 *> @@ -3678,7 +3678,7 @@ run_extensions.at-6094-prog.cob:21.40-21.48: 23 THEN >> Error: Invalid syntax -run_extensions.at-6094-prog.cob:29.42-29.50: +run_extensions.at-6105-prog.cob:29.42-29.50: 26 *> 27 MOVE 0 TO W01-INDEX. 28 INSPECT W01-STRING @@ -3688,7 +3688,7 @@ run_extensions.at-6094-prog.cob:29.42-29.50: 31 *> >> Error: Invalid syntax -run_extensions.at-6094-prog.cob:30.29-30.37: +run_extensions.at-6105-prog.cob:30.29-30.37: 27 MOVE 0 TO W01-INDEX. 28 INSPECT W01-STRING 29 TALLYING W01-INDEX FOR TRAILING SPACE @@ -3698,7 +3698,7 @@ run_extensions.at-6094-prog.cob:30.29-30.37: 32 IF W01-STRING NOT = '0123456789BBBBBBBBBB' >> Error: Invalid syntax -run_extensions.at-6094-prog.cob:40.42-40.50: +run_extensions.at-6105-prog.cob:40.42-40.50: 37 MOVE 0 TO W01-INDEX. 38 MOVE SPACES TO W01-STRING. 39 INSPECT W01-STRING @@ -3708,7 +3708,7 @@ run_extensions.at-6094-prog.cob:40.42-40.50: 42 IF W01-INDEX NOT = 0 >> Error: Invalid syntax -run_extensions.at-6094-prog.cob:51.42-51.50: +run_extensions.at-6105-prog.cob:51.42-51.50: 48 MOVE 0 TO W01-INDEX. 49 MOVE SPACES TO W01-STRING. 50 INSPECT W01-STRING @@ -3718,8 +3718,8 @@ run_extensions.at-6094-prog.cob:51.42-51.50: 53 IF W01-INDEX NOT = 20 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6116:0 -run_extensions.at-6116-prog.cob:8.31-8.39: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6127:0 +run_extensions.at-6127-prog.cob:8.31-8.39: 5 WORKING-STORAGE SECTION. 6 01 X PIC X(4) VALUE "1000". 7 PROCEDURE DIVISION. @@ -3729,8 +3729,8 @@ run_extensions.at-6116-prog.cob:8.31-8.39: 10 DISPLAY X. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6151:0 -run_extensions.at-6151-prog.cob:12.13-12.21: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6162:0 +run_extensions.at-6162-prog.cob:12.13-12.21: 9 ALL "A" BY "Z" 10 "B" BY "Y" 11 "Z" BY "0" @@ -3740,8 +3740,8 @@ run_extensions.at-6151-prog.cob:12.13-12.21: 14 DISPLAY "1 - " X. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6210:0 -run_extensions.at-6210-prog.cob:10.18: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6221:0 +run_extensions.at-6221-prog.cob:10.18: 7 01 N PIC S9(5)V9(2) VALUE -11122.55. 8 01 T PIC X(10) VALUE " 8 ". 9 PROCEDURE DIVISION. @@ -3751,7 +3751,7 @@ run_extensions.at-6210-prog.cob:10.18: 12 DISPLAY "Should be 4 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:10.19-10.20: +run_extensions.at-6221-prog.cob:10.19-10.20: 7 01 N PIC S9(5)V9(2) VALUE -11122.55. 8 01 T PIC X(10) VALUE " 8 ". 9 PROCEDURE DIVISION. @@ -3761,7 +3761,7 @@ run_extensions.at-6210-prog.cob:10.19-10.20: 12 DISPLAY "Should be 4 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:10.20: +run_extensions.at-6221-prog.cob:10.20: 7 01 N PIC S9(5)V9(2) VALUE -11122.55. 8 01 T PIC X(10) VALUE " 8 ". 9 PROCEDURE DIVISION. @@ -3771,7 +3771,7 @@ run_extensions.at-6210-prog.cob:10.20: 12 DISPLAY "Should be 4 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:10.21-10.29: +run_extensions.at-6221-prog.cob:10.21-10.29: 7 01 N PIC S9(5)V9(2) VALUE -11122.55. 8 01 T PIC X(10) VALUE " 8 ". 9 PROCEDURE DIVISION. @@ -3781,7 +3781,7 @@ run_extensions.at-6210-prog.cob:10.21-10.29: 12 DISPLAY "Should be 4 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:13.18: +run_extensions.at-6221-prog.cob:13.18: 10 EXAMINE X TALLYING ALL "A" 11 IF TALLY NOT = 4 12 DISPLAY "Should be 4 but is " TALLY. @@ -3791,7 +3791,7 @@ run_extensions.at-6210-prog.cob:13.18: 15 DISPLAY "Should be 2 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:13.19-13.20: +run_extensions.at-6221-prog.cob:13.19-13.20: 10 EXAMINE X TALLYING ALL "A" 11 IF TALLY NOT = 4 12 DISPLAY "Should be 4 but is " TALLY. @@ -3801,7 +3801,7 @@ run_extensions.at-6210-prog.cob:13.19-13.20: 15 DISPLAY "Should be 2 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:13.20: +run_extensions.at-6221-prog.cob:13.20: 10 EXAMINE X TALLYING ALL "A" 11 IF TALLY NOT = 4 12 DISPLAY "Should be 4 but is " TALLY. @@ -3811,7 +3811,7 @@ run_extensions.at-6210-prog.cob:13.20: 15 DISPLAY "Should be 2 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:13.21-13.29: +run_extensions.at-6221-prog.cob:13.21-13.29: 10 EXAMINE X TALLYING ALL "A" 11 IF TALLY NOT = 4 12 DISPLAY "Should be 4 but is " TALLY. @@ -3821,7 +3821,7 @@ run_extensions.at-6210-prog.cob:13.21-13.29: 15 DISPLAY "Should be 2 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:16.18: +run_extensions.at-6221-prog.cob:16.18: 13 EXAMINE X TALLYING LEADING "A" 14 IF TALLY NOT = 2 15 DISPLAY "Should be 2 but is " TALLY. @@ -3831,7 +3831,7 @@ run_extensions.at-6210-prog.cob:16.18: 18 DISPLAY "Should be 5 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:16.19-16.20: +run_extensions.at-6221-prog.cob:16.19-16.20: 13 EXAMINE X TALLYING LEADING "A" 14 IF TALLY NOT = 2 15 DISPLAY "Should be 2 but is " TALLY. @@ -3841,7 +3841,7 @@ run_extensions.at-6210-prog.cob:16.19-16.20: 18 DISPLAY "Should be 5 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:16.20: +run_extensions.at-6221-prog.cob:16.20: 13 EXAMINE X TALLYING LEADING "A" 14 IF TALLY NOT = 2 15 DISPLAY "Should be 2 but is " TALLY. @@ -3851,7 +3851,7 @@ run_extensions.at-6210-prog.cob:16.20: 18 DISPLAY "Should be 5 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:16.21-16.29: +run_extensions.at-6221-prog.cob:16.21-16.29: 13 EXAMINE X TALLYING LEADING "A" 14 IF TALLY NOT = 2 15 DISPLAY "Should be 2 but is " TALLY. @@ -3861,7 +3861,7 @@ run_extensions.at-6210-prog.cob:16.21-16.29: 18 DISPLAY "Should be 5 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:19.18: +run_extensions.at-6221-prog.cob:19.18: 16 EXAMINE X TALLYING UNTIL FIRST "C" 17 IF TALLY NOT = 5 18 DISPLAY "Should be 5 but is " TALLY. @@ -3871,7 +3871,7 @@ run_extensions.at-6210-prog.cob:19.18: 21 DISPLAY "Should be 4 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:19.19-19.20: +run_extensions.at-6221-prog.cob:19.19-19.20: 16 EXAMINE X TALLYING UNTIL FIRST "C" 17 IF TALLY NOT = 5 18 DISPLAY "Should be 5 but is " TALLY. @@ -3881,7 +3881,7 @@ run_extensions.at-6210-prog.cob:19.19-19.20: 21 DISPLAY "Should be 4 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:19.20: +run_extensions.at-6221-prog.cob:19.20: 16 EXAMINE X TALLYING UNTIL FIRST "C" 17 IF TALLY NOT = 5 18 DISPLAY "Should be 5 but is " TALLY. @@ -3891,7 +3891,7 @@ run_extensions.at-6210-prog.cob:19.20: 21 DISPLAY "Should be 4 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:19.21-19.29: +run_extensions.at-6221-prog.cob:19.21-19.29: 16 EXAMINE X TALLYING UNTIL FIRST "C" 17 IF TALLY NOT = 5 18 DISPLAY "Should be 5 but is " TALLY. @@ -3901,7 +3901,7 @@ run_extensions.at-6210-prog.cob:19.21-19.29: 21 DISPLAY "Should be 4 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:24.18: +run_extensions.at-6221-prog.cob:24.18: 21 DISPLAY "Should be 4 but is " TALLY. 22 IF X NOT = "ZZBZBCZB" 23 DISPLAY "Should be ZZBZBCZB but is " X. @@ -3911,7 +3911,7 @@ run_extensions.at-6210-prog.cob:24.18: 26 DISPLAY "Should be 2 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:24.19-24.20: +run_extensions.at-6221-prog.cob:24.19-24.20: 21 DISPLAY "Should be 4 but is " TALLY. 22 IF X NOT = "ZZBZBCZB" 23 DISPLAY "Should be ZZBZBCZB but is " X. @@ -3921,7 +3921,7 @@ run_extensions.at-6210-prog.cob:24.19-24.20: 26 DISPLAY "Should be 2 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:24.20: +run_extensions.at-6221-prog.cob:24.20: 21 DISPLAY "Should be 4 but is " TALLY. 22 IF X NOT = "ZZBZBCZB" 23 DISPLAY "Should be ZZBZBCZB but is " X. @@ -3931,7 +3931,7 @@ run_extensions.at-6210-prog.cob:24.20: 26 DISPLAY "Should be 2 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:24.21-24.29: +run_extensions.at-6221-prog.cob:24.21-24.29: 21 DISPLAY "Should be 4 but is " TALLY. 22 IF X NOT = "ZZBZBCZB" 23 DISPLAY "Should be ZZBZBCZB but is " X. @@ -3941,7 +3941,7 @@ run_extensions.at-6210-prog.cob:24.21-24.29: 26 DISPLAY "Should be 2 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:29.18: +run_extensions.at-6221-prog.cob:29.18: 26 DISPLAY "Should be 2 but is " TALLY. 27 IF X NOT = "AABZBCZB" 28 DISPLAY "Should be AABZBCZB but is " X. @@ -3951,7 +3951,7 @@ run_extensions.at-6210-prog.cob:29.18: 31 DISPLAY "Should be 5 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:29.19-29.20: +run_extensions.at-6221-prog.cob:29.19-29.20: 26 DISPLAY "Should be 2 but is " TALLY. 27 IF X NOT = "AABZBCZB" 28 DISPLAY "Should be AABZBCZB but is " X. @@ -3961,7 +3961,7 @@ run_extensions.at-6210-prog.cob:29.19-29.20: 31 DISPLAY "Should be 5 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:29.20: +run_extensions.at-6221-prog.cob:29.20: 26 DISPLAY "Should be 2 but is " TALLY. 27 IF X NOT = "AABZBCZB" 28 DISPLAY "Should be AABZBCZB but is " X. @@ -3971,7 +3971,7 @@ run_extensions.at-6210-prog.cob:29.20: 31 DISPLAY "Should be 5 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:29.21-29.29: +run_extensions.at-6221-prog.cob:29.21-29.29: 26 DISPLAY "Should be 2 but is " TALLY. 27 IF X NOT = "AABZBCZB" 28 DISPLAY "Should be AABZBCZB but is " X. @@ -3981,7 +3981,7 @@ run_extensions.at-6210-prog.cob:29.21-29.29: 31 DISPLAY "Should be 5 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:34.18: +run_extensions.at-6221-prog.cob:34.18: 31 DISPLAY "Should be 5 but is " TALLY. 32 IF X NOT = "XXXXXCZB" 33 DISPLAY "Should be XXXXXCZB but is " X. @@ -3991,7 +3991,7 @@ run_extensions.at-6210-prog.cob:34.18: 36 DISPLAY "Should be 8 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:34.19-34.20: +run_extensions.at-6221-prog.cob:34.19-34.20: 31 DISPLAY "Should be 5 but is " TALLY. 32 IF X NOT = "XXXXXCZB" 33 DISPLAY "Should be XXXXXCZB but is " X. @@ -4001,7 +4001,7 @@ run_extensions.at-6210-prog.cob:34.19-34.20: 36 DISPLAY "Should be 8 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:34.20: +run_extensions.at-6221-prog.cob:34.20: 31 DISPLAY "Should be 5 but is " TALLY. 32 IF X NOT = "XXXXXCZB" 33 DISPLAY "Should be XXXXXCZB but is " X. @@ -4011,7 +4011,7 @@ run_extensions.at-6210-prog.cob:34.20: 36 DISPLAY "Should be 8 but is " TALLY. >> Hint: Missing . -run_extensions.at-6210-prog.cob:34.21-34.29: +run_extensions.at-6221-prog.cob:34.21-34.29: 31 DISPLAY "Should be 5 but is " TALLY. 32 IF X NOT = "XXXXXCZB" 33 DISPLAY "Should be XXXXXCZB but is " X. @@ -4021,7 +4021,7 @@ run_extensions.at-6210-prog.cob:34.21-34.29: 36 DISPLAY "Should be 8 but is " TALLY. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:39.18: +run_extensions.at-6221-prog.cob:39.18: 36 DISPLAY "Should be 8 but is " TALLY. 37 IF X NOT = "YYYYYYYY" 38 DISPLAY "Should be YYYYYYYY but is " X. @@ -4031,7 +4031,7 @@ run_extensions.at-6210-prog.cob:39.18: 41 DISPLAY "Should be -88888.55 but is " N. >> Hint: Missing . -run_extensions.at-6210-prog.cob:39.19-39.20: +run_extensions.at-6221-prog.cob:39.19-39.20: 36 DISPLAY "Should be 8 but is " TALLY. 37 IF X NOT = "YYYYYYYY" 38 DISPLAY "Should be YYYYYYYY but is " X. @@ -4041,7 +4041,7 @@ run_extensions.at-6210-prog.cob:39.19-39.20: 41 DISPLAY "Should be -88888.55 but is " N. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:39.20: +run_extensions.at-6221-prog.cob:39.20: 36 DISPLAY "Should be 8 but is " TALLY. 37 IF X NOT = "YYYYYYYY" 38 DISPLAY "Should be YYYYYYYY but is " X. @@ -4051,7 +4051,7 @@ run_extensions.at-6210-prog.cob:39.20: 41 DISPLAY "Should be -88888.55 but is " N. >> Hint: Missing . -run_extensions.at-6210-prog.cob:39.21-39.29: +run_extensions.at-6221-prog.cob:39.21-39.29: 36 DISPLAY "Should be 8 but is " TALLY. 37 IF X NOT = "YYYYYYYY" 38 DISPLAY "Should be YYYYYYYY but is " X. @@ -4061,7 +4061,7 @@ run_extensions.at-6210-prog.cob:39.21-39.29: 41 DISPLAY "Should be -88888.55 but is " N. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:39.43: +run_extensions.at-6221-prog.cob:39.43: 36 DISPLAY "Should be 8 but is " TALLY. 37 IF X NOT = "YYYYYYYY" 38 DISPLAY "Should be YYYYYYYY but is " X. @@ -4071,7 +4071,7 @@ run_extensions.at-6210-prog.cob:39.43: 41 DISPLAY "Should be -88888.55 but is " N. >> Hint: Missing . -run_extensions.at-6210-prog.cob:39.44-39.53: +run_extensions.at-6221-prog.cob:39.44-39.53: 36 DISPLAY "Should be 8 but is " TALLY. 37 IF X NOT = "YYYYYYYY" 38 DISPLAY "Should be YYYYYYYY but is " X. @@ -4081,7 +4081,7 @@ run_extensions.at-6210-prog.cob:39.44-39.53: 41 DISPLAY "Should be -88888.55 but is " N. >> Warning: Invalid syntax -run_extensions.at-6210-prog.cob:39.58: +run_extensions.at-6221-prog.cob:39.58: 36 DISPLAY "Should be 8 but is " TALLY. 37 IF X NOT = "YYYYYYYY" 38 DISPLAY "Should be YYYYYYYY but is " X. @@ -4091,7 +4091,7 @@ run_extensions.at-6210-prog.cob:39.58: 41 DISPLAY "Should be -88888.55 but is " N. >> Hint: Missing . -run_extensions.at-6210-prog.cob:40.11-40.13: +run_extensions.at-6221-prog.cob:40.11-40.13: 37 IF X NOT = "YYYYYYYY" 38 DISPLAY "Should be YYYYYYYY but is " X. 39 EXAMINE N TALLYING UNTIL FIRST 5 REPLACING BY 8 @@ -4101,8 +4101,8 @@ run_extensions.at-6210-prog.cob:40.11-40.13: 42 * Re-mod is forbidden here (at least on GCOS): >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6246:0 -run_extensions.at-6246-prog.cob:10.18: +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6257:0 +run_extensions.at-6257-prog.cob:10.18: 7 01 Y PIC X VALUE "Y". 8 01 N PIC S9(5) VALUE -11122. 9 PROCEDURE DIVISION. @@ -4112,7 +4112,7 @@ run_extensions.at-6246-prog.cob:10.18: 12 DISPLAY "Should be XXBXBCXB but is " X. >> Hint: Missing . -run_extensions.at-6246-prog.cob:10.19-10.20: +run_extensions.at-6257-prog.cob:10.19-10.20: 7 01 Y PIC X VALUE "Y". 8 01 N PIC S9(5) VALUE -11122. 9 PROCEDURE DIVISION. @@ -4122,7 +4122,7 @@ run_extensions.at-6246-prog.cob:10.19-10.20: 12 DISPLAY "Should be XXBXBCXB but is " X. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:10.20: +run_extensions.at-6257-prog.cob:10.20: 7 01 Y PIC X VALUE "Y". 8 01 N PIC S9(5) VALUE -11122. 9 PROCEDURE DIVISION. @@ -4132,7 +4132,7 @@ run_extensions.at-6246-prog.cob:10.20: 12 DISPLAY "Should be XXBXBCXB but is " X. >> Hint: Missing . -run_extensions.at-6246-prog.cob:10.21-10.30: +run_extensions.at-6257-prog.cob:10.21-10.30: 7 01 Y PIC X VALUE "Y". 8 01 N PIC S9(5) VALUE -11122. 9 PROCEDURE DIVISION. @@ -4142,7 +4142,7 @@ run_extensions.at-6246-prog.cob:10.21-10.30: 12 DISPLAY "Should be XXBXBCXB but is " X. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:13.18: +run_extensions.at-6257-prog.cob:13.18: 10 EXAMINE X REPLACING ALL "A" BY "X" 11 IF X NOT = "XXBXBCXB" 12 DISPLAY "Should be XXBXBCXB but is " X. @@ -4152,7 +4152,7 @@ run_extensions.at-6246-prog.cob:13.18: 15 DISPLAY "Should be YYBXBCXB but is " X. >> Hint: Missing . -run_extensions.at-6246-prog.cob:13.19-13.20: +run_extensions.at-6257-prog.cob:13.19-13.20: 10 EXAMINE X REPLACING ALL "A" BY "X" 11 IF X NOT = "XXBXBCXB" 12 DISPLAY "Should be XXBXBCXB but is " X. @@ -4162,7 +4162,7 @@ run_extensions.at-6246-prog.cob:13.19-13.20: 15 DISPLAY "Should be YYBXBCXB but is " X. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:13.20: +run_extensions.at-6257-prog.cob:13.20: 10 EXAMINE X REPLACING ALL "A" BY "X" 11 IF X NOT = "XXBXBCXB" 12 DISPLAY "Should be XXBXBCXB but is " X. @@ -4172,7 +4172,7 @@ run_extensions.at-6246-prog.cob:13.20: 15 DISPLAY "Should be YYBXBCXB but is " X. >> Hint: Missing . -run_extensions.at-6246-prog.cob:13.21-13.30: +run_extensions.at-6257-prog.cob:13.21-13.30: 10 EXAMINE X REPLACING ALL "A" BY "X" 11 IF X NOT = "XXBXBCXB" 12 DISPLAY "Should be XXBXBCXB but is " X. @@ -4182,7 +4182,7 @@ run_extensions.at-6246-prog.cob:13.21-13.30: 15 DISPLAY "Should be YYBXBCXB but is " X. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:16.18: +run_extensions.at-6257-prog.cob:16.18: 13 EXAMINE X REPLACING LEADING "X" BY "Y" 14 IF X NOT = "YYBXBCXB" 15 DISPLAY "Should be YYBXBCXB but is " X. @@ -4192,7 +4192,7 @@ run_extensions.at-6246-prog.cob:16.18: 18 DISPLAY "Should be YYCXBCXB but is " X. >> Hint: Missing . -run_extensions.at-6246-prog.cob:16.19-16.20: +run_extensions.at-6257-prog.cob:16.19-16.20: 13 EXAMINE X REPLACING LEADING "X" BY "Y" 14 IF X NOT = "YYBXBCXB" 15 DISPLAY "Should be YYBXBCXB but is " X. @@ -4202,7 +4202,7 @@ run_extensions.at-6246-prog.cob:16.19-16.20: 18 DISPLAY "Should be YYCXBCXB but is " X. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:16.20: +run_extensions.at-6257-prog.cob:16.20: 13 EXAMINE X REPLACING LEADING "X" BY "Y" 14 IF X NOT = "YYBXBCXB" 15 DISPLAY "Should be YYBXBCXB but is " X. @@ -4212,7 +4212,7 @@ run_extensions.at-6246-prog.cob:16.20: 18 DISPLAY "Should be YYCXBCXB but is " X. >> Hint: Missing . -run_extensions.at-6246-prog.cob:16.21-16.30: +run_extensions.at-6257-prog.cob:16.21-16.30: 13 EXAMINE X REPLACING LEADING "X" BY "Y" 14 IF X NOT = "YYBXBCXB" 15 DISPLAY "Should be YYBXBCXB but is " X. @@ -4222,7 +4222,7 @@ run_extensions.at-6246-prog.cob:16.21-16.30: 18 DISPLAY "Should be YYCXBCXB but is " X. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:19.18: +run_extensions.at-6257-prog.cob:19.18: 16 EXAMINE X REPLACING FIRST "B" BY "C" 17 IF X NOT = "YYCXBCXB" 18 DISPLAY "Should be YYCXBCXB but is " X. @@ -4232,7 +4232,7 @@ run_extensions.at-6246-prog.cob:19.18: 21 DISPLAY "Should be ZZZZBCXB but is " X. >> Hint: Missing . -run_extensions.at-6246-prog.cob:19.19-19.20: +run_extensions.at-6257-prog.cob:19.19-19.20: 16 EXAMINE X REPLACING FIRST "B" BY "C" 17 IF X NOT = "YYCXBCXB" 18 DISPLAY "Should be YYCXBCXB but is " X. @@ -4242,7 +4242,7 @@ run_extensions.at-6246-prog.cob:19.19-19.20: 21 DISPLAY "Should be ZZZZBCXB but is " X. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:19.20: +run_extensions.at-6257-prog.cob:19.20: 16 EXAMINE X REPLACING FIRST "B" BY "C" 17 IF X NOT = "YYCXBCXB" 18 DISPLAY "Should be YYCXBCXB but is " X. @@ -4252,7 +4252,7 @@ run_extensions.at-6246-prog.cob:19.20: 21 DISPLAY "Should be ZZZZBCXB but is " X. >> Hint: Missing . -run_extensions.at-6246-prog.cob:19.21-19.30: +run_extensions.at-6257-prog.cob:19.21-19.30: 16 EXAMINE X REPLACING FIRST "B" BY "C" 17 IF X NOT = "YYCXBCXB" 18 DISPLAY "Should be YYCXBCXB but is " X. @@ -4262,7 +4262,7 @@ run_extensions.at-6246-prog.cob:19.21-19.30: 21 DISPLAY "Should be ZZZZBCXB but is " X. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:22.18: +run_extensions.at-6257-prog.cob:22.18: 19 EXAMINE X REPLACING UNTIL FIRST "B" BY "Z" 20 IF X NOT = "ZZZZBCXB" 21 DISPLAY "Should be ZZZZBCXB but is " X. @@ -4272,7 +4272,7 @@ run_extensions.at-6246-prog.cob:22.18: 24 DISPLAY "Should be -33322 but is " N. >> Hint: Missing . -run_extensions.at-6246-prog.cob:22.19-22.20: +run_extensions.at-6257-prog.cob:22.19-22.20: 19 EXAMINE X REPLACING UNTIL FIRST "B" BY "Z" 20 IF X NOT = "ZZZZBCXB" 21 DISPLAY "Should be ZZZZBCXB but is " X. @@ -4282,7 +4282,7 @@ run_extensions.at-6246-prog.cob:22.19-22.20: 24 DISPLAY "Should be -33322 but is " N. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:22.20: +run_extensions.at-6257-prog.cob:22.20: 19 EXAMINE X REPLACING UNTIL FIRST "B" BY "Z" 20 IF X NOT = "ZZZZBCXB" 21 DISPLAY "Should be ZZZZBCXB but is " X. @@ -4292,7 +4292,7 @@ run_extensions.at-6246-prog.cob:22.20: 24 DISPLAY "Should be -33322 but is " N. >> Hint: Missing . -run_extensions.at-6246-prog.cob:22.21-22.30: +run_extensions.at-6257-prog.cob:22.21-22.30: 19 EXAMINE X REPLACING UNTIL FIRST "B" BY "Z" 20 IF X NOT = "ZZZZBCXB" 21 DISPLAY "Should be ZZZZBCXB but is " X. @@ -4302,7 +4302,7 @@ run_extensions.at-6246-prog.cob:22.21-22.30: 24 DISPLAY "Should be -33322 but is " N. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:22.36: +run_extensions.at-6257-prog.cob:22.36: 19 EXAMINE X REPLACING UNTIL FIRST "B" BY "Z" 20 IF X NOT = "ZZZZBCXB" 21 DISPLAY "Should be ZZZZBCXB but is " X. @@ -4312,7 +4312,7 @@ run_extensions.at-6246-prog.cob:22.36: 24 DISPLAY "Should be -33322 but is " N. >> Hint: Missing . -run_extensions.at-6246-prog.cob:22.37-22.39: +run_extensions.at-6257-prog.cob:22.37-22.39: 19 EXAMINE X REPLACING UNTIL FIRST "B" BY "Z" 20 IF X NOT = "ZZZZBCXB" 21 DISPLAY "Should be ZZZZBCXB but is " X. @@ -4322,7 +4322,7 @@ run_extensions.at-6246-prog.cob:22.37-22.39: 24 DISPLAY "Should be -33322 but is " N. >> Warning: Invalid syntax -run_extensions.at-6246-prog.cob:22.41: +run_extensions.at-6257-prog.cob:22.41: 19 EXAMINE X REPLACING UNTIL FIRST "B" BY "Z" 20 IF X NOT = "ZZZZBCXB" 21 DISPLAY "Should be ZZZZBCXB but is " X. @@ -4332,7 +4332,7 @@ run_extensions.at-6246-prog.cob:22.41: 24 DISPLAY "Should be -33322 but is " N. >> Hint: Missing . -run_extensions.at-6246-prog.cob:23.11-23.13: +run_extensions.at-6257-prog.cob:23.11-23.13: 20 IF X NOT = "ZZZZBCXB" 21 DISPLAY "Should be ZZZZBCXB but is " X. 22 EXAMINE N REPLACING ALL 1 BY 3 @@ -4342,4 +4342,4 @@ run_extensions.at-6246-prog.cob:23.11-23.13: 25 STOP RUN. >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6286:0 +Considering: import/gnucobol/tests/testsuite.src/run_extensions.at:6297:0 diff --git a/test/output-tests/run_file.expected b/test/output-tests/run_file.expected index 10d15103b..8d2f2a79d 100644 --- a/test/output-tests/run_file.expected +++ b/test/output-tests/run_file.expected @@ -1,20 +1,43 @@ -Considering: import/gnucobol/tests/testsuite.src/run_file.at:83:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:145:0 -run_file.at-145-TEST1:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:87:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:161:0 +run_file.at-161-prog.cob:44.18-44.22: + 41 * + 42 DEL. + 43 * Note: MicroFocus _does_ delete the file and returns status 00 here + 44 > DELETE FILE FILE-TBL +---- ^^^^ + 45 IF WSFS NOT = "38" + 46 DISPLAY "STATUS DELETE FILE after CLOSE LOCK:" WSFS. +>> Error: Invalid syntax + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:234:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:235:0 +run_file.at-235-progb.cob:24.18-24.22: + 21 CLOSE FILE-TBL + 22 IF WSFS NOT = "42" + 23 DISPLAY "STATUS CLOSE non-opened:" WSFS. + 24 > DELETE FILE FILE-TBL +---- ^^^^ + 25 IF WSFS NOT = "38" + 26 DISPLAY "STATUS DELETE FILE after CLOSE LOCK:" WSFS. +>> Error: Invalid syntax + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:297:0 +run_file.at-297-TEST1:1.6-1.7: 1 > ---- ^ 2 3 >> Error: Unexpected indicator: `v' -run_file.at-145-TEST1:1.7-1.13: +run_file.at-297-TEST1:1.7-1.13: 1 > ---- ^^^^^^ 2 3 >> Error: Invalid syntax -run_file.at-145-TEST1:2.6-2.7: +run_file.at-297-TEST1:2.6-2.7: 1 2 > ---- ^ @@ -22,7 +45,7 @@ run_file.at-145-TEST1:2.6-2.7: 4 >> Error: Unexpected indicator: `e' -run_file.at-145-TEST1:3.6-3.7: +run_file.at-297-TEST1:3.6-3.7: 1 2 3 > @@ -31,7 +54,7 @@ run_file.at-145-TEST1:3.6-3.7: 5 >> Error: Unexpected indicator: `i' -run_file.at-145-TEST1:12.6-12.7: +run_file.at-297-TEST1:12.6-12.7: 9 10 11 @@ -40,7 +63,7 @@ run_file.at-145-TEST1:12.6-12.7: 13 >> Error: Unexpected indicator: `L' -run_file.at-145-TEST1:13.6-13.7: +run_file.at-297-TEST1:13.6-13.7: 10 11 12 @@ -48,9 +71,9 @@ run_file.at-145-TEST1:13.6-13.7: ---- ^ >> Error: Unexpected indicator: `l' -Considering: import/gnucobol/tests/testsuite.src/run_file.at:144:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:218:0 -run_file.at-218-prog.cob:38.18-38.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:296:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:370:0 +run_file.at-370-prog.cob:38.18-38.22: 35 OPEN I-O FILE-OPT 36 IF WSFS NOT = "00" 37 DISPLAY "STATUS I-O, empty file:" WSFS. @@ -60,7 +83,7 @@ run_file.at-218-prog.cob:38.18-38.22: 40 IF WSFS NOT = "41" >> Error: Invalid syntax -run_file.at-218-prog.cob:49.18-49.22: +run_file.at-370-prog.cob:49.18-49.22: 46 CLOSE FILE-OPT 47 IF WSFS NOT = "00" 48 DISPLAY "STATUS CLOSE #2:" WSFS. @@ -70,10 +93,10 @@ run_file.at-218-prog.cob:49.18-49.22: 51 *> DISPLAY "STATUS DELETE FILE (closed) - EXCEPTION:" WSFS >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:252:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:327:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:400:0 -run_file.at-400-prog.cob:39.18-39.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:404:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:479:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:552:0 +run_file.at-552-prog.cob:39.18-39.22: 36 OPEN I-O FILE-OPT 37 IF WSFS NOT = "00" 38 DISPLAY "STATUS I-O, empty file: " WSFS. @@ -83,7 +106,7 @@ run_file.at-400-prog.cob:39.18-39.22: 41 IF WSFS NOT = "41" >> Error: Invalid syntax -run_file.at-400-prog.cob:50.18-50.22: +run_file.at-552-prog.cob:50.18-50.22: 47 CLOSE FILE-OPT 48 IF WSFS NOT = "00" 49 DISPLAY "STATUS CLOSE #2: " WSFS. @@ -93,16 +116,16 @@ run_file.at-400-prog.cob:50.18-50.22: 52 *> DISPLAY "STATUS DELETE FILE (closed) - EXCEPTION: " WSFS >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:437:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:477:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:517:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:595:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:662:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:699:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:705:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:744:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:790:0 -run_file.at-790-prog.cob:10.6-10.28: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:589:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:629:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:669:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:747:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:814:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:851:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:857:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:896:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:942:0 +run_file.at-942-prog.cob:10.6-10.28: 7 FILE-CONTROL. 8 SELECT f ASSIGN whatever 9 ORGANIZATION LINE SEQUENTIAL. @@ -112,22 +135,22 @@ run_file.at-790-prog.cob:10.6-10.28: 12 ORGANIZATION LINE SEQUENTIAL. >> Error: Malformed compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_file.at:816:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:860:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:865:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:912:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:987:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1019:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1067:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1107:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1181:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1193:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1350:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1362:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1400:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1432:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1479:0 -run_file.at-1479-prog.cob:10.35-10.36: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:968:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1012:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1017:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1064:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1139:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1171:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1219:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1259:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1333:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1345:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1502:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1514:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1552:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1584:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:1631:0 +run_file.at-1631-prog.cob:10.35-10.36: 7 SELECT TEST-FILE ASSIGN "FILE" 8 ORGANIZATION IS INDEXED 9 ACCESS IS DYNAMIC @@ -137,8 +160,8 @@ run_file.at-1479-prog.cob:10.35-10.36: 12 FILE SECTION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:1956:0 -run_file.at-1956-prog.cob:22.16-22.24: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:2109:0 +run_file.at-2109-prog.cob:22.16-22.24: 19 20 ALTERNATE RECORD KEY IS SPLIT-KEY3 21 SOURCE IS CM-DISK,CM-TAPE WITH DUPLICATES @@ -148,7 +171,7 @@ run_file.at-1956-prog.cob:22.16-22.24: 24 . >> Error: Invalid syntax -run_file.at-1956-prog.cob:80.54: +run_file.at-2109-prog.cob:80.54: 77 05 FILLER PIC X(8) VALUE "PRE00000". 78 79 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -158,7 +181,7 @@ run_file.at-1956-prog.cob:80.54: 82 >> Hint: Missing -run_file.at-1956-prog.cob:80.55-80.62: +run_file.at-2109-prog.cob:80.55-80.62: 77 05 FILLER PIC X(8) VALUE "PRE00000". 78 79 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -168,7 +191,7 @@ run_file.at-1956-prog.cob:80.55-80.62: 82 >> Error: Invalid syntax -run_file.at-1956-prog.cob:101.55: +run_file.at-2109-prog.cob:101.55: 98 05 FILLER PIC X(25) VALUE "PRESTIGE OFFICE FURNITURE". 99 100 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -178,7 +201,7 @@ run_file.at-1956-prog.cob:101.55: 103 >> Hint: Missing -run_file.at-1956-prog.cob:101.56-101.63: +run_file.at-2109-prog.cob:101.56-101.63: 98 05 FILLER PIC X(25) VALUE "PRESTIGE OFFICE FURNITURE". 99 100 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -188,7 +211,7 @@ run_file.at-1956-prog.cob:101.56-101.63: 103 >> Error: Invalid syntax -run_file.at-1956-prog.cob:122.55: +run_file.at-2109-prog.cob:122.55: 119 05 FILLER PIC X(25) VALUE "114A MAPLE GROVE ". 120 121 02 DATA-ADDRESS-1 REDEFINES DATA-ADDRESS-1-TBL @@ -198,7 +221,7 @@ run_file.at-1956-prog.cob:122.55: 124 >> Hint: Missing -run_file.at-1956-prog.cob:122.56-122.63: +run_file.at-2109-prog.cob:122.56-122.63: 119 05 FILLER PIC X(25) VALUE "114A MAPLE GROVE ". 120 121 02 DATA-ADDRESS-1 REDEFINES DATA-ADDRESS-1-TBL @@ -208,7 +231,7 @@ run_file.at-1956-prog.cob:122.56-122.63: 124 >> Error: Invalid syntax -run_file.at-1956-prog.cob:143.55: +run_file.at-2109-prog.cob:143.55: 140 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 141 142 02 DATA-ADDRESS-2 REDEFINES DATA-ADDRESS-2-TBL @@ -218,7 +241,7 @@ run_file.at-1956-prog.cob:143.55: 145 >> Hint: Missing -run_file.at-1956-prog.cob:143.56-143.63: +run_file.at-2109-prog.cob:143.56-143.63: 140 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 141 142 02 DATA-ADDRESS-2 REDEFINES DATA-ADDRESS-2-TBL @@ -228,7 +251,7 @@ run_file.at-1956-prog.cob:143.56-143.63: 145 >> Error: Invalid syntax -run_file.at-1956-prog.cob:164.55: +run_file.at-2109-prog.cob:164.55: 161 05 FILLER PIC X(10) VALUE "N.Y. ". 162 163 02 DATA-ADDRESS-3 REDEFINES DATA-ADDRESS-3-TBL @@ -238,7 +261,7 @@ run_file.at-1956-prog.cob:164.55: 166 >> Hint: Missing -run_file.at-1956-prog.cob:164.56-164.63: +run_file.at-2109-prog.cob:164.56-164.63: 161 05 FILLER PIC X(10) VALUE "N.Y. ". 162 163 02 DATA-ADDRESS-3 REDEFINES DATA-ADDRESS-3-TBL @@ -248,7 +271,7 @@ run_file.at-1956-prog.cob:164.56-164.63: 166 >> Error: Invalid syntax -run_file.at-1956-prog.cob:185.55: +run_file.at-2109-prog.cob:185.55: 182 05 FILLER PIC 9(10) VALUE 4169898509. 183 184 02 DATA-TELEPHONE REDEFINES DATA-TELEPHONE-TBL @@ -258,7 +281,7 @@ run_file.at-1956-prog.cob:185.55: 187 >> Hint: Missing -run_file.at-1956-prog.cob:185.56-185.63: +run_file.at-2109-prog.cob:185.56-185.63: 182 05 FILLER PIC 9(10) VALUE 4169898509. 183 184 02 DATA-TELEPHONE REDEFINES DATA-TELEPHONE-TBL @@ -268,7 +291,7 @@ run_file.at-1956-prog.cob:185.56-185.63: 187 >> Error: Invalid syntax -run_file.at-1956-prog.cob:206.55: +run_file.at-2109-prog.cob:206.55: 203 05 FILLER PIC X(20) VALUE "MR. THOMAS JEFFERSON". 204 205 02 DATA-DP-MGR REDEFINES DATA-DP-MGR-TBL @@ -278,7 +301,7 @@ run_file.at-1956-prog.cob:206.55: 208 >> Hint: Missing -run_file.at-1956-prog.cob:206.56-206.63: +run_file.at-2109-prog.cob:206.56-206.63: 203 05 FILLER PIC X(20) VALUE "MR. THOMAS JEFFERSON". 204 205 02 DATA-DP-MGR REDEFINES DATA-DP-MGR-TBL @@ -288,7 +311,7 @@ run_file.at-1956-prog.cob:206.56-206.63: 208 >> Error: Invalid syntax -run_file.at-1956-prog.cob:227.54: +run_file.at-2109-prog.cob:227.54: 224 05 FILLER PIC X(8) VALUE "UNI-9040". 225 226 02 DATA-MACHINE REDEFINES DATA-MACHINE-TBL @@ -298,7 +321,7 @@ run_file.at-1956-prog.cob:227.54: 229 >> Hint: Missing -run_file.at-1956-prog.cob:227.55-227.62: +run_file.at-2109-prog.cob:227.55-227.62: 224 05 FILLER PIC X(8) VALUE "UNI-9040". 225 226 02 DATA-MACHINE REDEFINES DATA-MACHINE-TBL @@ -308,7 +331,7 @@ run_file.at-1956-prog.cob:227.55-227.62: 229 >> Error: Invalid syntax -run_file.at-1956-prog.cob:248.61: +run_file.at-2109-prog.cob:248.61: 245 05 FILLER PIC 9(3) COMP-3 VALUE 86. 246 247 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -318,7 +341,7 @@ run_file.at-1956-prog.cob:248.61: 250 78 REC-MAX VALUE 10. >> Hint: Missing -run_file.at-1956-prog.cob:248.62-248.69: +run_file.at-2109-prog.cob:248.62-248.69: 245 05 FILLER PIC 9(3) COMP-3 VALUE 86. 246 247 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -328,9 +351,9 @@ run_file.at-1956-prog.cob:248.62-248.69: 250 78 REC-MAX VALUE 10. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:2165:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:2398:0 -run_file.at-2398-prog.cob:16.19-16.27: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:2312:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:2551:0 +run_file.at-2551-prog.cob:16.19-16.27: 13 access mode is dynamic 14 record key is tbw-key 15 alternate record key is tbw-alt @@ -340,7 +363,7 @@ run_file.at-2398-prog.cob:16.19-16.27: 18 file status is fs-file-status. >> Error: Invalid syntax -run_file.at-2398-prog.cob:206.18-206.22: +run_file.at-2551-prog.cob:206.18-206.22: 203 Perform tbw-Close thru tbw-Close-exit. 204 Move "xx" to fs-file-status. 205 Display "delete file". @@ -350,9 +373,9 @@ run_file.at-2398-prog.cob:206.18-206.22: 208 Go to tbw-exit. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:2774:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3089:0 -run_file.at-3089-prog.cob:9.34-9.42: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:2927:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3242:0 +run_file.at-3242-prog.cob:9.34-9.42: 6 7 INPUT-OUTPUT SECTION. 8 FILE-CONTROL. @@ -362,7 +385,7 @@ run_file.at-3089-prog.cob:9.34-9.42: 11 ACCESS IS SEQUENTIAL RELATIVE KEY IS REC-NUM >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-3089-prog.cob:14.35-14.43: +run_file.at-3242-prog.cob:14.35-14.43: 11 ACCESS IS SEQUENTIAL RELATIVE KEY IS REC-NUM 12 FILE STATUS IS CUST-STAT. 13 @@ -372,7 +395,7 @@ run_file.at-3089-prog.cob:14.35-14.43: 16 ACCESS IS RANDOM RELATIVE KEY IS REC-NUM >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-3089-prog.cob:57.54: +run_file.at-3242-prog.cob:57.54: 54 05 FILLER PIC X(8) VALUE "GAM00000". 55 56 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -382,7 +405,7 @@ run_file.at-3089-prog.cob:57.54: 59 >> Hint: Missing -run_file.at-3089-prog.cob:57.55-57.62: +run_file.at-3242-prog.cob:57.55-57.62: 54 05 FILLER PIC X(8) VALUE "GAM00000". 55 56 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -392,7 +415,7 @@ run_file.at-3089-prog.cob:57.55-57.62: 59 >> Error: Invalid syntax -run_file.at-3089-prog.cob:67.55: +run_file.at-3242-prog.cob:67.55: 64 05 FILLER PIC X(25) VALUE "FORTUNE COOKIE COMPANY ". 65 05 FILLER PIC X(25) VALUE "GAMMA X-RAY TECHNOLOGY ". 66 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -402,7 +425,7 @@ run_file.at-3089-prog.cob:67.55: 69 >> Hint: Missing -run_file.at-3089-prog.cob:67.56-67.63: +run_file.at-3242-prog.cob:67.56-67.63: 64 05 FILLER PIC X(25) VALUE "FORTUNE COOKIE COMPANY ". 65 05 FILLER PIC X(25) VALUE "GAMMA X-RAY TECHNOLOGY ". 66 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -412,7 +435,7 @@ run_file.at-3089-prog.cob:67.56-67.63: 69 >> Error: Invalid syntax -run_file.at-3089-prog.cob:77.55: +run_file.at-3242-prog.cob:77.55: 74 05 FILLER PIC X(10) VALUE "WASHINGTON". 75 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 76 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL @@ -422,7 +445,7 @@ run_file.at-3089-prog.cob:77.55: 79 02 DATA-NO-TERMINALS-TBL. >> Hint: Missing -run_file.at-3089-prog.cob:77.56-77.63: +run_file.at-3242-prog.cob:77.56-77.63: 74 05 FILLER PIC X(10) VALUE "WASHINGTON". 75 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 76 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL @@ -432,7 +455,7 @@ run_file.at-3089-prog.cob:77.56-77.63: 79 02 DATA-NO-TERMINALS-TBL. >> Error: Invalid syntax -run_file.at-3089-prog.cob:89.61: +run_file.at-3242-prog.cob:89.61: 86 05 FILLER PIC 9(3) COMP-3 VALUE 254. 87 88 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -442,7 +465,7 @@ run_file.at-3089-prog.cob:89.61: 91 05 SUB BINARY-SHORT UNSIGNED. >> Hint: Missing -run_file.at-3089-prog.cob:89.62-89.69: +run_file.at-3242-prog.cob:89.62-89.69: 86 05 FILLER PIC 9(3) COMP-3 VALUE 254. 87 88 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -452,8 +475,8 @@ run_file.at-3089-prog.cob:89.62-89.69: 91 05 SUB BINARY-SHORT UNSIGNED. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3152:0 -run_file.at-3152-prog.cob:23.18-23.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3305:0 +run_file.at-3305-prog.cob:23.18-23.22: 20 01 TESTSTAT PIC XX. 21 88 V-OK VALUE "00" "05". 22 PROCEDURE DIVISION. @@ -463,11 +486,11 @@ run_file.at-3152-prog.cob:23.18-23.22: 25 IF NOT V-OK >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3228:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3305:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3416:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3476:0 -run_file.at-3476-prog.cob:22.18-22.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3381:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3458:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3569:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3629:0 +run_file.at-3629-prog.cob:22.18-22.22: 19 01 f-status PIC XX. 20 21 PROCEDURE DIVISION. @@ -477,13 +500,13 @@ run_file.at-3476-prog.cob:22.18-22.22: 24 IF (f-status <> "05") >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3539:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3540:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3580:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3624:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3665:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3763:0 -run_file.at-3763-prog.cob:83.20-83.26: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3692:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3693:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3733:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3777:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3818:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:3916:0 +run_file.at-3916-prog.cob:83.20-83.26: 80 * DISPLAY "FAILED 10: CBL_DELETE_DIR (res=" RETURN-CODE ")" 81 * END-IF 82 @@ -492,8 +515,8 @@ run_file.at-3763-prog.cob:83.20-83.26: 84 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3953:0 -run_file.at-3953-prog.cob:22.36: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4106:0 +run_file.at-4106-prog.cob:22.36: 19 END-IF 20 MOVE 0 TO RETURN-CODE 21 @@ -503,7 +526,7 @@ run_file.at-3953-prog.cob:22.36: 24 END-CALL >> Hint: Missing . -run_file.at-3953-prog.cob:23.8-23.13: +run_file.at-4106-prog.cob:23.8-23.13: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -513,7 +536,7 @@ run_file.at-3953-prog.cob:23.8-23.13: 25 IF RETURN-CODE NOT = 0 >> Error: Invalid syntax -run_file.at-3953-prog.cob:23.13: +run_file.at-4106-prog.cob:23.13: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -523,7 +546,7 @@ run_file.at-3953-prog.cob:23.13: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:23.14-23.25: +run_file.at-4106-prog.cob:23.14-23.25: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -533,7 +556,7 @@ run_file.at-3953-prog.cob:23.14-23.25: 25 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3953-prog.cob:23.25: +run_file.at-4106-prog.cob:23.25: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -543,7 +566,7 @@ run_file.at-3953-prog.cob:23.25: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:23.26-23.27: +run_file.at-4106-prog.cob:23.26-23.27: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -553,7 +576,7 @@ run_file.at-3953-prog.cob:23.26-23.27: 25 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3953-prog.cob:23.27: +run_file.at-4106-prog.cob:23.27: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -563,7 +586,7 @@ run_file.at-3953-prog.cob:23.27: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:23.28-23.29: +run_file.at-4106-prog.cob:23.28-23.29: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -573,7 +596,7 @@ run_file.at-3953-prog.cob:23.28-23.29: 25 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3953-prog.cob:23.29: +run_file.at-4106-prog.cob:23.29: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -583,7 +606,7 @@ run_file.at-3953-prog.cob:23.29: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:23.30-23.37: +run_file.at-4106-prog.cob:23.30-23.37: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -593,7 +616,7 @@ run_file.at-3953-prog.cob:23.30-23.37: 25 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3953-prog.cob:23.37: +run_file.at-4106-prog.cob:23.37: 20 MOVE 0 TO RETURN-CODE 21 22 CALL 'CBL_CREATE_FILE' USING @@ -603,7 +626,7 @@ run_file.at-3953-prog.cob:23.37: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:24.8-24.16: +run_file.at-4106-prog.cob:24.8-24.16: 21 22 CALL 'CBL_CREATE_FILE' USING 23 FNAME ACCESS-MODE 0 0 FHANDLE @@ -613,7 +636,7 @@ run_file.at-3953-prog.cob:24.8-24.16: 26 DISPLAY 'error creating file ...' END-DISPLAY >> Warning: Invalid syntax -run_file.at-3953-prog.cob:34.35: +run_file.at-4106-prog.cob:34.35: 31 MOVE 0 TO OFFSET. 32 MOVE 9 TO NBYTES. 33 @@ -623,7 +646,7 @@ run_file.at-3953-prog.cob:34.35: 36 END-CALL >> Hint: Missing . -run_file.at-3953-prog.cob:35.8-35.15: +run_file.at-4106-prog.cob:35.8-35.15: 32 MOVE 9 TO NBYTES. 33 34 CALL 'CBL_WRITE_FILE' USING @@ -633,7 +656,7 @@ run_file.at-3953-prog.cob:35.8-35.15: 37 IF RETURN-CODE NOT = 0 >> Error: Invalid syntax -run_file.at-3953-prog.cob:35.15: +run_file.at-4106-prog.cob:35.15: 32 MOVE 9 TO NBYTES. 33 34 CALL 'CBL_WRITE_FILE' USING @@ -643,7 +666,7 @@ run_file.at-3953-prog.cob:35.15: 37 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:35.16-35.22: +run_file.at-4106-prog.cob:35.16-35.22: 32 MOVE 9 TO NBYTES. 33 34 CALL 'CBL_WRITE_FILE' USING @@ -653,7 +676,7 @@ run_file.at-3953-prog.cob:35.16-35.22: 37 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3953-prog.cob:35.22: +run_file.at-4106-prog.cob:35.22: 32 MOVE 9 TO NBYTES. 33 34 CALL 'CBL_WRITE_FILE' USING @@ -663,7 +686,7 @@ run_file.at-3953-prog.cob:35.22: 37 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:35.23-35.29: +run_file.at-4106-prog.cob:35.23-35.29: 32 MOVE 9 TO NBYTES. 33 34 CALL 'CBL_WRITE_FILE' USING @@ -673,7 +696,7 @@ run_file.at-3953-prog.cob:35.23-35.29: 37 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3953-prog.cob:35.29: +run_file.at-4106-prog.cob:35.29: 32 MOVE 9 TO NBYTES. 33 34 CALL 'CBL_WRITE_FILE' USING @@ -683,7 +706,7 @@ run_file.at-3953-prog.cob:35.29: 37 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:35.30-35.33: +run_file.at-4106-prog.cob:35.30-35.33: 32 MOVE 9 TO NBYTES. 33 34 CALL 'CBL_WRITE_FILE' USING @@ -693,7 +716,7 @@ run_file.at-3953-prog.cob:35.30-35.33: 37 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3953-prog.cob:35.46: +run_file.at-4106-prog.cob:35.46: 32 MOVE 9 TO NBYTES. 33 34 CALL 'CBL_WRITE_FILE' USING @@ -703,7 +726,7 @@ run_file.at-3953-prog.cob:35.46: 37 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3953-prog.cob:36.8-36.16: +run_file.at-4106-prog.cob:36.8-36.16: 33 34 CALL 'CBL_WRITE_FILE' USING 35 FHANDLE OFFSET NBYTES '0' WRITE-BUFFER @@ -713,8 +736,8 @@ run_file.at-3953-prog.cob:36.8-36.16: 38 DISPLAY 'error writing file ...' END-DISPLAY >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:3960:0 -run_file.at-3960-prog2.cob:22.34: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4113:0 +run_file.at-4113-prog2.cob:22.34: 19 GOBACK 20 END-IF 21 @@ -724,7 +747,7 @@ run_file.at-3960-prog2.cob:22.34: 24 END-CALL >> Hint: Missing . -run_file.at-3960-prog2.cob:23.8-23.15: +run_file.at-4113-prog2.cob:23.8-23.15: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -734,7 +757,7 @@ run_file.at-3960-prog2.cob:23.8-23.15: 25 IF RETURN-CODE NOT = 0 >> Error: Invalid syntax -run_file.at-3960-prog2.cob:23.15: +run_file.at-4113-prog2.cob:23.15: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -744,7 +767,7 @@ run_file.at-3960-prog2.cob:23.15: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:23.16-23.22: +run_file.at-4113-prog2.cob:23.16-23.22: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -754,7 +777,7 @@ run_file.at-3960-prog2.cob:23.16-23.22: 25 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:23.22: +run_file.at-4113-prog2.cob:23.22: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -764,7 +787,7 @@ run_file.at-3960-prog2.cob:23.22: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:23.23-23.29: +run_file.at-4113-prog2.cob:23.23-23.29: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -774,7 +797,7 @@ run_file.at-3960-prog2.cob:23.23-23.29: 25 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:23.29: +run_file.at-4113-prog2.cob:23.29: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -784,7 +807,7 @@ run_file.at-3960-prog2.cob:23.29: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:23.30-23.33: +run_file.at-4113-prog2.cob:23.30-23.33: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -794,7 +817,7 @@ run_file.at-3960-prog2.cob:23.30-23.33: 25 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:23.33: +run_file.at-4113-prog2.cob:23.33: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -804,7 +827,7 @@ run_file.at-3960-prog2.cob:23.33: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:23.34-23.45: +run_file.at-4113-prog2.cob:23.34-23.45: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -814,7 +837,7 @@ run_file.at-3960-prog2.cob:23.34-23.45: 25 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:23.45: +run_file.at-4113-prog2.cob:23.45: 20 END-IF 21 22 CALL 'CBL_READ_FILE' USING @@ -824,7 +847,7 @@ run_file.at-3960-prog2.cob:23.45: 25 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:24.8-24.16: +run_file.at-4113-prog2.cob:24.8-24.16: 21 22 CALL 'CBL_READ_FILE' USING 23 FHANDLE OFFSET NBYTES 128 READ-BUFFER @@ -834,7 +857,7 @@ run_file.at-3960-prog2.cob:24.8-24.16: 26 DISPLAY 'error getting file size...' >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:52.34: +run_file.at-4113-prog2.cob:52.34: 49 MOVE 2 TO OFFSET. 50 MOVE 9 TO NBYTES. 51 @@ -844,7 +867,7 @@ run_file.at-3960-prog2.cob:52.34: 54 END-CALL >> Hint: Missing . -run_file.at-3960-prog2.cob:53.8-53.15: +run_file.at-4113-prog2.cob:53.8-53.15: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -854,7 +877,7 @@ run_file.at-3960-prog2.cob:53.8-53.15: 55 IF RETURN-CODE NOT = 0 >> Error: Invalid syntax -run_file.at-3960-prog2.cob:53.15: +run_file.at-4113-prog2.cob:53.15: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -864,7 +887,7 @@ run_file.at-3960-prog2.cob:53.15: 55 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:53.16-53.22: +run_file.at-4113-prog2.cob:53.16-53.22: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -874,7 +897,7 @@ run_file.at-3960-prog2.cob:53.16-53.22: 55 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:53.22: +run_file.at-4113-prog2.cob:53.22: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -884,7 +907,7 @@ run_file.at-3960-prog2.cob:53.22: 55 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:53.23-53.29: +run_file.at-4113-prog2.cob:53.23-53.29: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -894,7 +917,7 @@ run_file.at-3960-prog2.cob:53.23-53.29: 55 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:53.29: +run_file.at-4113-prog2.cob:53.29: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -904,7 +927,7 @@ run_file.at-3960-prog2.cob:53.29: 55 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:53.30-53.31: +run_file.at-4113-prog2.cob:53.30-53.31: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -914,7 +937,7 @@ run_file.at-3960-prog2.cob:53.30-53.31: 55 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:53.31: +run_file.at-4113-prog2.cob:53.31: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -924,7 +947,7 @@ run_file.at-3960-prog2.cob:53.31: 55 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:53.32-53.43: +run_file.at-4113-prog2.cob:53.32-53.43: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -934,7 +957,7 @@ run_file.at-3960-prog2.cob:53.32-53.43: 55 IF RETURN-CODE NOT = 0 >> Warning: Invalid syntax -run_file.at-3960-prog2.cob:53.43: +run_file.at-4113-prog2.cob:53.43: 50 MOVE 9 TO NBYTES. 51 52 CALL 'CBL_READ_FILE' USING @@ -944,7 +967,7 @@ run_file.at-3960-prog2.cob:53.43: 55 IF RETURN-CODE NOT = 0 >> Hint: Missing . -run_file.at-3960-prog2.cob:54.8-54.16: +run_file.at-4113-prog2.cob:54.8-54.16: 51 52 CALL 'CBL_READ_FILE' USING 53 FHANDLE OFFSET NBYTES 0 READ-BUFFER @@ -954,10 +977,10 @@ run_file.at-3960-prog2.cob:54.8-54.16: 56 DISPLAY 'error reading file ...' >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4000:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4113:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4111:0 -run_file.at-4111-prog2.cob:10.34: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4158:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4266:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4264:0 +run_file.at-4264-prog2.cob:10.34: 7 01 FILE2 PIC X(9) VALUE 'prog3.cob'. 8 9 PROCEDURE DIVISION. @@ -967,7 +990,7 @@ run_file.at-4111-prog2.cob:10.34: 12 END-CALL >> Hint: Missing . -run_file.at-4111-prog2.cob:11.8-11.13: +run_file.at-4264-prog2.cob:11.8-11.13: 8 9 PROCEDURE DIVISION. 10 CALL 'CBL_COPY_FILE' USING @@ -977,7 +1000,7 @@ run_file.at-4111-prog2.cob:11.8-11.13: 13 STOP RUN. >> Error: Invalid syntax -run_file.at-4111-prog2.cob:11.13: +run_file.at-4264-prog2.cob:11.13: 8 9 PROCEDURE DIVISION. 10 CALL 'CBL_COPY_FILE' USING @@ -987,7 +1010,7 @@ run_file.at-4111-prog2.cob:11.13: 13 STOP RUN. >> Hint: Missing . -run_file.at-4111-prog2.cob:11.14-11.19: +run_file.at-4264-prog2.cob:11.14-11.19: 8 9 PROCEDURE DIVISION. 10 CALL 'CBL_COPY_FILE' USING @@ -997,7 +1020,7 @@ run_file.at-4111-prog2.cob:11.14-11.19: 13 STOP RUN. >> Warning: Invalid syntax -run_file.at-4111-prog2.cob:11.19: +run_file.at-4264-prog2.cob:11.19: 8 9 PROCEDURE DIVISION. 10 CALL 'CBL_COPY_FILE' USING @@ -1007,7 +1030,7 @@ run_file.at-4111-prog2.cob:11.19: 13 STOP RUN. >> Hint: Missing . -run_file.at-4111-prog2.cob:12.8-12.16: +run_file.at-4264-prog2.cob:12.8-12.16: 9 PROCEDURE DIVISION. 10 CALL 'CBL_COPY_FILE' USING 11 FILE1 FILE2 @@ -1016,8 +1039,8 @@ run_file.at-4111-prog2.cob:12.8-12.16: 13 STOP RUN. >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4183:0 -run_file.at-4183-fexists_signed.c:9.6-9.7: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4336:0 +run_file.at-4336-fexists_signed.c:9.6-9.7: 6 #include 7 8 /* @@ -1027,7 +1050,7 @@ run_file.at-4183-fexists_signed.c:9.6-9.7: 11 */ >> Error: Unexpected indicator: `c' -run_file.at-4183-fexists_signed.c:9.7-9.8: +run_file.at-4336-fexists_signed.c:9.7-9.8: 6 #include 7 8 /* @@ -1037,7 +1060,7 @@ run_file.at-4183-fexists_signed.c:9.7-9.8: 11 */ >> Error: Invalid syntax -run_file.at-4183-fexists_signed.c:12.6-12.7: +run_file.at-4336-fexists_signed.c:12.6-12.7: 9 * Check file is present and correct by comparing 10 * its content to a given signature. 11 */ @@ -1047,7 +1070,7 @@ run_file.at-4183-fexists_signed.c:12.6-12.7: 14 { >> Error: Unexpected indicator: `T' -run_file.at-4183-fexists_signed.c:13.6-13.7: +run_file.at-4336-fexists_signed.c:13.6-13.7: 10 * its content to a given signature. 11 */ 12 COB_EXT_EXPORT int @@ -1057,22 +1080,22 @@ run_file.at-4183-fexists_signed.c:13.6-13.7: 15 char *bfr; >> Error: Unexpected indicator: `s' -run_file.at-4183-fexists_signed.c:22.9-31.0: +run_file.at-4336-fexists_signed.c:22.8-31.0: 19 f = fopen (fid, "r"); 20 if (f != NULL) { - 21 bfr = (char *) cob_malloc (signature_size); - 22 > if (1 == fread (bfr, signature_size, 1, f)) { ----- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 21 bfr = (char *) cob_malloc (signature_size); + 22 > if (1 == fread (bfr, signature_size, 1, f)) { +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 23 > if (!memcmp (signature, bfr, signature_size)) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 24 > res = 0; ----- ^^^^^^^^^^^^^^^ + 24 > res = 0; +---- ^^^^^^^^^^^^^^ 25 > } ---- ^^^^^^ - 26 > } ----- ^^^^^ - 27 > free (bfr); ----- ^^^^^^^^^^^^^^^ + 26 > } +---- ^^^^ + 27 > cob_free (bfr); +---- ^^^^^^^^^^^^^^^^^^ 28 > } ---- ^^^ 29 > return res; @@ -1081,9 +1104,9 @@ run_file.at-4183-fexists_signed.c:22.9-31.0: ---- ^^ >> Error: Unterminated pseudotext -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4184:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4230:0 -run_file.at-4230-prog.cob:13.18-13.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4337:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4383:0 +run_file.at-4383-prog.cob:13.18-13.22: 10 FD file1. 11 1 file1-rec pic x. 12 PROCEDURE DIVISION. @@ -1093,8 +1116,8 @@ run_file.at-4230-prog.cob:13.18-13.22: 15 MOVE "A" TO file1-rec. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4301:0 -run_file.at-4301-prog.cob:16.18-16.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4454:0 +run_file.at-4454-prog.cob:16.18-16.22: 13 FD file2. 14 1 file2-rec pic xx. 15 PROCEDURE DIVISION. @@ -1104,7 +1127,7 @@ run_file.at-4301-prog.cob:16.18-16.22: 18 MOVE "A" TO file1-rec, file2-rec >> Error: Invalid syntax -run_file.at-4301-prog.cob:16.28: +run_file.at-4454-prog.cob:16.28: 13 FD file2. 14 1 file2-rec pic xx. 15 PROCEDURE DIVISION. @@ -1114,7 +1137,7 @@ run_file.at-4301-prog.cob:16.28: 18 MOVE "A" TO file1-rec, file2-rec >> Hint: Missing . -run_file.at-4301-prog.cob:16.30-16.35: +run_file.at-4454-prog.cob:16.30-16.35: 13 FD file2. 14 1 file2-rec pic xx. 15 PROCEDURE DIVISION. @@ -1124,7 +1147,7 @@ run_file.at-4301-prog.cob:16.30-16.35: 18 MOVE "A" TO file1-rec, file2-rec >> Error: Invalid syntax -run_file.at-4301-prog.cob:16.35: +run_file.at-4454-prog.cob:16.35: 13 FD file2. 14 1 file2-rec pic xx. 15 PROCEDURE DIVISION. @@ -1134,7 +1157,7 @@ run_file.at-4301-prog.cob:16.35: 18 MOVE "A" TO file1-rec, file2-rec >> Hint: Missing . -run_file.at-4301-prog.cob:17.11-17.15: +run_file.at-4454-prog.cob:17.11-17.15: 14 1 file2-rec pic xx. 15 PROCEDURE DIVISION. 16 DELETE FILE file1, file2 @@ -1144,19 +1167,19 @@ run_file.at-4301-prog.cob:17.11-17.15: 19 WRITE file1-rec >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4340:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4390:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4429:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4556:0 -run_file.at-4556-inp_data:1.7-1.8: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4493:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4543:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4582:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4709:0 +run_file.at-4709-inp_data:1.7-1.8: 1 > Record 1................................X....... ---- ^ 2 Record 2.....................X 3 Record 3................................X... >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4554:0 -run_file.at-4554-prog.cob:7.39-7.47: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4707:0 +run_file.at-4707-prog.cob:7.39-7.47: 4 ENVIRONMENT DIVISION. 5 INPUT-OUTPUT SECTION. 6 FILE-CONTROL. @@ -1166,7 +1189,7 @@ run_file.at-4554-prog.cob:7.39-7.47: 9 FILE STATUS IS INPUT-STATUS . >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-4554-prog.cob:11.38-11.46: +run_file.at-4707-prog.cob:11.38-11.46: 8 ORGANIZATION IS LINE SEQUENTIAL 9 FILE STATUS IS INPUT-STATUS . 10 @@ -1176,23 +1199,23 @@ run_file.at-4554-prog.cob:11.38-11.46: 13 FILE STATUS IS INPUT-STATUS . >> Warning: Ignored EXTERNAL (implementation pending) -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4569:0 -run_file.at-4569-reference:1.7-1.8: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4722:0 +run_file.at-4722-reference:1.7-1.8: 1 > Record 1. ---- ^ 2 Record 2................................ >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4685:0 -run_file.at-4685-inp_data:1.7-1.8: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4838:0 +run_file.at-4838-inp_data:1.7-1.8: 1 > Record 1................................X....... ---- ^ 2 Record 2.....................X 3 Record 3................................X... >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4683:0 -run_file.at-4683-prog.cob:7.39-7.47: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4836:0 +run_file.at-4836-prog.cob:7.39-7.47: 4 ENVIRONMENT DIVISION. 5 INPUT-OUTPUT SECTION. 6 FILE-CONTROL. @@ -1202,7 +1225,7 @@ run_file.at-4683-prog.cob:7.39-7.47: 9 FILE STATUS IS INPUT-STATUS . >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-4683-prog.cob:11.38-11.46: +run_file.at-4836-prog.cob:11.38-11.46: 8 ORGANIZATION IS LINE SEQUENTIAL 9 FILE STATUS IS INPUT-STATUS . 10 @@ -1212,16 +1235,16 @@ run_file.at-4683-prog.cob:11.38-11.46: 13 FILE STATUS IS INPUT-STATUS . >> Warning: Ignored EXTERNAL (implementation pending) -Considering: import/gnucobol/tests/testsuite.src/run_file.at:4704:0 -run_file.at-4704-reference:1.7-1.8: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:4857:0 +run_file.at-4857-reference:1.7-1.8: 1 > Record 1. ---- ^ 2 Record 2................................ >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5007:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5011:0 -run_file.at-5011-reference-report:22.6-22.7: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5160:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5164:0 +run_file.at-5164-reference-report:22.6-22.7: 19 20 21 @@ -1231,7 +1254,7 @@ run_file.at-5011-reference-report:22.6-22.7: 24 000002 IDENTIFICATION DIVISION. >> Error: Unexpected indicator: `0' -run_file.at-5011-reference-report:22.7-22.10: +run_file.at-5164-reference-report:22.7-22.10: 19 20 21 @@ -1241,7 +1264,7 @@ run_file.at-5011-reference-report:22.7-22.10: 24 000002 IDENTIFICATION DIVISION. >> Error: Invalid syntax -run_file.at-5011-reference-report:42.6-42.7: +run_file.at-5164-reference-report:42.6-42.7: 39 40 41 @@ -1251,7 +1274,7 @@ run_file.at-5011-reference-report:42.6-42.7: 44 000002 88 endofdata value high-values. >> Error: Unexpected indicator: `0' -run_file.at-5011-reference-report:42.37-42.38: +run_file.at-5164-reference-report:42.37-42.38: 39 40 41 @@ -1261,7 +1284,7 @@ run_file.at-5011-reference-report:42.37-42.38: 44 000002 88 endofdata value high-values. >> Error: Invalid syntax -run_file.at-5011-reference-report:42.37: +run_file.at-5164-reference-report:42.37: 39 40 41 @@ -1271,7 +1294,7 @@ run_file.at-5011-reference-report:42.37: 44 000002 88 endofdata value high-values. >> Hint: Missing RENAMES . -run_file.at-5011-reference-report:42.45: +run_file.at-5164-reference-report:42.45: 39 40 41 @@ -1281,7 +1304,7 @@ run_file.at-5011-reference-report:42.45: 44 000002 88 endofdata value high-values. >> Hint: Missing . -run_file.at-5011-reference-report:42.68-42.72: +run_file.at-5164-reference-report:42.68-42.72: 39 40 41 @@ -1291,7 +1314,7 @@ run_file.at-5011-reference-report:42.68-42.72: 44 000002 88 endofdata value high-values. >> Error: Invalid syntax -run_file.at-5011-reference-report:62.6-62.7: +run_file.at-5164-reference-report:62.6-62.7: 59 60 61 @@ -1301,7 +1324,7 @@ run_file.at-5011-reference-report:62.6-62.7: 64 000002 01 report-line-blank. >> Error: Unexpected indicator: `0' -run_file.at-5011-reference-report:62.37-62.38: +run_file.at-5164-reference-report:62.37-62.38: 59 60 61 @@ -1311,7 +1334,7 @@ run_file.at-5011-reference-report:62.37-62.38: 64 000002 01 report-line-blank. >> Error: Invalid syntax -run_file.at-5011-reference-report:62.37: +run_file.at-5164-reference-report:62.37: 59 60 61 @@ -1321,7 +1344,7 @@ run_file.at-5011-reference-report:62.37: 64 000002 01 report-line-blank. >> Hint: Missing RENAMES . -run_file.at-5011-reference-report:62.45: +run_file.at-5164-reference-report:62.45: 59 60 61 @@ -1331,7 +1354,7 @@ run_file.at-5011-reference-report:62.45: 64 000002 01 report-line-blank. >> Hint: Missing . -run_file.at-5011-reference-report:62.68-62.72: +run_file.at-5164-reference-report:62.68-62.72: 59 60 61 @@ -1341,7 +1364,7 @@ run_file.at-5011-reference-report:62.68-62.72: 64 000002 01 report-line-blank. >> Error: Invalid syntax -run_file.at-5011-reference-report:82.6-82.7: +run_file.at-5164-reference-report:82.6-82.7: 79 80 81 @@ -1351,7 +1374,7 @@ run_file.at-5011-reference-report:82.6-82.7: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Error: Unexpected indicator: `0' -run_file.at-5011-reference-report:82.37-82.38: +run_file.at-5164-reference-report:82.37-82.38: 79 80 81 @@ -1361,7 +1384,7 @@ run_file.at-5011-reference-report:82.37-82.38: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Error: Invalid syntax -run_file.at-5011-reference-report:82.37: +run_file.at-5164-reference-report:82.37: 79 80 81 @@ -1371,7 +1394,7 @@ run_file.at-5011-reference-report:82.37: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Hint: Missing RENAMES . -run_file.at-5011-reference-report:82.45: +run_file.at-5164-reference-report:82.45: 79 80 81 @@ -1381,7 +1404,7 @@ run_file.at-5011-reference-report:82.45: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Hint: Missing . -run_file.at-5011-reference-report:82.68-82.72: +run_file.at-5164-reference-report:82.68-82.72: 79 80 81 @@ -1391,7 +1414,7 @@ run_file.at-5011-reference-report:82.68-82.72: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Error: Invalid syntax -run_file.at-5011-reference-report:96.21: +run_file.at-5164-reference-report:96.21: 93 000011 main. 94 000012 open input data-file. 95 000013 read data-file @@ -1401,7 +1424,7 @@ run_file.at-5011-reference-report:96.21: 98 >> Hint: Missing . -run_file.at-5011-reference-report:102.6-102.7: +run_file.at-5164-reference-report:102.6-102.7: 99 100 101 @@ -1411,7 +1434,7 @@ run_file.at-5011-reference-report:102.6-102.7: 104 000002 stop run >> Error: Unexpected indicator: `0' -run_file.at-5011-reference-report:102.7-102.10: +run_file.at-5164-reference-report:102.7-102.10: 99 100 101 @@ -1421,7 +1444,7 @@ run_file.at-5011-reference-report:102.7-102.10: 104 000002 stop run >> Error: Invalid syntax -run_file.at-5011-reference-report:102.10: +run_file.at-5164-reference-report:102.10: 99 100 101 @@ -1431,7 +1454,7 @@ run_file.at-5011-reference-report:102.10: 104 000002 stop run >> Hint: Missing . -run_file.at-5011-reference-report:102.35-102.37: +run_file.at-5164-reference-report:102.35-102.37: 99 100 101 @@ -1441,7 +1464,7 @@ run_file.at-5011-reference-report:102.35-102.37: 104 000002 stop run >> Warning: Invalid syntax -run_file.at-5011-reference-report:102.37-102.38: +run_file.at-5164-reference-report:102.37-102.38: 99 100 101 @@ -1451,7 +1474,7 @@ run_file.at-5011-reference-report:102.37-102.38: 104 000002 stop run >> Warning: Invalid syntax -run_file.at-5011-reference-report:102.37: +run_file.at-5164-reference-report:102.37: 99 100 101 @@ -1461,7 +1484,7 @@ run_file.at-5011-reference-report:102.37: 104 000002 stop run >> Hint: Missing . -run_file.at-5011-reference-report:102.45: +run_file.at-5164-reference-report:102.45: 99 100 101 @@ -1471,7 +1494,7 @@ run_file.at-5011-reference-report:102.45: 104 000002 stop run >> Hint: Missing . -run_file.at-5011-reference-report:102.68-102.72: +run_file.at-5164-reference-report:102.68-102.72: 99 100 101 @@ -1481,7 +1504,7 @@ run_file.at-5011-reference-report:102.68-102.72: 104 000002 stop run >> Warning: Invalid syntax -run_file.at-5011-reference-report:105.11-105.19: +run_file.at-5164-reference-report:105.11-105.19: 102 PAGE: 0005 LC: 000015 DATE: 150206 103 000001 display "File open error: " data-file-status 104 000002 stop run @@ -1491,7 +1514,7 @@ run_file.at-5011-reference-report:105.11-105.19: 107 000005 open output mini-report. >> Error: Invalid syntax -run_file.at-5011-reference-report:116.28: +run_file.at-5164-reference-report:116.28: 113 000011 move 1 to page-count. 114 000012 accept page-date from date end-accept. 115 000013 move page-count to page-no. @@ -1501,7 +1524,7 @@ run_file.at-5011-reference-report:116.28: 118 >> Hint: Missing . -run_file.at-5011-reference-report:122.6-122.7: +run_file.at-5164-reference-report:122.6-122.7: 119 120 121 @@ -1511,7 +1534,7 @@ run_file.at-5011-reference-report:122.6-122.7: 124 000002 after advancing page >> Error: Unexpected indicator: `0' -run_file.at-5011-reference-report:122.7-122.10: +run_file.at-5164-reference-report:122.7-122.10: 119 120 121 @@ -1521,7 +1544,7 @@ run_file.at-5011-reference-report:122.7-122.10: 124 000002 after advancing page >> Error: Invalid syntax -run_file.at-5011-reference-report:122.10: +run_file.at-5164-reference-report:122.10: 119 120 121 @@ -1531,7 +1554,7 @@ run_file.at-5011-reference-report:122.10: 124 000002 after advancing page >> Hint: Missing . -run_file.at-5011-reference-report:122.35-122.37: +run_file.at-5164-reference-report:122.35-122.37: 119 120 121 @@ -1541,7 +1564,7 @@ run_file.at-5011-reference-report:122.35-122.37: 124 000002 after advancing page >> Warning: Invalid syntax -run_file.at-5011-reference-report:122.37-122.38: +run_file.at-5164-reference-report:122.37-122.38: 119 120 121 @@ -1551,7 +1574,7 @@ run_file.at-5011-reference-report:122.37-122.38: 124 000002 after advancing page >> Warning: Invalid syntax -run_file.at-5011-reference-report:122.37: +run_file.at-5164-reference-report:122.37: 119 120 121 @@ -1561,7 +1584,7 @@ run_file.at-5011-reference-report:122.37: 124 000002 after advancing page >> Hint: Missing . -run_file.at-5011-reference-report:122.45: +run_file.at-5164-reference-report:122.45: 119 120 121 @@ -1571,7 +1594,7 @@ run_file.at-5011-reference-report:122.45: 124 000002 after advancing page >> Hint: Missing . -run_file.at-5011-reference-report:122.68-122.72: +run_file.at-5164-reference-report:122.68-122.72: 119 120 121 @@ -1581,7 +1604,7 @@ run_file.at-5011-reference-report:122.68-122.72: 124 000002 after advancing page >> Warning: Invalid syntax -run_file.at-5011-reference-report:124.15-124.20: +run_file.at-5164-reference-report:124.15-124.20: 121 122 PAGE: 0006 LC: 000015 DATE: 150206 123 000001 from report-line-header @@ -1591,7 +1614,7 @@ run_file.at-5011-reference-report:124.15-124.20: 126 000004 >> Error: Invalid syntax -run_file.at-5011-reference-report:142.6-142.7: +run_file.at-5164-reference-report:142.6-142.7: 139 140 141 @@ -1601,7 +1624,7 @@ run_file.at-5011-reference-report:142.6-142.7: 144 000002 readwrite-loop. >> Error: Unexpected indicator: `0' -run_file.at-5011-reference-report:142.10: +run_file.at-5164-reference-report:142.10: 139 140 141 @@ -1611,7 +1634,7 @@ run_file.at-5011-reference-report:142.10: 144 000002 readwrite-loop. >> Hint: Missing . -run_file.at-5011-reference-report:142.35-142.37: +run_file.at-5164-reference-report:142.35-142.37: 139 140 141 @@ -1621,7 +1644,7 @@ run_file.at-5011-reference-report:142.35-142.37: 144 000002 readwrite-loop. >> Warning: Invalid syntax -run_file.at-5011-reference-report:142.37-142.38: +run_file.at-5164-reference-report:142.37-142.38: 139 140 141 @@ -1631,7 +1654,7 @@ run_file.at-5011-reference-report:142.37-142.38: 144 000002 readwrite-loop. >> Warning: Invalid syntax -run_file.at-5011-reference-report:142.37: +run_file.at-5164-reference-report:142.37: 139 140 141 @@ -1641,7 +1664,7 @@ run_file.at-5011-reference-report:142.37: 144 000002 readwrite-loop. >> Hint: Missing . -run_file.at-5011-reference-report:142.45: +run_file.at-5164-reference-report:142.45: 139 140 141 @@ -1651,7 +1674,7 @@ run_file.at-5011-reference-report:142.45: 144 000002 readwrite-loop. >> Hint: Missing . -run_file.at-5011-reference-report:142.68-142.72: +run_file.at-5164-reference-report:142.68-142.72: 139 140 141 @@ -1661,7 +1684,7 @@ run_file.at-5011-reference-report:142.68-142.72: 144 000002 readwrite-loop. >> Warning: Invalid syntax -run_file.at-5011-reference-report:156.25: +run_file.at-5164-reference-report:156.25: 153 000011 after advancing page 154 000012 end-write 155 000013 end-write @@ -1671,7 +1694,7 @@ run_file.at-5011-reference-report:156.25: 158 >> Hint: Missing . -run_file.at-5011-reference-report:162.6-162.7: +run_file.at-5164-reference-report:162.6-162.7: 159 160 161 @@ -1681,7 +1704,7 @@ run_file.at-5011-reference-report:162.6-162.7: 164 000002 end-read >> Error: Unexpected indicator: `0' -run_file.at-5011-reference-report:162.7-162.10: +run_file.at-5164-reference-report:162.7-162.10: 159 160 161 @@ -1691,7 +1714,7 @@ run_file.at-5011-reference-report:162.7-162.10: 164 000002 end-read >> Error: Invalid syntax -run_file.at-5011-reference-report:162.10: +run_file.at-5164-reference-report:162.10: 159 160 161 @@ -1701,7 +1724,7 @@ run_file.at-5011-reference-report:162.10: 164 000002 end-read >> Hint: Missing . -run_file.at-5011-reference-report:162.35-162.37: +run_file.at-5164-reference-report:162.35-162.37: 159 160 161 @@ -1711,7 +1734,7 @@ run_file.at-5011-reference-report:162.35-162.37: 164 000002 end-read >> Warning: Invalid syntax -run_file.at-5011-reference-report:162.37-162.38: +run_file.at-5164-reference-report:162.37-162.38: 159 160 161 @@ -1721,7 +1744,7 @@ run_file.at-5011-reference-report:162.37-162.38: 164 000002 end-read >> Warning: Invalid syntax -run_file.at-5011-reference-report:162.37: +run_file.at-5164-reference-report:162.37: 159 160 161 @@ -1731,7 +1754,7 @@ run_file.at-5011-reference-report:162.37: 164 000002 end-read >> Hint: Missing . -run_file.at-5011-reference-report:162.45: +run_file.at-5164-reference-report:162.45: 159 160 161 @@ -1741,7 +1764,7 @@ run_file.at-5011-reference-report:162.45: 164 000002 end-read >> Hint: Missing . -run_file.at-5011-reference-report:162.68-162.72: +run_file.at-5164-reference-report:162.68-162.72: 159 160 161 @@ -1751,7 +1774,7 @@ run_file.at-5011-reference-report:162.68-162.72: 164 000002 end-read >> Warning: Invalid syntax -run_file.at-5011-reference-report:164.11-164.19: +run_file.at-5164-reference-report:164.11-164.19: 161 162 PAGE: 0008 LC: 000015 DATE: 150206 163 000001 at end set endofdata to true @@ -1760,9 +1783,9 @@ run_file.at-5011-reference-report:164.11-164.19: 165 000003 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5291:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5301:0 -run_file.at-5301-reference-report:22.6-22.7: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5444:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5454:0 +run_file.at-5454-reference-report:22.6-22.7: 19 20 21 @@ -1772,7 +1795,7 @@ run_file.at-5301-reference-report:22.6-22.7: 24 000002 IDENTIFICATION DIVISION. >> Error: Unexpected indicator: `0' -run_file.at-5301-reference-report:22.7-22.10: +run_file.at-5454-reference-report:22.7-22.10: 19 20 21 @@ -1782,7 +1805,7 @@ run_file.at-5301-reference-report:22.7-22.10: 24 000002 IDENTIFICATION DIVISION. >> Error: Invalid syntax -run_file.at-5301-reference-report:42.6-42.7: +run_file.at-5454-reference-report:42.6-42.7: 39 40 41 @@ -1792,7 +1815,7 @@ run_file.at-5301-reference-report:42.6-42.7: 44 000002 88 endofdata value high-values. >> Error: Unexpected indicator: `0' -run_file.at-5301-reference-report:42.37-42.38: +run_file.at-5454-reference-report:42.37-42.38: 39 40 41 @@ -1802,7 +1825,7 @@ run_file.at-5301-reference-report:42.37-42.38: 44 000002 88 endofdata value high-values. >> Error: Invalid syntax -run_file.at-5301-reference-report:42.37: +run_file.at-5454-reference-report:42.37: 39 40 41 @@ -1812,7 +1835,7 @@ run_file.at-5301-reference-report:42.37: 44 000002 88 endofdata value high-values. >> Hint: Missing RENAMES . -run_file.at-5301-reference-report:42.45: +run_file.at-5454-reference-report:42.45: 39 40 41 @@ -1822,7 +1845,7 @@ run_file.at-5301-reference-report:42.45: 44 000002 88 endofdata value high-values. >> Hint: Missing . -run_file.at-5301-reference-report:43.7-43.9: +run_file.at-5454-reference-report:43.7-43.9: 40 41 42 PAGE: 0002 LC: 000015 @@ -1832,7 +1855,7 @@ run_file.at-5301-reference-report:43.7-43.9: 45 000003 02 data-line pic x(80). >> Error: Invalid syntax -run_file.at-5301-reference-report:62.6-62.7: +run_file.at-5454-reference-report:62.6-62.7: 59 60 61 @@ -1842,7 +1865,7 @@ run_file.at-5301-reference-report:62.6-62.7: 64 000002 01 report-line-blank. >> Error: Unexpected indicator: `0' -run_file.at-5301-reference-report:62.37-62.38: +run_file.at-5454-reference-report:62.37-62.38: 59 60 61 @@ -1852,7 +1875,7 @@ run_file.at-5301-reference-report:62.37-62.38: 64 000002 01 report-line-blank. >> Error: Invalid syntax -run_file.at-5301-reference-report:62.37: +run_file.at-5454-reference-report:62.37: 59 60 61 @@ -1862,7 +1885,7 @@ run_file.at-5301-reference-report:62.37: 64 000002 01 report-line-blank. >> Hint: Missing RENAMES . -run_file.at-5301-reference-report:62.45: +run_file.at-5454-reference-report:62.45: 59 60 61 @@ -1872,7 +1895,7 @@ run_file.at-5301-reference-report:62.45: 64 000002 01 report-line-blank. >> Hint: Missing . -run_file.at-5301-reference-report:63.7-63.9: +run_file.at-5454-reference-report:63.7-63.9: 60 61 62 PAGE: 0003 LC: 000015 @@ -1882,7 +1905,7 @@ run_file.at-5301-reference-report:63.7-63.9: 65 000003 02 filler pic x(18) value all "*". >> Error: Invalid syntax -run_file.at-5301-reference-report:82.6-82.7: +run_file.at-5454-reference-report:82.6-82.7: 79 80 81 @@ -1892,7 +1915,7 @@ run_file.at-5301-reference-report:82.6-82.7: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Error: Unexpected indicator: `0' -run_file.at-5301-reference-report:82.37-82.38: +run_file.at-5454-reference-report:82.37-82.38: 79 80 81 @@ -1902,7 +1925,7 @@ run_file.at-5301-reference-report:82.37-82.38: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Error: Invalid syntax -run_file.at-5301-reference-report:82.37: +run_file.at-5454-reference-report:82.37: 79 80 81 @@ -1912,7 +1935,7 @@ run_file.at-5301-reference-report:82.37: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Hint: Missing RENAMES . -run_file.at-5301-reference-report:82.45: +run_file.at-5454-reference-report:82.45: 79 80 81 @@ -1922,7 +1945,7 @@ run_file.at-5301-reference-report:82.45: 84 000002 02 filler pic x(5) VALUE " LC: ". >> Hint: Missing . -run_file.at-5301-reference-report:83.11-83.13: +run_file.at-5454-reference-report:83.11-83.13: 80 81 82 PAGE: 0004 LC: 000015 @@ -1932,7 +1955,7 @@ run_file.at-5301-reference-report:83.11-83.13: 85 000003 02 header-tag pic 9(6). >> Error: Invalid syntax -run_file.at-5301-reference-report:96.21: +run_file.at-5454-reference-report:96.21: 93 000011 main. 94 000012 open input data-file. 95 000013 read data-file @@ -1942,7 +1965,7 @@ run_file.at-5301-reference-report:96.21: 98 >> Hint: Missing . -run_file.at-5301-reference-report:102.6-102.7: +run_file.at-5454-reference-report:102.6-102.7: 99 100 101 @@ -1952,7 +1975,7 @@ run_file.at-5301-reference-report:102.6-102.7: 104 000002 stop run >> Error: Unexpected indicator: `0' -run_file.at-5301-reference-report:102.7-102.10: +run_file.at-5454-reference-report:102.7-102.10: 99 100 101 @@ -1962,7 +1985,7 @@ run_file.at-5301-reference-report:102.7-102.10: 104 000002 stop run >> Error: Invalid syntax -run_file.at-5301-reference-report:102.10: +run_file.at-5454-reference-report:102.10: 99 100 101 @@ -1972,7 +1995,7 @@ run_file.at-5301-reference-report:102.10: 104 000002 stop run >> Hint: Missing . -run_file.at-5301-reference-report:102.35-102.37: +run_file.at-5454-reference-report:102.35-102.37: 99 100 101 @@ -1982,7 +2005,7 @@ run_file.at-5301-reference-report:102.35-102.37: 104 000002 stop run >> Warning: Invalid syntax -run_file.at-5301-reference-report:102.37-102.38: +run_file.at-5454-reference-report:102.37-102.38: 99 100 101 @@ -1992,7 +2015,7 @@ run_file.at-5301-reference-report:102.37-102.38: 104 000002 stop run >> Warning: Invalid syntax -run_file.at-5301-reference-report:102.37: +run_file.at-5454-reference-report:102.37: 99 100 101 @@ -2002,7 +2025,7 @@ run_file.at-5301-reference-report:102.37: 104 000002 stop run >> Hint: Missing . -run_file.at-5301-reference-report:102.45: +run_file.at-5454-reference-report:102.45: 99 100 101 @@ -2012,7 +2035,7 @@ run_file.at-5301-reference-report:102.45: 104 000002 stop run >> Hint: Missing . -run_file.at-5301-reference-report:103.19-103.26: +run_file.at-5454-reference-report:103.19-103.26: 100 101 102 PAGE: 0005 LC: 000015 @@ -2022,7 +2045,7 @@ run_file.at-5301-reference-report:103.19-103.26: 105 000003 end-read. >> Warning: Invalid syntax -run_file.at-5301-reference-report:105.11-105.19: +run_file.at-5454-reference-report:105.11-105.19: 102 PAGE: 0005 LC: 000015 103 000001 display "File open error: " data-file-status 104 000002 stop run @@ -2032,7 +2055,7 @@ run_file.at-5301-reference-report:105.11-105.19: 107 000005 open output mini-report. >> Error: Invalid syntax -run_file.at-5301-reference-report:116.28: +run_file.at-5454-reference-report:116.28: 113 000011 move 1 to page-count. 114 000012 accept page-date from date end-accept. 115 000013 move page-count to page-no. @@ -2042,7 +2065,7 @@ run_file.at-5301-reference-report:116.28: 118 >> Hint: Missing . -run_file.at-5301-reference-report:122.6-122.7: +run_file.at-5454-reference-report:122.6-122.7: 119 120 121 @@ -2052,7 +2075,7 @@ run_file.at-5301-reference-report:122.6-122.7: 124 000002 after advancing page >> Error: Unexpected indicator: `0' -run_file.at-5301-reference-report:122.7-122.10: +run_file.at-5454-reference-report:122.7-122.10: 119 120 121 @@ -2062,7 +2085,7 @@ run_file.at-5301-reference-report:122.7-122.10: 124 000002 after advancing page >> Error: Invalid syntax -run_file.at-5301-reference-report:122.10: +run_file.at-5454-reference-report:122.10: 119 120 121 @@ -2072,7 +2095,7 @@ run_file.at-5301-reference-report:122.10: 124 000002 after advancing page >> Hint: Missing . -run_file.at-5301-reference-report:122.35-122.37: +run_file.at-5454-reference-report:122.35-122.37: 119 120 121 @@ -2082,7 +2105,7 @@ run_file.at-5301-reference-report:122.35-122.37: 124 000002 after advancing page >> Warning: Invalid syntax -run_file.at-5301-reference-report:122.37-122.38: +run_file.at-5454-reference-report:122.37-122.38: 119 120 121 @@ -2092,7 +2115,7 @@ run_file.at-5301-reference-report:122.37-122.38: 124 000002 after advancing page >> Warning: Invalid syntax -run_file.at-5301-reference-report:122.37: +run_file.at-5454-reference-report:122.37: 119 120 121 @@ -2102,7 +2125,7 @@ run_file.at-5301-reference-report:122.37: 124 000002 after advancing page >> Hint: Missing . -run_file.at-5301-reference-report:122.45: +run_file.at-5454-reference-report:122.45: 119 120 121 @@ -2112,7 +2135,7 @@ run_file.at-5301-reference-report:122.45: 124 000002 after advancing page >> Hint: Missing . -run_file.at-5301-reference-report:123.15-123.19: +run_file.at-5454-reference-report:123.15-123.19: 120 121 122 PAGE: 0006 LC: 000015 @@ -2122,7 +2145,7 @@ run_file.at-5301-reference-report:123.15-123.19: 125 000003 end-write. >> Warning: Invalid syntax -run_file.at-5301-reference-report:124.15-124.20: +run_file.at-5454-reference-report:124.15-124.20: 121 122 PAGE: 0006 LC: 000015 123 000001 from report-line-header @@ -2132,7 +2155,7 @@ run_file.at-5301-reference-report:124.15-124.20: 126 000004 >> Error: Invalid syntax -run_file.at-5301-reference-report:142.6-142.7: +run_file.at-5454-reference-report:142.6-142.7: 139 140 141 @@ -2142,7 +2165,7 @@ run_file.at-5301-reference-report:142.6-142.7: 144 000002 readwrite-loop. >> Error: Unexpected indicator: `0' -run_file.at-5301-reference-report:142.10: +run_file.at-5454-reference-report:142.10: 139 140 141 @@ -2152,7 +2175,7 @@ run_file.at-5301-reference-report:142.10: 144 000002 readwrite-loop. >> Hint: Missing . -run_file.at-5301-reference-report:142.35-142.37: +run_file.at-5454-reference-report:142.35-142.37: 139 140 141 @@ -2162,7 +2185,7 @@ run_file.at-5301-reference-report:142.35-142.37: 144 000002 readwrite-loop. >> Warning: Invalid syntax -run_file.at-5301-reference-report:142.37-142.38: +run_file.at-5454-reference-report:142.37-142.38: 139 140 141 @@ -2172,7 +2195,7 @@ run_file.at-5301-reference-report:142.37-142.38: 144 000002 readwrite-loop. >> Warning: Invalid syntax -run_file.at-5301-reference-report:142.37: +run_file.at-5454-reference-report:142.37: 139 140 141 @@ -2182,7 +2205,7 @@ run_file.at-5301-reference-report:142.37: 144 000002 readwrite-loop. >> Hint: Missing . -run_file.at-5301-reference-report:142.45: +run_file.at-5454-reference-report:142.45: 139 140 141 @@ -2192,7 +2215,7 @@ run_file.at-5301-reference-report:142.45: 144 000002 readwrite-loop. >> Hint: Missing . -run_file.at-5301-reference-report:144.7-144.21: +run_file.at-5454-reference-report:144.7-144.21: 141 142 PAGE: 0007 LC: 000015 143 000001**************************************************************** @@ -2202,7 +2225,7 @@ run_file.at-5301-reference-report:144.7-144.21: 146 000004 move linage-counter to body-tag >> Warning: Invalid syntax -run_file.at-5301-reference-report:156.25: +run_file.at-5454-reference-report:156.25: 153 000011 after advancing page 154 000012 end-write 155 000013 end-write @@ -2212,7 +2235,7 @@ run_file.at-5301-reference-report:156.25: 158 >> Hint: Missing . -run_file.at-5301-reference-report:162.6-162.7: +run_file.at-5454-reference-report:162.6-162.7: 159 160 161 @@ -2222,7 +2245,7 @@ run_file.at-5301-reference-report:162.6-162.7: 164 000002 end-read >> Error: Unexpected indicator: `0' -run_file.at-5301-reference-report:162.7-162.10: +run_file.at-5454-reference-report:162.7-162.10: 159 160 161 @@ -2232,7 +2255,7 @@ run_file.at-5301-reference-report:162.7-162.10: 164 000002 end-read >> Error: Invalid syntax -run_file.at-5301-reference-report:162.10: +run_file.at-5454-reference-report:162.10: 159 160 161 @@ -2242,7 +2265,7 @@ run_file.at-5301-reference-report:162.10: 164 000002 end-read >> Hint: Missing . -run_file.at-5301-reference-report:162.35-162.37: +run_file.at-5454-reference-report:162.35-162.37: 159 160 161 @@ -2252,7 +2275,7 @@ run_file.at-5301-reference-report:162.35-162.37: 164 000002 end-read >> Warning: Invalid syntax -run_file.at-5301-reference-report:162.37-162.38: +run_file.at-5454-reference-report:162.37-162.38: 159 160 161 @@ -2262,7 +2285,7 @@ run_file.at-5301-reference-report:162.37-162.38: 164 000002 end-read >> Warning: Invalid syntax -run_file.at-5301-reference-report:162.37: +run_file.at-5454-reference-report:162.37: 159 160 161 @@ -2272,7 +2295,7 @@ run_file.at-5301-reference-report:162.37: 164 000002 end-read >> Hint: Missing . -run_file.at-5301-reference-report:162.45: +run_file.at-5454-reference-report:162.45: 159 160 161 @@ -2282,7 +2305,7 @@ run_file.at-5301-reference-report:162.45: 164 000002 end-read >> Hint: Missing . -run_file.at-5301-reference-report:163.15-163.21: +run_file.at-5454-reference-report:163.15-163.21: 160 161 162 PAGE: 0008 LC: 000015 @@ -2292,7 +2315,7 @@ run_file.at-5301-reference-report:163.15-163.21: 165 000003 . >> Warning: Invalid syntax -run_file.at-5301-reference-report:164.11-164.19: +run_file.at-5454-reference-report:164.11-164.19: 161 162 PAGE: 0008 LC: 000015 163 000001 at end set endofdata to true @@ -2301,8 +2324,8 @@ run_file.at-5301-reference-report:164.11-164.19: 165 000003 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5363:0 -run_file.at-5363-prog.cob:36.32-36.37: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5516:0 +run_file.at-5516-prog.cob:36.32-36.37: 33 READ f 34 AT END 35 DISPLAY "Failed: EOF" @@ -2312,7 +2335,7 @@ run_file.at-5363-prog.cob:36.32-36.37: 38 >> Error: Invalid syntax -run_file.at-5363-prog.cob:44.28-44.33: +run_file.at-5516-prog.cob:44.28-44.33: 41 DISPLAY rec-size ": >" f-rec (1:rec-size) "<" 42 IF rec-size NOT = i 43 DISPLAY "Failed: bad record size" @@ -2322,7 +2345,7 @@ run_file.at-5363-prog.cob:44.28-44.33: 46 IF f-x (rec-size) NOT = 1-x (rec-size) >> Error: Invalid syntax -run_file.at-5363-prog.cob:48.28-48.33: +run_file.at-5516-prog.cob:48.28-48.33: 45 END-IF 46 IF f-x (rec-size) NOT = 1-x (rec-size) 47 DISPLAY "Failed: bad data" @@ -2332,8 +2355,8 @@ run_file.at-5363-prog.cob:48.28-48.33: 50 END-PERFORM >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5437:0 -run_file.at-5437-prog.cob:37.32-37.37: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5590:0 +run_file.at-5590-prog.cob:37.32-37.37: 34 READ f 35 AT END 36 DISPLAY "Failed: EOF" @@ -2343,7 +2366,7 @@ run_file.at-5437-prog.cob:37.32-37.37: 39 >> Error: Invalid syntax -run_file.at-5437-prog.cob:43.28-43.33: +run_file.at-5590-prog.cob:43.28-43.33: 40 DISPLAY rec-size ": >" f-rec (1:rec-size) "<" 41 IF rec-size NOT = i 42 DISPLAY "Failed: bad record size" @@ -2353,7 +2376,7 @@ run_file.at-5437-prog.cob:43.28-43.33: 45 IF f-x (rec-size) NOT = 1-x (rec-size) >> Error: Invalid syntax -run_file.at-5437-prog.cob:47.28-47.33: +run_file.at-5590-prog.cob:47.28-47.33: 44 END-IF 45 IF f-x (rec-size) NOT = 1-x (rec-size) 46 DISPLAY "Failed: bad data" @@ -2363,9 +2386,9 @@ run_file.at-5437-prog.cob:47.28-47.33: 49 END-PERFORM >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5558:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5630:0 -run_file.at-5630-prog1.cob:8.23: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5711:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5783:0 +run_file.at-5783-prog1.cob:8.23: 5 input-output section. 6 file-control. 7 select file1 assign disk @@ -2375,7 +2398,7 @@ run_file.at-5630-prog1.cob:8.23: 10 data division. >> Hint: Missing AUTOMATIC -run_file.at-5630-prog1.cob:8.24-8.33: +run_file.at-5783-prog1.cob:8.24-8.33: 5 input-output section. 6 file-control. 7 select file1 assign disk @@ -2385,9 +2408,9 @@ run_file.at-5630-prog1.cob:8.24-8.33: 10 data division. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5631:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5698:0 -run_file.at-5698-prog1.cob:21.32: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5784:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5851:0 +run_file.at-5851-prog1.cob:21.32: 18 procedure division. 19 open output file1. 20 close file1. @@ -2397,7 +2420,7 @@ run_file.at-5698-prog1.cob:21.32: 23 if os-check = spaces >> Hint: Missing NO REWIND -run_file.at-5698-prog1.cob:21.33-21.37: +run_file.at-5851-prog1.cob:21.33-21.37: 18 procedure division. 19 open output file1. 20 close file1. @@ -2407,14 +2430,14 @@ run_file.at-5698-prog1.cob:21.33-21.37: 23 if os-check = spaces >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5699:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5768:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5769:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5842:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5843:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5916:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5917:0 -run_file.at-5917-prog2.cob:21.32: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5852:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5921:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5922:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5995:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:5996:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6069:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6070:0 +run_file.at-6070-prog2.cob:21.32: 18 stop run 19 end-if. 20 close file1 @@ -2424,7 +2447,7 @@ run_file.at-5917-prog2.cob:21.32: 23 display "FAILED: " fs >> Hint: Missing NO REWIND -run_file.at-5917-prog2.cob:21.33-21.37: +run_file.at-6070-prog2.cob:21.33-21.37: 18 stop run 19 end-if. 20 close file1 @@ -2434,8 +2457,8 @@ run_file.at-5917-prog2.cob:21.33-21.37: 23 display "FAILED: " fs >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:5951:0 -run_file.at-5951-prog.cob:13.18-13.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6104:0 +run_file.at-6104-prog.cob:13.18-13.22: 10 FD file1. 11 1 file1-rec pic x. 12 PROCEDURE DIVISION. @@ -2445,8 +2468,8 @@ run_file.at-5951-prog.cob:13.18-13.22: 15 MOVE "A" TO file1-rec. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6001:0 -run_file.at-6001-prog.cob:17.18-17.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6154:0 +run_file.at-6154-prog.cob:17.18-17.22: 14 WORKING-STORAGE SECTION. 15 77 file1-key pic 99. 16 PROCEDURE DIVISION. @@ -2456,8 +2479,8 @@ run_file.at-6001-prog.cob:17.18-17.22: 19 MOVE 1 to file1-key. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6063:0 -run_file.at-6063-prog.cob:37.32-37.37: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6216:0 +run_file.at-6216-prog.cob:37.32-37.37: 34 READ f 35 AT END 36 DISPLAY "Failed: EOF" @@ -2467,7 +2490,7 @@ run_file.at-6063-prog.cob:37.32-37.37: 39 >> Error: Invalid syntax -run_file.at-6063-prog.cob:43.28-43.33: +run_file.at-6216-prog.cob:43.28-43.33: 40 DISPLAY rec-size ": >" f-rec (1:rec-size) "<" 41 IF rec-size NOT = i 42 DISPLAY "Failed: bad record size" @@ -2477,7 +2500,7 @@ run_file.at-6063-prog.cob:43.28-43.33: 45 IF f-x (rec-size) NOT = 1-x (rec-size) >> Error: Invalid syntax -run_file.at-6063-prog.cob:47.28-47.33: +run_file.at-6216-prog.cob:47.28-47.33: 44 END-IF 45 IF f-x (rec-size) NOT = 1-x (rec-size) 46 DISPLAY "Failed: bad data" @@ -2487,9 +2510,9 @@ run_file.at-6063-prog.cob:47.28-47.33: 49 END-PERFORM >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6113:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6183:0 -run_file.at-6183-prog.cob:43.32-43.37: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6266:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6336:0 +run_file.at-6336-prog.cob:43.32-43.37: 40 READ f 41 AT END 42 DISPLAY "Failed: EOF" @@ -2499,7 +2522,7 @@ run_file.at-6183-prog.cob:43.32-43.37: 45 >> Error: Invalid syntax -run_file.at-6183-prog.cob:49.28-49.33: +run_file.at-6336-prog.cob:49.28-49.33: 46 DISPLAY rec-size ": >" f-rec (3:rec-size - 2) "<" 47 IF rec-size NOT = (22 - f-key) + 1 48 DISPLAY "Failed: bad record size - " rec-size @@ -2509,7 +2532,7 @@ run_file.at-6183-prog.cob:49.28-49.33: 51 IF f-x (rec-size - 2) NOT = 1-x (rec-size - 2) >> Error: Invalid syntax -run_file.at-6183-prog.cob:53.28-53.33: +run_file.at-6336-prog.cob:53.28-53.33: 50 END-IF 51 IF f-x (rec-size - 2) NOT = 1-x (rec-size - 2) 52 DISPLAY "Failed: bad data - " f-data @@ -2519,8 +2542,8 @@ run_file.at-6183-prog.cob:53.28-53.33: 55 END-PERFORM >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6273:0 -run_file.at-6273-prog1.cob:10.23: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6426:0 +run_file.at-6426-prog1.cob:10.23: 7 select file1 assign disk 8 organization indexed 9 record key file1-key @@ -2530,7 +2553,7 @@ run_file.at-6273-prog1.cob:10.23: 12 data division. >> Hint: Missing AUTOMATIC -run_file.at-6273-prog1.cob:10.24-10.33: +run_file.at-6426-prog1.cob:10.24-10.33: 7 select file1 assign disk 8 organization indexed 9 record key file1-key @@ -2540,9 +2563,9 @@ run_file.at-6273-prog1.cob:10.24-10.33: 12 data division. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6274:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6351:0 -run_file.at-6351-prog1.cob:25.32: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6427:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6504:0 +run_file.at-6504-prog1.cob:25.32: 22 procedure division. 23 open output file1. 24 close file1. @@ -2552,7 +2575,7 @@ run_file.at-6351-prog1.cob:25.32: 27 if os-check = spaces >> Hint: Missing NO REWIND -run_file.at-6351-prog1.cob:25.33-25.37: +run_file.at-6504-prog1.cob:25.33-25.37: 22 procedure division. 23 open output file1. 24 close file1. @@ -2562,14 +2585,14 @@ run_file.at-6351-prog1.cob:25.33-25.37: 27 if os-check = spaces >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6352:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6430:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6431:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6515:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6516:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6598:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6599:0 -run_file.at-6599-prog2.cob:25.32: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6505:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6583:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6584:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6668:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6669:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6751:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6752:0 +run_file.at-6752-prog2.cob:25.32: 22 stop run 23 end-if. 24 close file1 @@ -2579,7 +2602,7 @@ run_file.at-6599-prog2.cob:25.32: 27 display "FAILED: " fs >> Hint: Missing NO REWIND -run_file.at-6599-prog2.cob:25.33-25.37: +run_file.at-6752-prog2.cob:25.33-25.37: 22 stop run 23 end-if. 24 close file1 @@ -2589,15 +2612,15 @@ run_file.at-6599-prog2.cob:25.33-25.37: 27 display "FAILED: " fs >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6688:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6689:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6781:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6782:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6871:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6872:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:6951:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:7095:0 -run_file.at-7095-prog.cob:36.18-36.22: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6841:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6842:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6934:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:6935:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:7024:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:7025:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:7104:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:7248:0 +run_file.at-7248-prog.cob:36.18-36.22: 33 01 w-serial PIC 99 VALUE 0. 34 35 PROCEDURE DIVISION. @@ -2607,10 +2630,10 @@ run_file.at-7095-prog.cob:36.18-36.22: 38 MOVE "AAAAAAaaaaaaXX----" TO f-rec >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:7266:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:7361:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:8028:0 -run_file.at-8028-cmod.c:5.7-5.11: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:7419:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:7514:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:8181:0 +run_file.at-8181-cmod.c:5.7-5.11: 2 #include 3 #include 4 @@ -2620,7 +2643,7 @@ run_file.at-8028-cmod.c:5.7-5.11: 7 /********************************************************* >> Error: Invalid syntax -run_file.at-8028-cmod.c:8.6-8.7: +run_file.at-8181-cmod.c:8.6-8.7: 5 static char *txtOpCode(int opCode); 6 7 /********************************************************* @@ -2630,7 +2653,7 @@ run_file.at-8028-cmod.c:8.6-8.7: 10 >> Error: Unexpected indicator: `T' -run_file.at-8028-cmod.c:11.6-11.7: +run_file.at-8181-cmod.c:11.6-11.7: 8 * TSTFH - External File Handler entry point. 9 *********************************************************/ 10 @@ -2640,7 +2663,7 @@ run_file.at-8028-cmod.c:11.6-11.7: 13 { >> Error: Unexpected indicator: `T' -run_file.at-8028-cmod.c:12.6-12.7: +run_file.at-8181-cmod.c:12.6-12.7: 9 *********************************************************/ 10 11 COB_EXT_EXPORT int @@ -2650,7 +2673,7 @@ run_file.at-8028-cmod.c:12.6-12.7: 14 unsigned int opCode; >> Error: Unexpected indicator: `(' -run_file.at-8028-cmod.c:14.6-14.7: +run_file.at-8181-cmod.c:14.6-14.7: 11 COB_EXT_EXPORT int 12 TSTFH (unsigned char *opCodep, FCD3 *fcd) 13 { @@ -2660,7 +2683,7 @@ run_file.at-8028-cmod.c:14.6-14.7: 16 if (*opCodep == 0xfa) >> Error: Unexpected indicator: `i' -run_file.at-8028-cmod.c:16.6-16.7: +run_file.at-8181-cmod.c:16.6-16.7: 13 { 14 unsigned int opCode; 15 @@ -2670,7 +2693,7 @@ run_file.at-8028-cmod.c:16.6-16.7: 18 else >> Error: Unexpected indicator: `(' -run_file.at-8028-cmod.c:17.6-17.7: +run_file.at-8181-cmod.c:17.6-17.7: 14 unsigned int opCode; 15 16 if (*opCodep == 0xfa) @@ -2680,7 +2703,7 @@ run_file.at-8028-cmod.c:17.6-17.7: 19 opCode = opCodep[1]; >> Error: Unexpected indicator: `o' -run_file.at-8028-cmod.c:18.6-18.7: +run_file.at-8181-cmod.c:18.6-18.7: 15 16 if (*opCodep == 0xfa) 17 opCode = 0xfa00 + opCodep[1]; @@ -2690,7 +2713,7 @@ run_file.at-8028-cmod.c:18.6-18.7: 20 >> Error: Unexpected indicator: `e' -run_file.at-8028-cmod.c:19.6-19.7: +run_file.at-8181-cmod.c:19.6-19.7: 16 if (*opCodep == 0xfa) 17 opCode = 0xfa00 + opCodep[1]; 18 else @@ -2700,7 +2723,7 @@ run_file.at-8028-cmod.c:19.6-19.7: 21 if (fcd->fileOrg == ORG_LINE_SEQ >> Error: Unexpected indicator: `o' -run_file.at-8028-cmod.c:21.6-21.7: +run_file.at-8181-cmod.c:21.6-21.7: 18 else 19 opCode = opCodep[1]; 20 @@ -2710,7 +2733,7 @@ run_file.at-8028-cmod.c:21.6-21.7: 23 || fcd->fileOrg == ORG_INDEXED >> Error: Unexpected indicator: `(' -run_file.at-8028-cmod.c:16.16-21.22: +run_file.at-8181-cmod.c:16.16-21.22: 13 { 14 unsigned int opCode; 15 @@ -2730,7 +2753,7 @@ run_file.at-8028-cmod.c:16.16-21.22: 23 || fcd->fileOrg == ORG_INDEXED >> Error: Unexpected pseudotext -run_file.at-8028-cmod.c:22.20-23.22: +run_file.at-8181-cmod.c:22.20-23.22: 19 opCode = opCodep[1]; 20 21 if (fcd->fileOrg == ORG_LINE_SEQ @@ -2742,7 +2765,7 @@ run_file.at-8028-cmod.c:22.20-23.22: 25 switch (opCode) { >> Error: Unexpected pseudotext -run_file.at-8028-cmod.c:25.6-25.7: +run_file.at-8181-cmod.c:25.6-25.7: 22 || fcd->fileOrg == ORG_SEQ 23 || fcd->fileOrg == ORG_INDEXED 24 || fcd->fileOrg == ORG_RELATIVE) { @@ -2752,7 +2775,7 @@ run_file.at-8028-cmod.c:25.6-25.7: 27 case OP_OPEN_IO: >> Error: Unexpected indicator: `s' -run_file.at-8028-cmod.c:26.6-26.7: +run_file.at-8181-cmod.c:26.6-26.7: 23 || fcd->fileOrg == ORG_INDEXED 24 || fcd->fileOrg == ORG_RELATIVE) { 25 switch (opCode) { @@ -2762,7 +2785,7 @@ run_file.at-8028-cmod.c:26.6-26.7: 28 case OP_OPEN_EXTEND: >> Error: Unexpected indicator: `c' -run_file.at-8028-cmod.c:27.6-27.7: +run_file.at-8181-cmod.c:27.6-27.7: 24 || fcd->fileOrg == ORG_RELATIVE) { 25 switch (opCode) { 26 case OP_OPEN_OUTPUT: @@ -2772,7 +2795,7 @@ run_file.at-8028-cmod.c:27.6-27.7: 29 case OP_OPEN_OUTPUT_NOREWIND: >> Error: Unexpected indicator: `c' -run_file.at-8028-cmod.c:28.6-28.7: +run_file.at-8181-cmod.c:28.6-28.7: 25 switch (opCode) { 26 case OP_OPEN_OUTPUT: 27 case OP_OPEN_IO: @@ -2782,7 +2805,7 @@ run_file.at-8028-cmod.c:28.6-28.7: 30 return EXTFH(opCodep, fcd); >> Error: Unexpected indicator: `c' -run_file.at-8028-cmod.c:29.6-29.7: +run_file.at-8181-cmod.c:29.6-29.7: 26 case OP_OPEN_OUTPUT: 27 case OP_OPEN_IO: 28 case OP_OPEN_EXTEND: @@ -2792,7 +2815,7 @@ run_file.at-8028-cmod.c:29.6-29.7: 31 break; >> Error: Unexpected indicator: `c' -run_file.at-8028-cmod.c:33.6-33.7: +run_file.at-8181-cmod.c:33.6-33.7: 30 return EXTFH(opCodep, fcd); 31 break; 32 @@ -2802,7 +2825,7 @@ run_file.at-8028-cmod.c:33.6-33.7: 35 case OP_OPEN_INPUT_REVERSED: >> Error: Unexpected indicator: `c' -run_file.at-8028-cmod.c:34.6-34.7: +run_file.at-8181-cmod.c:34.6-34.7: 31 break; 32 33 case OP_OPEN_INPUT: @@ -2812,7 +2835,7 @@ run_file.at-8028-cmod.c:34.6-34.7: 36 return EXTFH(opCodep, fcd); >> Error: Unexpected indicator: `c' -run_file.at-8028-cmod.c:35.6-35.7: +run_file.at-8181-cmod.c:35.6-35.7: 32 33 case OP_OPEN_INPUT: 34 case OP_OPEN_INPUT_NOREWIND: @@ -2822,7 +2845,7 @@ run_file.at-8028-cmod.c:35.6-35.7: 37 break; >> Error: Unexpected indicator: `c' -run_file.at-8028-cmod.c:41.6-41.7: +run_file.at-8181-cmod.c:41.6-41.7: 38 39 default: 40 break; @@ -2832,7 +2855,7 @@ run_file.at-8028-cmod.c:41.6-41.7: 43 } >> Error: Unexpected indicator: `}' -run_file.at-8028-cmod.c:45.6-45.7: +run_file.at-8181-cmod.c:45.6-45.7: 42 43 } 44 @@ -2842,7 +2865,7 @@ run_file.at-8028-cmod.c:45.6-45.7: 47 return 0; >> Error: Unexpected indicator: `(' -run_file.at-8028-cmod.c:24.20-45.16: +run_file.at-8181-cmod.c:24.20-45.16: 21 if (fcd->fileOrg == ORG_LINE_SEQ 22 || fcd->fileOrg == ORG_SEQ 23 || fcd->fileOrg == ORG_INDEXED @@ -2894,7 +2917,7 @@ run_file.at-8028-cmod.c:24.20-45.16: 47 return 0; >> Error: Unexpected pseudotext -run_file.at-8028-cmod.c:47.6-47.7: +run_file.at-8181-cmod.c:47.6-47.7: 44 45 if (opCode == OP_CLOSE 46 && (fcd->openMode & OPEN_NOT_OPEN) ) { @@ -2904,7 +2927,7 @@ run_file.at-8028-cmod.c:47.6-47.7: 49 >> Error: Unexpected indicator: `r' -run_file.at-8028-cmod.c:50.6-50.7: +run_file.at-8181-cmod.c:50.6-50.7: 47 return 0; 48 } 49 @@ -2913,8 +2936,8 @@ run_file.at-8028-cmod.c:50.6-50.7: 51 } >> Error: Unexpected indicator: `u' -Considering: import/gnucobol/tests/testsuite.src/run_file.at:8028:0 -run_file.at-8028-prog.cob:26.34-26.42: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:8181:0 +run_file.at-8181-prog.cob:26.34-26.42: 23 ALTERNATE RECORD KEY IS TS-DISK WITH DUPLICATES 24 FILE STATUS IS CUST-STAT . 25 @@ -2924,7 +2947,7 @@ run_file.at-8028-prog.cob:26.34-26.42: 28 ACCESS IS RANDOM RELATIVE KEY IS REC-NUM >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-8028-prog.cob:110.54: +run_file.at-8181-prog.cob:110.54: 107 05 FILLER PIC X(8) VALUE "PRE00000". 108 109 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -2934,7 +2957,7 @@ run_file.at-8028-prog.cob:110.54: 112 >> Hint: Missing -run_file.at-8028-prog.cob:110.55-110.62: +run_file.at-8181-prog.cob:110.55-110.62: 107 05 FILLER PIC X(8) VALUE "PRE00000". 108 109 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -2944,7 +2967,7 @@ run_file.at-8028-prog.cob:110.55-110.62: 112 >> Error: Invalid syntax -run_file.at-8028-prog.cob:131.55: +run_file.at-8181-prog.cob:131.55: 128 05 FILLER PIC X(25) VALUE "PRESTIGE OFFICE FURNITURE". 129 130 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -2954,7 +2977,7 @@ run_file.at-8028-prog.cob:131.55: 133 >> Hint: Missing -run_file.at-8028-prog.cob:131.56-131.63: +run_file.at-8181-prog.cob:131.56-131.63: 128 05 FILLER PIC X(25) VALUE "PRESTIGE OFFICE FURNITURE". 129 130 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -2964,7 +2987,7 @@ run_file.at-8028-prog.cob:131.56-131.63: 133 >> Error: Invalid syntax -run_file.at-8028-prog.cob:152.55: +run_file.at-8181-prog.cob:152.55: 149 05 FILLER PIC X(25) VALUE "114A MAPLE GROVE ". 150 151 02 DATA-ADDRESS-1 REDEFINES DATA-ADDRESS-1-TBL @@ -2974,7 +2997,7 @@ run_file.at-8028-prog.cob:152.55: 154 >> Hint: Missing -run_file.at-8028-prog.cob:152.56-152.63: +run_file.at-8181-prog.cob:152.56-152.63: 149 05 FILLER PIC X(25) VALUE "114A MAPLE GROVE ". 150 151 02 DATA-ADDRESS-1 REDEFINES DATA-ADDRESS-1-TBL @@ -2984,7 +3007,7 @@ run_file.at-8028-prog.cob:152.56-152.63: 154 >> Error: Invalid syntax -run_file.at-8028-prog.cob:173.55: +run_file.at-8181-prog.cob:173.55: 170 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 171 172 02 DATA-ADDRESS-2 REDEFINES DATA-ADDRESS-2-TBL @@ -2994,7 +3017,7 @@ run_file.at-8028-prog.cob:173.55: 175 >> Hint: Missing -run_file.at-8028-prog.cob:173.56-173.63: +run_file.at-8181-prog.cob:173.56-173.63: 170 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 171 172 02 DATA-ADDRESS-2 REDEFINES DATA-ADDRESS-2-TBL @@ -3004,7 +3027,7 @@ run_file.at-8028-prog.cob:173.56-173.63: 175 >> Error: Invalid syntax -run_file.at-8028-prog.cob:194.55: +run_file.at-8181-prog.cob:194.55: 191 05 FILLER PIC X(10) VALUE "N.Y. ". 192 193 02 DATA-ADDRESS-3 REDEFINES DATA-ADDRESS-3-TBL @@ -3014,7 +3037,7 @@ run_file.at-8028-prog.cob:194.55: 196 >> Hint: Missing -run_file.at-8028-prog.cob:194.56-194.63: +run_file.at-8181-prog.cob:194.56-194.63: 191 05 FILLER PIC X(10) VALUE "N.Y. ". 192 193 02 DATA-ADDRESS-3 REDEFINES DATA-ADDRESS-3-TBL @@ -3024,7 +3047,7 @@ run_file.at-8028-prog.cob:194.56-194.63: 196 >> Error: Invalid syntax -run_file.at-8028-prog.cob:215.55: +run_file.at-8181-prog.cob:215.55: 212 05 FILLER PIC 9(10) VALUE 4169898509. 213 214 02 DATA-TELEPHONE REDEFINES DATA-TELEPHONE-TBL @@ -3034,7 +3057,7 @@ run_file.at-8028-prog.cob:215.55: 217 >> Hint: Missing -run_file.at-8028-prog.cob:215.56-215.63: +run_file.at-8181-prog.cob:215.56-215.63: 212 05 FILLER PIC 9(10) VALUE 4169898509. 213 214 02 DATA-TELEPHONE REDEFINES DATA-TELEPHONE-TBL @@ -3044,7 +3067,7 @@ run_file.at-8028-prog.cob:215.56-215.63: 217 >> Error: Invalid syntax -run_file.at-8028-prog.cob:236.55: +run_file.at-8181-prog.cob:236.55: 233 05 FILLER PIC X(20) VALUE "MR. THOMAS JEFFERSON". 234 235 02 DATA-DP-MGR REDEFINES DATA-DP-MGR-TBL @@ -3054,7 +3077,7 @@ run_file.at-8028-prog.cob:236.55: 238 >> Hint: Missing -run_file.at-8028-prog.cob:236.56-236.63: +run_file.at-8181-prog.cob:236.56-236.63: 233 05 FILLER PIC X(20) VALUE "MR. THOMAS JEFFERSON". 234 235 02 DATA-DP-MGR REDEFINES DATA-DP-MGR-TBL @@ -3064,7 +3087,7 @@ run_file.at-8028-prog.cob:236.56-236.63: 238 >> Error: Invalid syntax -run_file.at-8028-prog.cob:257.54: +run_file.at-8181-prog.cob:257.54: 254 05 FILLER PIC X(8) VALUE "UNI-9040". 255 256 02 DATA-MACHINE REDEFINES DATA-MACHINE-TBL @@ -3074,7 +3097,7 @@ run_file.at-8028-prog.cob:257.54: 259 >> Hint: Missing -run_file.at-8028-prog.cob:257.55-257.62: +run_file.at-8181-prog.cob:257.55-257.62: 254 05 FILLER PIC X(8) VALUE "UNI-9040". 255 256 02 DATA-MACHINE REDEFINES DATA-MACHINE-TBL @@ -3084,7 +3107,7 @@ run_file.at-8028-prog.cob:257.55-257.62: 259 >> Error: Invalid syntax -run_file.at-8028-prog.cob:278.61: +run_file.at-8181-prog.cob:278.61: 275 05 FILLER PIC 9(3) COMP-3 VALUE 86. 276 277 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -3094,7 +3117,7 @@ run_file.at-8028-prog.cob:278.61: 280 78 REC-MAX VALUE 10. >> Hint: Missing -run_file.at-8028-prog.cob:278.62-278.69: +run_file.at-8181-prog.cob:278.62-278.69: 275 05 FILLER PIC 9(3) COMP-3 VALUE 86. 276 277 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -3104,8 +3127,8 @@ run_file.at-8028-prog.cob:278.62-278.69: 280 78 REC-MAX VALUE 10. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:8591:0 -run_file.at-8591-prog.cob:9.6-9.17: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:8744:0 +run_file.at-8744-prog.cob:9.6-9.17: 6 ENVIRONMENT DIVISION. 7 CONFIGURATION SECTION. 8 @@ -3115,7 +3138,7 @@ run_file.at-8591-prog.cob:9.6-9.17: 11 FILE-CONTROL. >> Error: Malformed compiler directive -run_file.at-8591-prog.cob:88.54: +run_file.at-8744-prog.cob:88.54: 85 05 FILLER PIC X(8) VALUE "PRE00000". 86 87 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -3125,7 +3148,7 @@ run_file.at-8591-prog.cob:88.54: 90 >> Hint: Missing -run_file.at-8591-prog.cob:88.55-88.62: +run_file.at-8744-prog.cob:88.55-88.62: 85 05 FILLER PIC X(8) VALUE "PRE00000". 86 87 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -3135,7 +3158,7 @@ run_file.at-8591-prog.cob:88.55-88.62: 90 >> Error: Invalid syntax -run_file.at-8591-prog.cob:109.55: +run_file.at-8744-prog.cob:109.55: 106 05 FILLER PIC X(25) VALUE "PRESTIGE OFFICE FURNITURE". 107 108 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -3145,7 +3168,7 @@ run_file.at-8591-prog.cob:109.55: 111 >> Hint: Missing -run_file.at-8591-prog.cob:109.56-109.63: +run_file.at-8744-prog.cob:109.56-109.63: 106 05 FILLER PIC X(25) VALUE "PRESTIGE OFFICE FURNITURE". 107 108 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -3155,7 +3178,7 @@ run_file.at-8591-prog.cob:109.56-109.63: 111 >> Error: Invalid syntax -run_file.at-8591-prog.cob:130.55: +run_file.at-8744-prog.cob:130.55: 127 05 FILLER PIC X(25) VALUE "114A MAPLE GROVE ". 128 129 02 DATA-ADDRESS-1 REDEFINES DATA-ADDRESS-1-TBL @@ -3165,7 +3188,7 @@ run_file.at-8591-prog.cob:130.55: 132 >> Hint: Missing -run_file.at-8591-prog.cob:130.56-130.63: +run_file.at-8744-prog.cob:130.56-130.63: 127 05 FILLER PIC X(25) VALUE "114A MAPLE GROVE ". 128 129 02 DATA-ADDRESS-1 REDEFINES DATA-ADDRESS-1-TBL @@ -3175,7 +3198,7 @@ run_file.at-8591-prog.cob:130.56-130.63: 132 >> Error: Invalid syntax -run_file.at-8591-prog.cob:151.55: +run_file.at-8744-prog.cob:151.55: 148 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 149 150 02 DATA-ADDRESS-2 REDEFINES DATA-ADDRESS-2-TBL @@ -3185,7 +3208,7 @@ run_file.at-8591-prog.cob:151.55: 153 >> Hint: Missing -run_file.at-8591-prog.cob:151.56-151.63: +run_file.at-8744-prog.cob:151.56-151.63: 148 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 149 150 02 DATA-ADDRESS-2 REDEFINES DATA-ADDRESS-2-TBL @@ -3195,7 +3218,7 @@ run_file.at-8591-prog.cob:151.56-151.63: 153 >> Error: Invalid syntax -run_file.at-8591-prog.cob:172.55: +run_file.at-8744-prog.cob:172.55: 169 05 FILLER PIC X(10) VALUE "N.Y. ". 170 171 02 DATA-ADDRESS-3 REDEFINES DATA-ADDRESS-3-TBL @@ -3205,7 +3228,7 @@ run_file.at-8591-prog.cob:172.55: 174 >> Hint: Missing -run_file.at-8591-prog.cob:172.56-172.63: +run_file.at-8744-prog.cob:172.56-172.63: 169 05 FILLER PIC X(10) VALUE "N.Y. ". 170 171 02 DATA-ADDRESS-3 REDEFINES DATA-ADDRESS-3-TBL @@ -3215,7 +3238,7 @@ run_file.at-8591-prog.cob:172.56-172.63: 174 >> Error: Invalid syntax -run_file.at-8591-prog.cob:193.55: +run_file.at-8744-prog.cob:193.55: 190 05 FILLER PIC 9(10) VALUE 4169898509. 191 192 02 DATA-TELEPHONE REDEFINES DATA-TELEPHONE-TBL @@ -3225,7 +3248,7 @@ run_file.at-8591-prog.cob:193.55: 195 >> Hint: Missing -run_file.at-8591-prog.cob:193.56-193.63: +run_file.at-8744-prog.cob:193.56-193.63: 190 05 FILLER PIC 9(10) VALUE 4169898509. 191 192 02 DATA-TELEPHONE REDEFINES DATA-TELEPHONE-TBL @@ -3235,7 +3258,7 @@ run_file.at-8591-prog.cob:193.56-193.63: 195 >> Error: Invalid syntax -run_file.at-8591-prog.cob:214.55: +run_file.at-8744-prog.cob:214.55: 211 05 FILLER PIC X(20) VALUE "MR. THOMAS JEFFERSON". 212 213 02 DATA-DP-MGR REDEFINES DATA-DP-MGR-TBL @@ -3245,7 +3268,7 @@ run_file.at-8591-prog.cob:214.55: 216 >> Hint: Missing -run_file.at-8591-prog.cob:214.56-214.63: +run_file.at-8744-prog.cob:214.56-214.63: 211 05 FILLER PIC X(20) VALUE "MR. THOMAS JEFFERSON". 212 213 02 DATA-DP-MGR REDEFINES DATA-DP-MGR-TBL @@ -3255,7 +3278,7 @@ run_file.at-8591-prog.cob:214.56-214.63: 216 >> Error: Invalid syntax -run_file.at-8591-prog.cob:235.54: +run_file.at-8744-prog.cob:235.54: 232 05 FILLER PIC X(8) VALUE "UNI-9040". 233 234 02 DATA-MACHINE REDEFINES DATA-MACHINE-TBL @@ -3265,7 +3288,7 @@ run_file.at-8591-prog.cob:235.54: 237 >> Hint: Missing -run_file.at-8591-prog.cob:235.55-235.62: +run_file.at-8744-prog.cob:235.55-235.62: 232 05 FILLER PIC X(8) VALUE "UNI-9040". 233 234 02 DATA-MACHINE REDEFINES DATA-MACHINE-TBL @@ -3275,7 +3298,7 @@ run_file.at-8591-prog.cob:235.55-235.62: 237 >> Error: Invalid syntax -run_file.at-8591-prog.cob:256.61: +run_file.at-8744-prog.cob:256.61: 253 05 FILLER PIC 9(3) COMP-3 VALUE 86. 254 255 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -3285,7 +3308,7 @@ run_file.at-8591-prog.cob:256.61: 258 01 WORK-AREA. >> Hint: Missing -run_file.at-8591-prog.cob:256.62-256.69: +run_file.at-8744-prog.cob:256.62-256.69: 253 05 FILLER PIC 9(3) COMP-3 VALUE 86. 254 255 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -3295,7 +3318,7 @@ run_file.at-8591-prog.cob:256.62-256.69: 258 01 WORK-AREA. >> Error: Invalid syntax -run_file.at-8591-prog.cob:270.11-270.29: +run_file.at-8744-prog.cob:270.11-270.29: 267 LINKAGE SECTION. 268 269 01 TSP-FCD. @@ -3307,7 +3330,7 @@ run_file.at-8591-prog.cob:270.11-270.29: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -run_file.at-8591-prog.cob:304.16-304.22: +run_file.at-8744-prog.cob:304.16-304.22: 301 DISPLAY "File assigned is '" 302 TSP-FILENAME (1:FCD-NAME-LENGTH) "'". 303 SET FCD-FILENAME-ADDRESS TO ADDRESS OF OUT-FILE-NAME. @@ -3317,22 +3340,22 @@ run_file.at-8591-prog.cob:304.16-304.22: 306 PERFORM DUMP-FCD. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:8672:0 -run_file.at-8672-reference:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:8825:0 +run_file.at-8825-reference:1.6-1.7: 1 > Other Flags 32. ---- ^ 2 File has 0003 keys. 3 Key def 0112 bytes. >> Error: Unexpected indicator: `F' -run_file.at-8672-reference:1.7-1.11: +run_file.at-8825-reference:1.7-1.11: 1 > Other Flags 32. ---- ^^^^ 2 File has 0003 keys. 3 Key def 0112 bytes. >> Error: Invalid syntax -run_file.at-8672-reference:2.6-2.7: +run_file.at-8825-reference:2.6-2.7: 1 Other Flags 32. 2 > File has 0003 keys. ---- ^ @@ -3340,7 +3363,7 @@ run_file.at-8672-reference:2.6-2.7: 4 File assigned is 'mytstisam' >> Error: Unexpected indicator: `a' -run_file.at-8672-reference:3.6-3.7: +run_file.at-8825-reference:3.6-3.7: 1 Other Flags 32. 2 File has 0003 keys. 3 > Key def 0112 bytes. @@ -3349,7 +3372,7 @@ run_file.at-8672-reference:3.6-3.7: 5 *** Dump FCD before changes >> Error: Unexpected indicator: `f' -run_file.at-8672-reference:4.6-4.7: +run_file.at-8825-reference:4.6-4.7: 1 Other Flags 32. 2 File has 0003 keys. 3 Key def 0112 bytes. @@ -3359,7 +3382,7 @@ run_file.at-8672-reference:4.6-4.7: 6 Key1 has 001 parts, Offset 062 Flags 00 Comp 00 Sparse . >> Error: Unexpected indicator: `s' -run_file.at-8672-reference:5.6-5.7: +run_file.at-8825-reference:5.6-5.7: 2 File has 0003 keys. 3 Key def 0112 bytes. 4 File assigned is 'mytstisam' @@ -3369,7 +3392,7 @@ run_file.at-8672-reference:5.6-5.7: 7 Pos 000000000 Len 000000008 >> Error: Unexpected indicator: `m' -run_file.at-8672-reference:6.6-6.7: +run_file.at-8825-reference:6.6-6.7: 3 Key def 0112 bytes. 4 File assigned is 'mytstisam' 5 *** Dump FCD before changes @@ -3379,7 +3402,7 @@ run_file.at-8672-reference:6.6-6.7: 8 Key2 has 002 parts, Offset 072 Flags 00 Comp 00 Sparse . >> Error: Unexpected indicator: `a' -run_file.at-8672-reference:7.6-7.7: +run_file.at-8825-reference:7.6-7.7: 4 File assigned is 'mytstisam' 5 *** Dump FCD before changes 6 Key1 has 001 parts, Offset 062 Flags 00 Comp 00 Sparse . @@ -3389,7 +3412,7 @@ run_file.at-8672-reference:7.6-7.7: 9 Pos 000000109 Len 000000010 >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:8.6-8.7: +run_file.at-8825-reference:8.6-8.7: 5 *** Dump FCD before changes 6 Key1 has 001 parts, Offset 062 Flags 00 Comp 00 Sparse . 7 Pos 000000000 Len 000000008 @@ -3399,7 +3422,7 @@ run_file.at-8672-reference:8.6-8.7: 10 Pos 000000144 Len 000000008 >> Error: Unexpected indicator: `a' -run_file.at-8672-reference:9.6-9.7: +run_file.at-8825-reference:9.6-9.7: 6 Key1 has 001 parts, Offset 062 Flags 00 Comp 00 Sparse . 7 Pos 000000000 Len 000000008 8 Key2 has 002 parts, Offset 072 Flags 00 Comp 00 Sparse . @@ -3409,7 +3432,7 @@ run_file.at-8672-reference:9.6-9.7: 11 Key3 has 002 parts, Offset 092 Flags 00 Comp 00 Sparse . >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:10.6-10.7: +run_file.at-8825-reference:10.6-10.7: 7 Pos 000000000 Len 000000008 8 Key2 has 002 parts, Offset 072 Flags 00 Comp 00 Sparse . 9 Pos 000000109 Len 000000010 @@ -3419,7 +3442,7 @@ run_file.at-8672-reference:10.6-10.7: 12 Pos 000000156 Len 000000008 >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:11.6-11.7: +run_file.at-8825-reference:11.6-11.7: 8 Key2 has 002 parts, Offset 072 Flags 00 Comp 00 Sparse . 9 Pos 000000109 Len 000000010 10 Pos 000000144 Len 000000008 @@ -3429,7 +3452,7 @@ run_file.at-8672-reference:11.6-11.7: 13 Pos 000000164 Len 000000008 >> Error: Unexpected indicator: `a' -run_file.at-8672-reference:12.6-12.7: +run_file.at-8825-reference:12.6-12.7: 9 Pos 000000109 Len 000000010 10 Pos 000000144 Len 000000008 11 Key3 has 002 parts, Offset 092 Flags 00 Comp 00 Sparse . @@ -3439,7 +3462,7 @@ run_file.at-8672-reference:12.6-12.7: 14 *** Dump FCD after changes >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:13.6-13.7: +run_file.at-8825-reference:13.6-13.7: 10 Pos 000000144 Len 000000008 11 Key3 has 002 parts, Offset 092 Flags 00 Comp 00 Sparse . 12 Pos 000000156 Len 000000008 @@ -3449,7 +3472,7 @@ run_file.at-8672-reference:13.6-13.7: 15 Key1 has 001 parts, Offset 062 Flags 00 Comp 00 Sparse . >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:14.6-14.7: +run_file.at-8825-reference:14.6-14.7: 11 Key3 has 002 parts, Offset 092 Flags 00 Comp 00 Sparse . 12 Pos 000000156 Len 000000008 13 Pos 000000164 Len 000000008 @@ -3459,7 +3482,7 @@ run_file.at-8672-reference:14.6-14.7: 16 Pos 000000000 Len 000000008 >> Error: Unexpected indicator: `m' -run_file.at-8672-reference:15.6-15.7: +run_file.at-8825-reference:15.6-15.7: 12 Pos 000000156 Len 000000008 13 Pos 000000164 Len 000000008 14 *** Dump FCD after changes @@ -3469,7 +3492,7 @@ run_file.at-8672-reference:15.6-15.7: 17 Key2 has 002 parts, Offset 072 Flags 64 Comp 00 Sparse . >> Error: Unexpected indicator: `a' -run_file.at-8672-reference:16.6-16.7: +run_file.at-8825-reference:16.6-16.7: 13 Pos 000000164 Len 000000008 14 *** Dump FCD after changes 15 Key1 has 001 parts, Offset 062 Flags 00 Comp 00 Sparse . @@ -3479,7 +3502,7 @@ run_file.at-8672-reference:16.6-16.7: 18 Pos 000000109 Len 000000010 >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:17.6-17.7: +run_file.at-8825-reference:17.6-17.7: 14 *** Dump FCD after changes 15 Key1 has 001 parts, Offset 062 Flags 00 Comp 00 Sparse . 16 Pos 000000000 Len 000000008 @@ -3489,7 +3512,7 @@ run_file.at-8672-reference:17.6-17.7: 19 Pos 000000144 Len 000000008 >> Error: Unexpected indicator: `a' -run_file.at-8672-reference:18.6-18.7: +run_file.at-8825-reference:18.6-18.7: 15 Key1 has 001 parts, Offset 062 Flags 00 Comp 00 Sparse . 16 Pos 000000000 Len 000000008 17 Key2 has 002 parts, Offset 072 Flags 64 Comp 00 Sparse . @@ -3499,7 +3522,7 @@ run_file.at-8672-reference:18.6-18.7: 20 Key3 has 002 parts, Offset 092 Flags 66 Comp 00 Sparse *. >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:19.6-19.7: +run_file.at-8825-reference:19.6-19.7: 16 Pos 000000000 Len 000000008 17 Key2 has 002 parts, Offset 072 Flags 64 Comp 00 Sparse . 18 Pos 000000109 Len 000000010 @@ -3509,7 +3532,7 @@ run_file.at-8672-reference:19.6-19.7: 21 Pos 000000156 Len 000000008 >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:20.6-20.7: +run_file.at-8825-reference:20.6-20.7: 17 Key2 has 002 parts, Offset 072 Flags 64 Comp 00 Sparse . 18 Pos 000000109 Len 000000010 19 Pos 000000144 Len 000000008 @@ -3519,7 +3542,7 @@ run_file.at-8672-reference:20.6-20.7: 22 Pos 000000164 Len 000000008 >> Error: Unexpected indicator: `a' -run_file.at-8672-reference:21.6-21.7: +run_file.at-8825-reference:21.6-21.7: 18 Pos 000000109 Len 000000010 19 Pos 000000144 Len 000000008 20 Key3 has 002 parts, Offset 092 Flags 66 Comp 00 Sparse *. @@ -3529,7 +3552,7 @@ run_file.at-8672-reference:21.6-21.7: 23 Loading sample file 'myextisam' >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:22.6-22.7: +run_file.at-8825-reference:22.6-22.7: 19 Pos 000000144 Len 000000008 20 Key3 has 002 parts, Offset 092 Flags 66 Comp 00 Sparse *. 21 Pos 000000156 Len 000000008 @@ -3539,7 +3562,7 @@ run_file.at-8672-reference:22.6-22.7: 24 Sample data file load complete. >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:23.6-23.7: +run_file.at-8825-reference:23.6-23.7: 20 Key3 has 002 parts, Offset 092 Flags 66 Comp 00 Sparse *. 21 Pos 000000156 Len 000000008 22 Pos 000000164 Len 000000008 @@ -3549,7 +3572,7 @@ run_file.at-8672-reference:23.6-23.7: 25 List sample file 'myextisam' >> Error: Unexpected indicator: `g' -run_file.at-8672-reference:25.6-25.7: +run_file.at-8825-reference:25.6-25.7: 22 Pos 000000164 Len 000000008 23 Loading sample file 'myextisam' 24 Sample data file load complete. @@ -3559,7 +3582,7 @@ run_file.at-8672-reference:25.6-25.7: 27 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . >> Error: Unexpected indicator: `a' -run_file.at-8672-reference:26.6-26.7: +run_file.at-8825-reference:26.6-26.7: 23 Loading sample file 'myextisam' 24 Sample data file load complete. 25 List sample file 'myextisam' @@ -3569,7 +3592,7 @@ run_file.at-8672-reference:26.6-26.7: 28 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. >> Error: Unexpected indicator: `L' -run_file.at-8672-reference:27.6-27.7: +run_file.at-8825-reference:27.6-27.7: 24 Sample data file load complete. 25 List sample file 'myextisam' 26 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . @@ -3579,7 +3602,7 @@ run_file.at-8672-reference:27.6-27.7: 29 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:28.6-28.7: +run_file.at-8825-reference:28.6-28.7: 25 List sample file 'myextisam' 26 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . 27 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . @@ -3589,7 +3612,7 @@ run_file.at-8672-reference:28.6-28.7: 30 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:29.6-29.7: +run_file.at-8825-reference:29.6-29.7: 26 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . 27 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . 28 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. @@ -3599,7 +3622,7 @@ run_file.at-8672-reference:29.6-29.7: 31 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:30.6-30.7: +run_file.at-8825-reference:30.6-30.7: 27 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . 28 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. 29 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. @@ -3609,7 +3632,7 @@ run_file.at-8672-reference:30.6-30.7: 32 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:31.6-31.7: +run_file.at-8825-reference:31.6-31.7: 28 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. 29 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. 30 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . @@ -3619,7 +3642,7 @@ run_file.at-8672-reference:31.6-31.7: 33 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. >> Error: Unexpected indicator: `A' -run_file.at-8672-reference:32.6-32.7: +run_file.at-8825-reference:32.6-32.7: 29 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. 30 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . 31 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . @@ -3629,7 +3652,7 @@ run_file.at-8672-reference:32.6-32.7: 34 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . >> Error: Unexpected indicator: `I' -run_file.at-8672-reference:33.6-33.7: +run_file.at-8825-reference:33.6-33.7: 30 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . 31 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . 32 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . @@ -3639,7 +3662,7 @@ run_file.at-8672-reference:33.6-33.7: 35 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . >> Error: Unexpected indicator: `&' -run_file.at-8672-reference:34.6-34.7: +run_file.at-8825-reference:34.6-34.7: 31 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . 32 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . 33 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. @@ -3649,7 +3672,7 @@ run_file.at-8672-reference:34.6-34.7: 36 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . >> Error: Unexpected indicator: `N' -run_file.at-8672-reference:35.6-35.7: +run_file.at-8825-reference:35.6-35.7: 32 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . 33 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. 34 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . @@ -3659,7 +3682,7 @@ run_file.at-8672-reference:35.6-35.7: 37 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:36.6-36.7: +run_file.at-8825-reference:36.6-36.7: 33 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. 34 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . 35 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . @@ -3669,7 +3692,7 @@ run_file.at-8672-reference:36.6-36.7: 38 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:37.6-37.7: +run_file.at-8825-reference:37.6-37.7: 34 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . 35 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . 36 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . @@ -3679,7 +3702,7 @@ run_file.at-8672-reference:37.6-37.7: 39 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:38.6-38.7: +run_file.at-8825-reference:38.6-38.7: 35 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . 36 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . 37 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. @@ -3689,7 +3712,7 @@ run_file.at-8672-reference:38.6-38.7: 40 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:39.6-39.7: +run_file.at-8825-reference:39.6-39.7: 36 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . 37 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. 38 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . @@ -3699,7 +3722,7 @@ run_file.at-8672-reference:39.6-39.7: 41 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:40.6-40.7: +run_file.at-8825-reference:40.6-40.7: 37 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. 38 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . 39 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. @@ -3709,7 +3732,7 @@ run_file.at-8672-reference:40.6-40.7: 42 Hit End of File after 16 >> Error: Unexpected indicator: `L' -run_file.at-8672-reference:41.6-41.7: +run_file.at-8825-reference:41.6-41.7: 38 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . 39 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. 40 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . @@ -3719,7 +3742,7 @@ run_file.at-8672-reference:41.6-41.7: 43 LIST SAMPLE FILE DESCENDING >> Error: Unexpected indicator: `R' -run_file.at-8672-reference:43.6-43.7: +run_file.at-8825-reference:43.6-43.7: 40 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . 41 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . 42 Hit End of File after 16 @@ -3729,7 +3752,7 @@ run_file.at-8672-reference:43.6-43.7: 45 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . >> Error: Unexpected indicator: `A' -run_file.at-8672-reference:44.6-44.7: +run_file.at-8825-reference:44.6-44.7: 41 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . 42 Hit End of File after 16 43 LIST SAMPLE FILE DESCENDING @@ -3739,7 +3762,7 @@ run_file.at-8672-reference:44.6-44.7: 46 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. >> Error: Unexpected indicator: `R' -run_file.at-8672-reference:45.6-45.7: +run_file.at-8825-reference:45.6-45.7: 42 Hit End of File after 16 43 LIST SAMPLE FILE DESCENDING 44 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . @@ -3749,7 +3772,7 @@ run_file.at-8672-reference:45.6-45.7: 47 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . >> Error: Unexpected indicator: `L' -run_file.at-8672-reference:46.6-46.7: +run_file.at-8825-reference:46.6-46.7: 43 LIST SAMPLE FILE DESCENDING 44 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . 45 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . @@ -3759,7 +3782,7 @@ run_file.at-8672-reference:46.6-46.7: 48 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:47.6-47.7: +run_file.at-8825-reference:47.6-47.7: 44 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . 45 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . 46 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. @@ -3769,7 +3792,7 @@ run_file.at-8672-reference:47.6-47.7: 49 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:48.6-48.7: +run_file.at-8825-reference:48.6-48.7: 45 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . 46 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. 47 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . @@ -3779,7 +3802,7 @@ run_file.at-8672-reference:48.6-48.7: 50 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:49.6-49.7: +run_file.at-8825-reference:49.6-49.7: 46 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. 47 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . 48 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. @@ -3789,7 +3812,7 @@ run_file.at-8672-reference:49.6-49.7: 51 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:50.6-50.7: +run_file.at-8825-reference:50.6-50.7: 47 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . 48 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. 49 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . @@ -3799,7 +3822,7 @@ run_file.at-8672-reference:50.6-50.7: 52 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:51.6-51.7: +run_file.at-8825-reference:51.6-51.7: 48 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. 49 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . 50 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . @@ -3809,7 +3832,7 @@ run_file.at-8672-reference:51.6-51.7: 53 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . >> Error: Unexpected indicator: `N' -run_file.at-8672-reference:52.6-52.7: +run_file.at-8825-reference:52.6-52.7: 49 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . 50 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . 51 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . @@ -3819,7 +3842,7 @@ run_file.at-8672-reference:52.6-52.7: 54 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . >> Error: Unexpected indicator: `&' -run_file.at-8672-reference:53.6-53.7: +run_file.at-8825-reference:53.6-53.7: 50 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . 51 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . 52 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. @@ -3829,7 +3852,7 @@ run_file.at-8672-reference:53.6-53.7: 55 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . >> Error: Unexpected indicator: `I' -run_file.at-8672-reference:54.6-54.7: +run_file.at-8825-reference:54.6-54.7: 51 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . 52 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. 53 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . @@ -3839,7 +3862,7 @@ run_file.at-8672-reference:54.6-54.7: 56 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. >> Error: Unexpected indicator: `A' -run_file.at-8672-reference:55.6-55.7: +run_file.at-8825-reference:55.6-55.7: 52 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. 53 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . 54 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . @@ -3849,7 +3872,7 @@ run_file.at-8672-reference:55.6-55.7: 57 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:56.6-56.7: +run_file.at-8825-reference:56.6-56.7: 53 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . 54 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . 55 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . @@ -3859,7 +3882,7 @@ run_file.at-8672-reference:56.6-56.7: 58 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . >> Error: Unexpected indicator: `P' -run_file.at-8672-reference:57.6-57.7: +run_file.at-8825-reference:57.6-57.7: 54 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . 55 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . 56 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. @@ -3869,7 +3892,7 @@ run_file.at-8672-reference:57.6-57.7: 59 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:58.6-58.7: +run_file.at-8825-reference:58.6-58.7: 55 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . 56 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. 57 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. @@ -3879,7 +3902,7 @@ run_file.at-8672-reference:58.6-58.7: 60 Hit End of File after 16 >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:59.6-59.7: +run_file.at-8825-reference:59.6-59.7: 56 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. 57 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. 58 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . @@ -3889,7 +3912,7 @@ run_file.at-8672-reference:59.6-59.7: 61 LIST SAMPLE FILE BY KEY3 >> Error: Unexpected indicator: `L' -run_file.at-8672-reference:61.6-61.7: +run_file.at-8825-reference:61.6-61.7: 58 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . 59 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . 60 Hit End of File after 16 @@ -3899,7 +3922,7 @@ run_file.at-8672-reference:61.6-61.7: 63 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . >> Error: Unexpected indicator: `A' -run_file.at-8672-reference:62.6-62.7: +run_file.at-8825-reference:62.6-62.7: 59 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . 60 Hit End of File after 16 61 LIST SAMPLE FILE BY KEY3 @@ -3909,7 +3932,7 @@ run_file.at-8672-reference:62.6-62.7: 64 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . >> Error: Unexpected indicator: `L' -run_file.at-8672-reference:63.6-63.7: +run_file.at-8825-reference:63.6-63.7: 60 Hit End of File after 16 61 LIST SAMPLE FILE BY KEY3 62 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . @@ -3919,7 +3942,7 @@ run_file.at-8672-reference:63.6-63.7: 65 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:64.6-64.7: +run_file.at-8825-reference:64.6-64.7: 61 LIST SAMPLE FILE BY KEY3 62 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . 63 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . @@ -3929,7 +3952,7 @@ run_file.at-8672-reference:64.6-64.7: 66 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . >> Error: Unexpected indicator: `A' -run_file.at-8672-reference:65.6-65.7: +run_file.at-8825-reference:65.6-65.7: 62 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=2417 . 63 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . 64 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . @@ -3939,7 +3962,7 @@ run_file.at-8672-reference:65.6-65.7: 67 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . >> Error: Unexpected indicator: `I' -run_file.at-8672-reference:66.6-66.7: +run_file.at-8825-reference:66.6-66.7: 63 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=2417 . 64 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . 65 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . @@ -3949,7 +3972,7 @@ run_file.at-8672-reference:66.6-66.7: 68 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . >> Error: Unexpected indicator: `N' -run_file.at-8672-reference:67.6-67.7: +run_file.at-8825-reference:67.6-67.7: 64 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . 65 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . 66 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . @@ -3959,7 +3982,7 @@ run_file.at-8672-reference:67.6-67.7: 69 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:68.6-68.7: +run_file.at-8825-reference:68.6-68.7: 65 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . 66 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . 67 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . @@ -3969,7 +3992,7 @@ run_file.at-8672-reference:68.6-68.7: 70 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:69.6-69.7: +run_file.at-8825-reference:69.6-69.7: 66 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . 67 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . 68 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . @@ -3979,7 +4002,7 @@ run_file.at-8672-reference:69.6-69.7: 71 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . >> Error: Unexpected indicator: `E' -run_file.at-8672-reference:70.6-70.7: +run_file.at-8825-reference:70.6-70.7: 67 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . 68 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . 69 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . @@ -3989,7 +4012,7 @@ run_file.at-8672-reference:70.6-70.7: 72 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . >> Error: Unexpected indicator: `O' -run_file.at-8672-reference:71.6-71.7: +run_file.at-8825-reference:71.6-71.7: 68 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . 69 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . 70 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . @@ -3999,7 +4022,7 @@ run_file.at-8672-reference:71.6-71.7: 73 Hit End of File after 11 >> Error: Unexpected indicator: `L' -run_file.at-8672-reference:72.6-72.7: +run_file.at-8825-reference:72.6-72.7: 69 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . 70 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . 71 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . @@ -4008,8 +4031,8 @@ run_file.at-8672-reference:72.6-72.7: 73 Hit End of File after 11 >> Error: Unexpected indicator: `R' -Considering: import/gnucobol/tests/testsuite.src/run_file.at:9007:0 -run_file.at-9007-cmod.c:5.7-5.11: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:9162:0 +run_file.at-9162-cmod.c:5.7-5.11: 2 #include 3 #include 4 @@ -4019,7 +4042,7 @@ run_file.at-9007-cmod.c:5.7-5.11: 7 static int >> Error: Invalid syntax -run_file.at-9007-cmod.c:8.6-8.7: +run_file.at-9162-cmod.c:8.6-8.7: 5 static char *txtOpCode(int opCode); 6 7 static int @@ -4029,7 +4052,7 @@ run_file.at-9007-cmod.c:8.6-8.7: 10 FCD3 *fcd, >> Error: Unexpected indicator: `F' -run_file.at-9007-cmod.c:9.6-9.7: +run_file.at-9162-cmod.c:9.6-9.7: 6 7 static int 8 doOpenFile( @@ -4039,7 +4062,7 @@ run_file.at-9007-cmod.c:9.6-9.7: 11 char *opmsg) >> Error: Unexpected indicator: `i' -run_file.at-9007-cmod.c:10.6-10.7: +run_file.at-9162-cmod.c:10.6-10.7: 7 static int 8 doOpenFile( 9 unsigned char *opCodep, @@ -4049,7 +4072,7 @@ run_file.at-9007-cmod.c:10.6-10.7: 12 { >> Error: Unexpected indicator: `3' -run_file.at-9007-cmod.c:11.6-11.7: +run_file.at-9162-cmod.c:11.6-11.7: 8 doOpenFile( 9 unsigned char *opCodep, 10 FCD3 *fcd, @@ -4059,7 +4082,7 @@ run_file.at-9007-cmod.c:11.6-11.7: 13 int sts; >> Error: Unexpected indicator: `r' -run_file.at-9007-cmod.c:16.6-16.7: +run_file.at-9162-cmod.c:16.6-16.7: 13 int sts; 14 15 sts = EXTFH( opCodep, fcd ); @@ -4069,879 +4092,899 @@ run_file.at-9007-cmod.c:16.6-16.7: 18 (fcd->openMode & OPEN_NOT_OPEN) ? "Closed" : "Open"); >> Error: Unexpected indicator: `n' -run_file.at-9007-cmod.c:19.6-19.7: +run_file.at-9162-cmod.c:19.6-19.7: 16 printf("EXFTH did %s; Status=%c%c; File now %s\n", 17 opmsg, fcd->fileStatus[0], fcd->fileStatus[1], 18 (fcd->openMode & OPEN_NOT_OPEN) ? "Closed" : "Open"); - 19 > return sts; + 19 > fflush(stdout); ---- ^ - 20 } - 21 + 20 return sts; + 21 } >> Error: Unexpected indicator: `u' -run_file.at-9007-cmod.c:23.6-23.7: - 20 } - 21 - 22 /********************************************************* - 23 > * TSTFH - External File Handler entry point. +run_file.at-9162-cmod.c:20.6-20.7: + 17 opmsg, fcd->fileStatus[0], fcd->fileStatus[1], + 18 (fcd->openMode & OPEN_NOT_OPEN) ? "Closed" : "Open"); + 19 fflush(stdout); + 20 > return sts; ---- ^ - 24 *********************************************************/ - 25 + 21 } + 22 +>> Error: Unexpected indicator: `u' + +run_file.at-9162-cmod.c:24.6-24.7: + 21 } + 22 + 23 /********************************************************* + 24 > * TSTFH - External File Handler entry point. +---- ^ + 25 *********************************************************/ + 26 >> Error: Unexpected indicator: `T' -run_file.at-9007-cmod.c:26.6-26.7: - 23 * TSTFH - External File Handler entry point. - 24 *********************************************************/ - 25 - 26 > COB_EXT_EXPORT int +run_file.at-9162-cmod.c:27.6-27.7: + 24 * TSTFH - External File Handler entry point. + 25 *********************************************************/ + 26 + 27 > COB_EXT_EXPORT int ---- ^ - 27 TSTFH (unsigned char *opCodep, FCD3 *fcd) - 28 { + 28 TSTFH (unsigned char *opCodep, FCD3 *fcd) + 29 { >> Error: Unexpected indicator: `T' -run_file.at-9007-cmod.c:27.6-27.7: - 24 *********************************************************/ - 25 - 26 COB_EXT_EXPORT int - 27 > TSTFH (unsigned char *opCodep, FCD3 *fcd) +run_file.at-9162-cmod.c:28.6-28.7: + 25 *********************************************************/ + 26 + 27 COB_EXT_EXPORT int + 28 > TSTFH (unsigned char *opCodep, FCD3 *fcd) ---- ^ - 28 { - 29 unsigned int opCode; + 29 { + 30 unsigned int opCode; >> Error: Unexpected indicator: `(' -run_file.at-9007-cmod.c:29.6-29.7: - 26 COB_EXT_EXPORT int - 27 TSTFH (unsigned char *opCodep, FCD3 *fcd) - 28 { - 29 > unsigned int opCode; +run_file.at-9162-cmod.c:30.6-30.7: + 27 COB_EXT_EXPORT int + 28 TSTFH (unsigned char *opCodep, FCD3 *fcd) + 29 { + 30 > unsigned int opCode; ---- ^ - 30 int sts; - 31 + 31 int sts; + 32 >> Error: Unexpected indicator: `i' -run_file.at-9007-cmod.c:32.6-32.7: - 29 unsigned int opCode; - 30 int sts; - 31 - 32 > if (*opCodep == 0xfa) +run_file.at-9162-cmod.c:33.6-33.7: + 30 unsigned int opCode; + 31 int sts; + 32 + 33 > if (*opCodep == 0xfa) ---- ^ - 33 opCode = 0xfa00 + opCodep[1]; - 34 else + 34 opCode = 0xfa00 + opCodep[1]; + 35 else >> Error: Unexpected indicator: `(' -run_file.at-9007-cmod.c:33.6-33.7: - 30 int sts; - 31 - 32 if (*opCodep == 0xfa) - 33 > opCode = 0xfa00 + opCodep[1]; +run_file.at-9162-cmod.c:34.6-34.7: + 31 int sts; + 32 + 33 if (*opCodep == 0xfa) + 34 > opCode = 0xfa00 + opCodep[1]; ---- ^ - 34 else - 35 opCode = opCodep[1]; + 35 else + 36 opCode = opCodep[1]; >> Error: Unexpected indicator: `o' -run_file.at-9007-cmod.c:34.6-34.7: - 31 - 32 if (*opCodep == 0xfa) - 33 opCode = 0xfa00 + opCodep[1]; - 34 > else +run_file.at-9162-cmod.c:35.6-35.7: + 32 + 33 if (*opCodep == 0xfa) + 34 opCode = 0xfa00 + opCodep[1]; + 35 > else ---- ^ - 35 opCode = opCodep[1]; - 36 + 36 opCode = opCodep[1]; + 37 >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:35.6-35.7: - 32 if (*opCodep == 0xfa) - 33 opCode = 0xfa00 + opCodep[1]; - 34 else - 35 > opCode = opCodep[1]; +run_file.at-9162-cmod.c:36.6-36.7: + 33 if (*opCodep == 0xfa) + 34 opCode = 0xfa00 + opCodep[1]; + 35 else + 36 > opCode = opCodep[1]; ---- ^ - 36 - 37 if (fcd->fileOrg == ORG_LINE_SEQ + 37 + 38 if (fcd->fileOrg == ORG_LINE_SEQ >> Error: Unexpected indicator: `o' -run_file.at-9007-cmod.c:37.6-37.7: - 34 else - 35 opCode = opCodep[1]; - 36 - 37 > if (fcd->fileOrg == ORG_LINE_SEQ +run_file.at-9162-cmod.c:38.6-38.7: + 35 else + 36 opCode = opCodep[1]; + 37 + 38 > if (fcd->fileOrg == ORG_LINE_SEQ ---- ^ - 38 || fcd->fileOrg == ORG_SEQ - 39 || fcd->fileOrg == ORG_INDEXED + 39 || fcd->fileOrg == ORG_SEQ + 40 || fcd->fileOrg == ORG_INDEXED >> Error: Unexpected indicator: `(' -run_file.at-9007-cmod.c:32.16-37.22: - 29 unsigned int opCode; - 30 int sts; - 31 - 32 > if (*opCodep == 0xfa) +run_file.at-9162-cmod.c:33.16-38.22: + 30 unsigned int opCode; + 31 int sts; + 32 + 33 > if (*opCodep == 0xfa) ---- ^^^^^^^^ - 33 > opCode = 0xfa00 + opCodep[1]; + 34 > opCode = 0xfa00 + opCodep[1]; ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 34 > else + 35 > else ---- ^^^^^^^^ - 35 > opCode = opCodep[1]; + 36 > opCode = opCodep[1]; ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 36 > + 37 > ---- ^ - 37 > if (fcd->fileOrg == ORG_LINE_SEQ + 38 > if (fcd->fileOrg == ORG_LINE_SEQ ---- ^^^^^^^^^^^^^^^^^^^^^^^ - 38 || fcd->fileOrg == ORG_SEQ - 39 || fcd->fileOrg == ORG_INDEXED + 39 || fcd->fileOrg == ORG_SEQ + 40 || fcd->fileOrg == ORG_INDEXED >> Error: Unexpected pseudotext -run_file.at-9007-cmod.c:38.20-39.22: - 35 opCode = opCodep[1]; - 36 - 37 if (fcd->fileOrg == ORG_LINE_SEQ - 38 > || fcd->fileOrg == ORG_SEQ +run_file.at-9162-cmod.c:39.20-40.22: + 36 opCode = opCodep[1]; + 37 + 38 if (fcd->fileOrg == ORG_LINE_SEQ + 39 > || fcd->fileOrg == ORG_SEQ ---- ^^^^^^^^^^ - 39 > || fcd->fileOrg == ORG_INDEXED + 40 > || fcd->fileOrg == ORG_INDEXED ---- ^^^^^^^^^^^^^^^^^^^^^^^ - 40 || fcd->fileOrg == ORG_RELATIVE) { - 41 switch (opCode) { + 41 || fcd->fileOrg == ORG_RELATIVE) { + 42 switch (opCode) { >> Error: Unexpected pseudotext -run_file.at-9007-cmod.c:41.6-41.7: - 38 || fcd->fileOrg == ORG_SEQ - 39 || fcd->fileOrg == ORG_INDEXED - 40 || fcd->fileOrg == ORG_RELATIVE) { - 41 > switch (opCode) { +run_file.at-9162-cmod.c:42.6-42.7: + 39 || fcd->fileOrg == ORG_SEQ + 40 || fcd->fileOrg == ORG_INDEXED + 41 || fcd->fileOrg == ORG_RELATIVE) { + 42 > switch (opCode) { ---- ^ - 42 case OP_OPEN_OUTPUT: - 43 case OP_OPEN_IO: + 43 case OP_OPEN_OUTPUT: + 44 case OP_OPEN_IO: >> Error: Unexpected indicator: `s' -run_file.at-9007-cmod.c:42.6-42.7: - 39 || fcd->fileOrg == ORG_INDEXED - 40 || fcd->fileOrg == ORG_RELATIVE) { - 41 switch (opCode) { - 42 > case OP_OPEN_OUTPUT: +run_file.at-9162-cmod.c:43.6-43.7: + 40 || fcd->fileOrg == ORG_INDEXED + 41 || fcd->fileOrg == ORG_RELATIVE) { + 42 switch (opCode) { + 43 > case OP_OPEN_OUTPUT: ---- ^ - 43 case OP_OPEN_IO: - 44 case OP_OPEN_EXTEND: + 44 case OP_OPEN_IO: + 45 case OP_OPEN_EXTEND: >> Error: Unexpected indicator: `c' -run_file.at-9007-cmod.c:43.6-43.7: - 40 || fcd->fileOrg == ORG_RELATIVE) { - 41 switch (opCode) { - 42 case OP_OPEN_OUTPUT: - 43 > case OP_OPEN_IO: +run_file.at-9162-cmod.c:44.6-44.7: + 41 || fcd->fileOrg == ORG_RELATIVE) { + 42 switch (opCode) { + 43 case OP_OPEN_OUTPUT: + 44 > case OP_OPEN_IO: ---- ^ - 44 case OP_OPEN_EXTEND: - 45 case OP_OPEN_OUTPUT_NOREWIND: + 45 case OP_OPEN_EXTEND: + 46 case OP_OPEN_OUTPUT_NOREWIND: >> Error: Unexpected indicator: `c' -run_file.at-9007-cmod.c:44.6-44.7: - 41 switch (opCode) { - 42 case OP_OPEN_OUTPUT: - 43 case OP_OPEN_IO: - 44 > case OP_OPEN_EXTEND: +run_file.at-9162-cmod.c:45.6-45.7: + 42 switch (opCode) { + 43 case OP_OPEN_OUTPUT: + 44 case OP_OPEN_IO: + 45 > case OP_OPEN_EXTEND: ---- ^ - 45 case OP_OPEN_OUTPUT_NOREWIND: - 46 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 46 case OP_OPEN_OUTPUT_NOREWIND: + 47 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); >> Error: Unexpected indicator: `c' -run_file.at-9007-cmod.c:45.6-45.7: - 42 case OP_OPEN_OUTPUT: - 43 case OP_OPEN_IO: - 44 case OP_OPEN_EXTEND: - 45 > case OP_OPEN_OUTPUT_NOREWIND: +run_file.at-9162-cmod.c:46.6-46.7: + 43 case OP_OPEN_OUTPUT: + 44 case OP_OPEN_IO: + 45 case OP_OPEN_EXTEND: + 46 > case OP_OPEN_OUTPUT_NOREWIND: ---- ^ - 46 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); - 47 break; + 47 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 48 break; >> Error: Unexpected indicator: `c' -run_file.at-9007-cmod.c:49.6-49.7: - 46 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); - 47 break; - 48 - 49 > case OP_OPEN_INPUT: +run_file.at-9162-cmod.c:50.6-50.7: + 47 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 48 break; + 49 + 50 > case OP_OPEN_INPUT: ---- ^ - 50 case OP_OPEN_INPUT_NOREWIND: - 51 case OP_OPEN_INPUT_REVERSED: + 51 case OP_OPEN_INPUT_NOREWIND: + 52 case OP_OPEN_INPUT_REVERSED: >> Error: Unexpected indicator: `c' -run_file.at-9007-cmod.c:50.6-50.7: - 47 break; - 48 - 49 case OP_OPEN_INPUT: - 50 > case OP_OPEN_INPUT_NOREWIND: +run_file.at-9162-cmod.c:51.6-51.7: + 48 break; + 49 + 50 case OP_OPEN_INPUT: + 51 > case OP_OPEN_INPUT_NOREWIND: ---- ^ - 51 case OP_OPEN_INPUT_REVERSED: - 52 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 52 case OP_OPEN_INPUT_REVERSED: + 53 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); >> Error: Unexpected indicator: `c' -run_file.at-9007-cmod.c:51.6-51.7: - 48 - 49 case OP_OPEN_INPUT: - 50 case OP_OPEN_INPUT_NOREWIND: - 51 > case OP_OPEN_INPUT_REVERSED: +run_file.at-9162-cmod.c:52.6-52.7: + 49 + 50 case OP_OPEN_INPUT: + 51 case OP_OPEN_INPUT_NOREWIND: + 52 > case OP_OPEN_INPUT_REVERSED: ---- ^ - 52 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); - 53 break; + 53 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 54 break; >> Error: Unexpected indicator: `c' -run_file.at-9007-cmod.c:55.6-55.7: - 52 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); - 53 break; - 54 - 55 > case OP_CLOSE: +run_file.at-9162-cmod.c:56.6-56.7: + 53 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 54 break; + 55 + 56 > case OP_CLOSE: ---- ^ - 56 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); - 57 break; + 57 return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 58 break; >> Error: Unexpected indicator: `c' -run_file.at-9007-cmod.c:61.6-61.7: - 58 - 59 default: - 60 break; - 61 > } +run_file.at-9162-cmod.c:62.6-62.7: + 59 + 60 default: + 61 break; + 62 > } ---- ^ - 62 - 63 } + 63 + 64 } >> Error: Unexpected indicator: `}' -run_file.at-9007-cmod.c:65.6-65.7: - 62 - 63 } - 64 - 65 > if (opCode == OP_CLOSE +run_file.at-9162-cmod.c:66.6-66.7: + 63 + 64 } + 65 + 66 > if (opCode == OP_CLOSE ---- ^ - 66 && (fcd->openMode & OPEN_NOT_OPEN) ) { - 67 return 0; + 67 && (fcd->openMode & OPEN_NOT_OPEN) ) { + 68 return 0; >> Error: Unexpected indicator: `(' -run_file.at-9007-cmod.c:40.20-65.16: - 37 if (fcd->fileOrg == ORG_LINE_SEQ - 38 || fcd->fileOrg == ORG_SEQ - 39 || fcd->fileOrg == ORG_INDEXED - 40 > || fcd->fileOrg == ORG_RELATIVE) { +run_file.at-9162-cmod.c:41.20-66.16: + 38 if (fcd->fileOrg == ORG_LINE_SEQ + 39 || fcd->fileOrg == ORG_SEQ + 40 || fcd->fileOrg == ORG_INDEXED + 41 > || fcd->fileOrg == ORG_RELATIVE) { ---- ^^^^^^^^^^^^^^^^^^ - 41 > switch (opCode) { + 42 > switch (opCode) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^ - 42 > case OP_OPEN_OUTPUT: + 43 > case OP_OPEN_OUTPUT: ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 43 > case OP_OPEN_IO: + 44 > case OP_OPEN_IO: ---- ^^^^^^^^^^^^^^^^^^^^^^^ - 44 > case OP_OPEN_EXTEND: + 45 > case OP_OPEN_EXTEND: ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 45 > case OP_OPEN_OUTPUT_NOREWIND: + 46 > case OP_OPEN_OUTPUT_NOREWIND: ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 46 > return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 47 > return doOpenFile( opCodep, fcd, txtOpCode(opCode)); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 47 > break; + 48 > break; ---- ^^^^^^^^^^^^^^^^ - 48 > + 49 > ---- ^ - 49 > case OP_OPEN_INPUT: + 50 > case OP_OPEN_INPUT: ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^ - 50 > case OP_OPEN_INPUT_NOREWIND: + 51 > case OP_OPEN_INPUT_NOREWIND: ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 51 > case OP_OPEN_INPUT_REVERSED: + 52 > case OP_OPEN_INPUT_REVERSED: ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 52 > return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 53 > return doOpenFile( opCodep, fcd, txtOpCode(opCode)); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 53 > break; + 54 > break; ---- ^^^^^^^^^^^^^^^^ - 54 > + 55 > ---- ^ - 55 > case OP_CLOSE: + 56 > case OP_CLOSE: ---- ^^^^^^^^^^^^^^^^^^^^^ - 56 > return doOpenFile( opCodep, fcd, txtOpCode(opCode)); + 57 > return doOpenFile( opCodep, fcd, txtOpCode(opCode)); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 57 > break; + 58 > break; ---- ^^^^^^^^^^^^^^^^ - 58 > + 59 > ---- ^ - 59 > default: + 60 > default: ---- ^^^^^^^^^^^^^^^ - 60 > break; + 61 > break; ---- ^^^^^^^^^^^^^^^^ - 61 > } + 62 > } ---- ^^^^^^^^ - 62 > + 63 > ---- ^ - 63 > } + 64 > } ---- ^^^^^ - 64 > + 65 > ---- ^ - 65 > if (opCode == OP_CLOSE + 66 > if (opCode == OP_CLOSE ---- ^^^^^^^^^^^^^^^^^ - 66 && (fcd->openMode & OPEN_NOT_OPEN) ) { - 67 return 0; + 67 && (fcd->openMode & OPEN_NOT_OPEN) ) { + 68 return 0; >> Error: Unexpected pseudotext -run_file.at-9007-cmod.c:67.6-67.7: - 64 - 65 if (opCode == OP_CLOSE - 66 && (fcd->openMode & OPEN_NOT_OPEN) ) { - 67 > return 0; +run_file.at-9162-cmod.c:68.6-68.7: + 65 + 66 if (opCode == OP_CLOSE + 67 && (fcd->openMode & OPEN_NOT_OPEN) ) { + 68 > return 0; ---- ^ - 68 } - 69 + 69 } + 70 >> Error: Unexpected indicator: `r' -run_file.at-9007-cmod.c:71.6-71.7: - 68 } - 69 - 70 sts = EXTFH(opCodep, fcd); - 71 > printf("EXFTH did %s; Status=%c%c\n", txtOpCode(opCode), +run_file.at-9162-cmod.c:72.6-72.7: + 69 } + 70 + 71 sts = EXTFH(opCodep, fcd); + 72 > printf("EXFTH did %s; Status=%c%c\n", txtOpCode(opCode), ---- ^ - 72 fcd->fileStatus[0], fcd->fileStatus[1]); - 73 return sts; + 73 fcd->fileStatus[0], fcd->fileStatus[1]); + 74 fflush(stdout); >> Error: Unexpected indicator: `n' -run_file.at-9007-cmod.c:73.6-73.7: - 70 sts = EXTFH(opCodep, fcd); - 71 printf("EXFTH did %s; Status=%c%c\n", txtOpCode(opCode), - 72 fcd->fileStatus[0], fcd->fileStatus[1]); - 73 > return sts; +run_file.at-9162-cmod.c:74.6-74.7: + 71 sts = EXTFH(opCodep, fcd); + 72 printf("EXFTH did %s; Status=%c%c\n", txtOpCode(opCode), + 73 fcd->fileStatus[0], fcd->fileStatus[1]); + 74 > fflush(stdout); ---- ^ - 74 } - 75 + 75 return sts; + 76 } >> Error: Unexpected indicator: `u' -run_file.at-9007-cmod.c:77.6-77.7: - 74 } - 75 - 76 static char * /* Return Text name of function */ - 77 > txtOpCode(int opCode) +run_file.at-9162-cmod.c:75.6-75.7: + 72 printf("EXFTH did %s; Status=%c%c\n", txtOpCode(opCode), + 73 fcd->fileStatus[0], fcd->fileStatus[1]); + 74 fflush(stdout); + 75 > return sts; +---- ^ + 76 } + 77 +>> Error: Unexpected indicator: `u' + +run_file.at-9162-cmod.c:79.6-79.7: + 76 } + 77 + 78 static char * /* Return Text name of function */ + 79 > txtOpCode(int opCode) ---- ^ - 78 { - 79 static char tmp[32]; + 80 { + 81 static char tmp[32]; >> Error: Unexpected indicator: `o' -run_file.at-9007-cmod.c:79.6-79.7: - 76 static char * /* Return Text name of function */ - 77 txtOpCode(int opCode) - 78 { - 79 > static char tmp[32]; +run_file.at-9162-cmod.c:81.6-81.7: + 78 static char * /* Return Text name of function */ + 79 txtOpCode(int opCode) + 80 { + 81 > static char tmp[32]; ---- ^ - 80 switch (opCode) { - 81 case OP_OPEN_INPUT: return "OPEN_IN"; + 82 switch (opCode) { + 83 case OP_OPEN_INPUT: return "OPEN_IN"; >> Error: Unexpected indicator: `t' -run_file.at-9007-cmod.c:80.6-80.7: - 77 txtOpCode(int opCode) - 78 { - 79 static char tmp[32]; - 80 > switch (opCode) { +run_file.at-9162-cmod.c:82.6-82.7: + 79 txtOpCode(int opCode) + 80 { + 81 static char tmp[32]; + 82 > switch (opCode) { ---- ^ - 81 case OP_OPEN_INPUT: return "OPEN_IN"; - 82 case OP_OPEN_OUTPUT: return "OPEN_OUT"; + 83 case OP_OPEN_INPUT: return "OPEN_IN"; + 84 case OP_OPEN_OUTPUT: return "OPEN_OUT"; >> Error: Unexpected indicator: `t' -run_file.at-9007-cmod.c:81.6-81.7: - 78 { - 79 static char tmp[32]; - 80 switch (opCode) { - 81 > case OP_OPEN_INPUT: return "OPEN_IN"; +run_file.at-9162-cmod.c:83.6-83.7: + 80 { + 81 static char tmp[32]; + 82 switch (opCode) { + 83 > case OP_OPEN_INPUT: return "OPEN_IN"; ---- ^ - 82 case OP_OPEN_OUTPUT: return "OPEN_OUT"; - 83 case OP_OPEN_IO: return "OPEN_IO"; + 84 case OP_OPEN_OUTPUT: return "OPEN_OUT"; + 85 case OP_OPEN_IO: return "OPEN_IO"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:82.6-82.7: - 79 static char tmp[32]; - 80 switch (opCode) { - 81 case OP_OPEN_INPUT: return "OPEN_IN"; - 82 > case OP_OPEN_OUTPUT: return "OPEN_OUT"; +run_file.at-9162-cmod.c:84.6-84.7: + 81 static char tmp[32]; + 82 switch (opCode) { + 83 case OP_OPEN_INPUT: return "OPEN_IN"; + 84 > case OP_OPEN_OUTPUT: return "OPEN_OUT"; ---- ^ - 83 case OP_OPEN_IO: return "OPEN_IO"; - 84 case OP_OPEN_EXTEND: return "OPEN_EXT"; + 85 case OP_OPEN_IO: return "OPEN_IO"; + 86 case OP_OPEN_EXTEND: return "OPEN_EXT"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:83.6-83.7: - 80 switch (opCode) { - 81 case OP_OPEN_INPUT: return "OPEN_IN"; - 82 case OP_OPEN_OUTPUT: return "OPEN_OUT"; - 83 > case OP_OPEN_IO: return "OPEN_IO"; +run_file.at-9162-cmod.c:85.6-85.7: + 82 switch (opCode) { + 83 case OP_OPEN_INPUT: return "OPEN_IN"; + 84 case OP_OPEN_OUTPUT: return "OPEN_OUT"; + 85 > case OP_OPEN_IO: return "OPEN_IO"; ---- ^ - 84 case OP_OPEN_EXTEND: return "OPEN_EXT"; - 85 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; + 86 case OP_OPEN_EXTEND: return "OPEN_EXT"; + 87 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:84.6-84.7: - 81 case OP_OPEN_INPUT: return "OPEN_IN"; - 82 case OP_OPEN_OUTPUT: return "OPEN_OUT"; - 83 case OP_OPEN_IO: return "OPEN_IO"; - 84 > case OP_OPEN_EXTEND: return "OPEN_EXT"; +run_file.at-9162-cmod.c:86.6-86.7: + 83 case OP_OPEN_INPUT: return "OPEN_IN"; + 84 case OP_OPEN_OUTPUT: return "OPEN_OUT"; + 85 case OP_OPEN_IO: return "OPEN_IO"; + 86 > case OP_OPEN_EXTEND: return "OPEN_EXT"; ---- ^ - 85 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; - 86 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; + 87 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; + 88 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:85.6-85.7: - 82 case OP_OPEN_OUTPUT: return "OPEN_OUT"; - 83 case OP_OPEN_IO: return "OPEN_IO"; - 84 case OP_OPEN_EXTEND: return "OPEN_EXT"; - 85 > case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; +run_file.at-9162-cmod.c:87.6-87.7: + 84 case OP_OPEN_OUTPUT: return "OPEN_OUT"; + 85 case OP_OPEN_IO: return "OPEN_IO"; + 86 case OP_OPEN_EXTEND: return "OPEN_EXT"; + 87 > case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; ---- ^ - 86 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; - 87 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; + 88 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; + 89 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:86.6-86.7: - 83 case OP_OPEN_IO: return "OPEN_IO"; - 84 case OP_OPEN_EXTEND: return "OPEN_EXT"; - 85 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; - 86 > case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; +run_file.at-9162-cmod.c:88.6-88.7: + 85 case OP_OPEN_IO: return "OPEN_IO"; + 86 case OP_OPEN_EXTEND: return "OPEN_EXT"; + 87 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; + 88 > case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; ---- ^ - 87 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; - 88 case OP_CLOSE: return "CLOSE"; + 89 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; + 90 case OP_CLOSE: return "CLOSE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:87.6-87.7: - 84 case OP_OPEN_EXTEND: return "OPEN_EXT"; - 85 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; - 86 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; - 87 > case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; +run_file.at-9162-cmod.c:89.6-89.7: + 86 case OP_OPEN_EXTEND: return "OPEN_EXT"; + 87 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; + 88 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; + 89 > case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; ---- ^ - 88 case OP_CLOSE: return "CLOSE"; - 89 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; + 90 case OP_CLOSE: return "CLOSE"; + 91 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:88.6-88.7: - 85 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; - 86 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; - 87 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; - 88 > case OP_CLOSE: return "CLOSE"; +run_file.at-9162-cmod.c:90.6-90.7: + 87 case OP_OPEN_INPUT_NOREWIND: return "OPEN_IN_NOREW"; + 88 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; + 89 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; + 90 > case OP_CLOSE: return "CLOSE"; ---- ^ - 89 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; - 90 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; + 91 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; + 92 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:89.6-89.7: - 86 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; - 87 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; - 88 case OP_CLOSE: return "CLOSE"; - 89 > case OP_CLOSE_LOCK: return "CLOSE_LOCK"; +run_file.at-9162-cmod.c:91.6-91.7: + 88 case OP_OPEN_OUTPUT_NOREWIND: return "OPEN_OUT_NOREW"; + 89 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; + 90 case OP_CLOSE: return "CLOSE"; + 91 > case OP_CLOSE_LOCK: return "CLOSE_LOCK"; ---- ^ - 90 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; - 91 case OP_CLOSE_REEL: return "CLOSE_REEL"; + 92 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; + 93 case OP_CLOSE_REEL: return "CLOSE_REEL"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:90.6-90.7: - 87 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; - 88 case OP_CLOSE: return "CLOSE"; - 89 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; - 90 > case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; +run_file.at-9162-cmod.c:92.6-92.7: + 89 case OP_OPEN_INPUT_REVERSED: return "OPEN_IN_REV"; + 90 case OP_CLOSE: return "CLOSE"; + 91 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; + 92 > case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; ---- ^ - 91 case OP_CLOSE_REEL: return "CLOSE_REEL"; - 92 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; + 93 case OP_CLOSE_REEL: return "CLOSE_REEL"; + 94 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:91.6-91.7: - 88 case OP_CLOSE: return "CLOSE"; - 89 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; - 90 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; - 91 > case OP_CLOSE_REEL: return "CLOSE_REEL"; +run_file.at-9162-cmod.c:93.6-93.7: + 90 case OP_CLOSE: return "CLOSE"; + 91 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; + 92 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; + 93 > case OP_CLOSE_REEL: return "CLOSE_REEL"; ---- ^ - 92 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; - 93 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; + 94 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; + 95 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:92.6-92.7: - 89 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; - 90 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; - 91 case OP_CLOSE_REEL: return "CLOSE_REEL"; - 92 > case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; +run_file.at-9162-cmod.c:94.6-94.7: + 91 case OP_CLOSE_LOCK: return "CLOSE_LOCK"; + 92 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; + 93 case OP_CLOSE_REEL: return "CLOSE_REEL"; + 94 > case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; ---- ^ - 93 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; - 94 case OP_START_EQ: return "START_EQ"; + 95 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; + 96 case OP_START_EQ: return "START_EQ"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:93.6-93.7: - 90 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; - 91 case OP_CLOSE_REEL: return "CLOSE_REEL"; - 92 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; - 93 > case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; +run_file.at-9162-cmod.c:95.6-95.7: + 92 case OP_CLOSE_NOREWIND: return "CLOSE_NORED"; + 93 case OP_CLOSE_REEL: return "CLOSE_REEL"; + 94 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; + 95 > case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; ---- ^ - 94 case OP_START_EQ: return "START_EQ"; - 95 case OP_START_EQ_ANY: return "START_EQ_ANY"; + 96 case OP_START_EQ: return "START_EQ"; + 97 case OP_START_EQ_ANY: return "START_EQ_ANY"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:94.6-94.7: - 91 case OP_CLOSE_REEL: return "CLOSE_REEL"; - 92 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; - 93 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; - 94 > case OP_START_EQ: return "START_EQ"; +run_file.at-9162-cmod.c:96.6-96.7: + 93 case OP_CLOSE_REEL: return "CLOSE_REEL"; + 94 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; + 95 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; + 96 > case OP_START_EQ: return "START_EQ"; ---- ^ - 95 case OP_START_EQ_ANY: return "START_EQ_ANY"; - 96 case OP_START_GT: return "START_GT"; + 97 case OP_START_EQ_ANY: return "START_EQ_ANY"; + 98 case OP_START_GT: return "START_GT"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:95.6-95.7: - 92 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; - 93 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; - 94 case OP_START_EQ: return "START_EQ"; - 95 > case OP_START_EQ_ANY: return "START_EQ_ANY"; +run_file.at-9162-cmod.c:97.6-97.7: + 94 case OP_CLOSE_REMOVE: return "CLOSE_REMOVE"; + 95 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; + 96 case OP_START_EQ: return "START_EQ"; + 97 > case OP_START_EQ_ANY: return "START_EQ_ANY"; ---- ^ - 96 case OP_START_GT: return "START_GT"; - 97 case OP_START_GE: return "START_GE"; + 98 case OP_START_GT: return "START_GT"; + 99 case OP_START_GE: return "START_GE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:96.6-96.7: - 93 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; - 94 case OP_START_EQ: return "START_EQ"; - 95 case OP_START_EQ_ANY: return "START_EQ_ANY"; - 96 > case OP_START_GT: return "START_GT"; +run_file.at-9162-cmod.c:98.6-98.7: + 95 case OP_CLOSE_NO_REWIND: return "CLOSE_NO_REW"; + 96 case OP_START_EQ: return "START_EQ"; + 97 case OP_START_EQ_ANY: return "START_EQ_ANY"; + 98 > case OP_START_GT: return "START_GT"; ---- ^ - 97 case OP_START_GE: return "START_GE"; - 98 case OP_START_LT: return "START_LT"; + 99 case OP_START_GE: return "START_GE"; + 100 case OP_START_LT: return "START_LT"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:97.6-97.7: - 94 case OP_START_EQ: return "START_EQ"; - 95 case OP_START_EQ_ANY: return "START_EQ_ANY"; - 96 case OP_START_GT: return "START_GT"; - 97 > case OP_START_GE: return "START_GE"; +run_file.at-9162-cmod.c:99.6-99.7: + 96 case OP_START_EQ: return "START_EQ"; + 97 case OP_START_EQ_ANY: return "START_EQ_ANY"; + 98 case OP_START_GT: return "START_GT"; + 99 > case OP_START_GE: return "START_GE"; ---- ^ - 98 case OP_START_LT: return "START_LT"; - 99 case OP_START_LE: return "START_LE"; + 100 case OP_START_LT: return "START_LT"; + 101 case OP_START_LE: return "START_LE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:98.6-98.7: - 95 case OP_START_EQ_ANY: return "START_EQ_ANY"; - 96 case OP_START_GT: return "START_GT"; - 97 case OP_START_GE: return "START_GE"; - 98 > case OP_START_LT: return "START_LT"; +run_file.at-9162-cmod.c:100.6-100.7: + 97 case OP_START_EQ_ANY: return "START_EQ_ANY"; + 98 case OP_START_GT: return "START_GT"; + 99 case OP_START_GE: return "START_GE"; + 100 > case OP_START_LT: return "START_LT"; ---- ^ - 99 case OP_START_LE: return "START_LE"; - 100 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; + 101 case OP_START_LE: return "START_LE"; + 102 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:99.6-99.7: - 96 case OP_START_GT: return "START_GT"; - 97 case OP_START_GE: return "START_GE"; - 98 case OP_START_LT: return "START_LT"; - 99 > case OP_START_LE: return "START_LE"; +run_file.at-9162-cmod.c:101.6-101.7: + 98 case OP_START_GT: return "START_GT"; + 99 case OP_START_GE: return "START_GE"; + 100 case OP_START_LT: return "START_LT"; + 101 > case OP_START_LE: return "START_LE"; ---- ^ - 100 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; - 101 case OP_READ_SEQ: return "READ_SEQ"; + 102 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; + 103 case OP_READ_SEQ: return "READ_SEQ"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:100.6-100.7: - 97 case OP_START_GE: return "START_GE"; - 98 case OP_START_LT: return "START_LT"; - 99 case OP_START_LE: return "START_LE"; - 100 > case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; +run_file.at-9162-cmod.c:102.6-102.7: + 99 case OP_START_GE: return "START_GE"; + 100 case OP_START_LT: return "START_LT"; + 101 case OP_START_LE: return "START_LE"; + 102 > case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; ---- ^ - 101 case OP_READ_SEQ: return "READ_SEQ"; - 102 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; + 103 case OP_READ_SEQ: return "READ_SEQ"; + 104 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:101.6-101.7: - 98 case OP_START_LT: return "START_LT"; - 99 case OP_START_LE: return "START_LE"; - 100 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; - 101 > case OP_READ_SEQ: return "READ_SEQ"; +run_file.at-9162-cmod.c:103.6-103.7: + 100 case OP_START_LT: return "START_LT"; + 101 case OP_START_LE: return "START_LE"; + 102 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; + 103 > case OP_READ_SEQ: return "READ_SEQ"; ---- ^ - 102 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; - 103 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; + 104 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; + 105 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:102.6-102.7: - 99 case OP_START_LE: return "START_LE"; - 100 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; - 101 case OP_READ_SEQ: return "READ_SEQ"; - 102 > case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; +run_file.at-9162-cmod.c:104.6-104.7: + 101 case OP_START_LE: return "START_LE"; + 102 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; + 103 case OP_READ_SEQ: return "READ_SEQ"; + 104 > case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; ---- ^ - 103 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; - 104 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; + 105 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; + 106 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:103.6-103.7: - 100 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; - 101 case OP_READ_SEQ: return "READ_SEQ"; - 102 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; - 103 > case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; +run_file.at-9162-cmod.c:105.6-105.7: + 102 case OP_READ_SEQ_NO_LOCK: return "READ_SEQ_NO_LK"; + 103 case OP_READ_SEQ: return "READ_SEQ"; + 104 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; + 105 > case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; ---- ^ - 104 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; - 105 case OP_READ_PREV: return "READ_PREV"; + 106 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; + 107 case OP_READ_PREV: return "READ_PREV"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:104.6-104.7: - 101 case OP_READ_SEQ: return "READ_SEQ"; - 102 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; - 103 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; - 104 > case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; +run_file.at-9162-cmod.c:106.6-106.7: + 103 case OP_READ_SEQ: return "READ_SEQ"; + 104 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; + 105 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; + 106 > case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; ---- ^ - 105 case OP_READ_PREV: return "READ_PREV"; - 106 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; + 107 case OP_READ_PREV: return "READ_PREV"; + 108 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:105.6-105.7: - 102 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; - 103 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; - 104 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; - 105 > case OP_READ_PREV: return "READ_PREV"; +run_file.at-9162-cmod.c:107.6-107.7: + 104 case OP_READ_SEQ_LOCK: return "READ_SEQ_LK"; + 105 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; + 106 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; + 107 > case OP_READ_PREV: return "READ_PREV"; ---- ^ - 106 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; - 107 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; + 108 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; + 109 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:106.6-106.7: - 103 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; - 104 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; - 105 case OP_READ_PREV: return "READ_PREV"; - 106 > case OP_READ_PREV_LOCK: return "READ_PREV_LK"; +run_file.at-9162-cmod.c:108.6-108.7: + 105 case OP_READ_SEQ_KEPT_LOCK: return "READ_SEQ_KEPT_LK"; + 106 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; + 107 case OP_READ_PREV: return "READ_PREV"; + 108 > case OP_READ_PREV_LOCK: return "READ_PREV_LK"; ---- ^ - 107 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; - 108 case OP_READ_RAN: return "READ_RAN"; + 109 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; + 110 case OP_READ_RAN: return "READ_RAN"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:107.6-107.7: - 104 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; - 105 case OP_READ_PREV: return "READ_PREV"; - 106 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; - 107 > case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; +run_file.at-9162-cmod.c:109.6-109.7: + 106 case OP_READ_PREV_NO_LOCK: return "READ_PREV_NO_LK"; + 107 case OP_READ_PREV: return "READ_PREV"; + 108 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; + 109 > case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; ---- ^ - 108 case OP_READ_RAN: return "READ_RAN"; - 109 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; + 110 case OP_READ_RAN: return "READ_RAN"; + 111 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:108.6-108.7: - 105 case OP_READ_PREV: return "READ_PREV"; - 106 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; - 107 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; - 108 > case OP_READ_RAN: return "READ_RAN"; +run_file.at-9162-cmod.c:110.6-110.7: + 107 case OP_READ_PREV: return "READ_PREV"; + 108 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; + 109 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; + 110 > case OP_READ_RAN: return "READ_RAN"; ---- ^ - 109 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; - 110 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; + 111 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; + 112 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:109.6-109.7: - 106 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; - 107 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; - 108 case OP_READ_RAN: return "READ_RAN"; - 109 > case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; +run_file.at-9162-cmod.c:111.6-111.7: + 108 case OP_READ_PREV_LOCK: return "READ_PREV_LK"; + 109 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; + 110 case OP_READ_RAN: return "READ_RAN"; + 111 > case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; ---- ^ - 110 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; - 111 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; + 112 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; + 113 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:110.6-110.7: - 107 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; - 108 case OP_READ_RAN: return "READ_RAN"; - 109 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; - 110 > case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; +run_file.at-9162-cmod.c:112.6-112.7: + 109 case OP_READ_PREV_KEPT_LOCK: return "READ_PREV_KEPT_LK"; + 110 case OP_READ_RAN: return "READ_RAN"; + 111 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; + 112 > case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; ---- ^ - 111 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; - 112 case OP_READ_DIR: return "READ_DIR"; + 113 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; + 114 case OP_READ_DIR: return "READ_DIR"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:111.6-111.7: - 108 case OP_READ_RAN: return "READ_RAN"; - 109 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; - 110 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; - 111 > case OP_READ_RAN_LOCK: return "READ_RAN_LK"; +run_file.at-9162-cmod.c:113.6-113.7: + 110 case OP_READ_RAN: return "READ_RAN"; + 111 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; + 112 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; + 113 > case OP_READ_RAN_LOCK: return "READ_RAN_LK"; ---- ^ - 112 case OP_READ_DIR: return "READ_DIR"; - 113 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; + 114 case OP_READ_DIR: return "READ_DIR"; + 115 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:112.6-112.7: - 109 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; - 110 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; - 111 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; - 112 > case OP_READ_DIR: return "READ_DIR"; +run_file.at-9162-cmod.c:114.6-114.7: + 111 case OP_READ_RAN_NO_LOCK: return "READ_RAN_NO_LK"; + 112 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; + 113 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; + 114 > case OP_READ_DIR: return "READ_DIR"; ---- ^ - 113 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; - 114 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; + 115 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; + 116 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:113.6-113.7: - 110 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; - 111 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; - 112 case OP_READ_DIR: return "READ_DIR"; - 113 > case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; +run_file.at-9162-cmod.c:115.6-115.7: + 112 case OP_READ_RAN_KEPT_LOCK: return "READ_RAN_KEPT_LK"; + 113 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; + 114 case OP_READ_DIR: return "READ_DIR"; + 115 > case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; ---- ^ - 114 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; - 115 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; + 116 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; + 117 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:114.6-114.7: - 111 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; - 112 case OP_READ_DIR: return "READ_DIR"; - 113 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; - 114 > case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; +run_file.at-9162-cmod.c:116.6-116.7: + 113 case OP_READ_RAN_LOCK: return "READ_RAN_LK"; + 114 case OP_READ_DIR: return "READ_DIR"; + 115 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; + 116 > case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; ---- ^ - 115 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; - 116 case OP_READ_POSITION: return "READ_POSITION"; + 117 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; + 118 case OP_READ_POSITION: return "READ_POSITION"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:115.6-115.7: - 112 case OP_READ_DIR: return "READ_DIR"; - 113 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; - 114 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; - 115 > case OP_READ_DIR_LOCK: return "READ_DIR_LK"; +run_file.at-9162-cmod.c:117.6-117.7: + 114 case OP_READ_DIR: return "READ_DIR"; + 115 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; + 116 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; + 117 > case OP_READ_DIR_LOCK: return "READ_DIR_LK"; ---- ^ - 116 case OP_READ_POSITION: return "READ_POSITION"; - 117 case OP_WRITE: return "WRITE"; + 118 case OP_READ_POSITION: return "READ_POSITION"; + 119 case OP_WRITE: return "WRITE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:116.6-116.7: - 113 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; - 114 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; - 115 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; - 116 > case OP_READ_POSITION: return "READ_POSITION"; +run_file.at-9162-cmod.c:118.6-118.7: + 115 case OP_READ_DIR_NO_LOCK: return "READ_DIR_NO_LK"; + 116 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; + 117 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; + 118 > case OP_READ_POSITION: return "READ_POSITION"; ---- ^ - 117 case OP_WRITE: return "WRITE"; - 118 case OP_REWRITE: return "REWRITE"; + 119 case OP_WRITE: return "WRITE"; + 120 case OP_REWRITE: return "REWRITE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:117.6-117.7: - 114 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; - 115 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; - 116 case OP_READ_POSITION: return "READ_POSITION"; - 117 > case OP_WRITE: return "WRITE"; +run_file.at-9162-cmod.c:119.6-119.7: + 116 case OP_READ_DIR_KEPT_LOCK: return "READ_DIR_KEPT_LK"; + 117 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; + 118 case OP_READ_POSITION: return "READ_POSITION"; + 119 > case OP_WRITE: return "WRITE"; ---- ^ - 118 case OP_REWRITE: return "REWRITE"; - 119 case OP_DELETE: return "DELETE"; + 120 case OP_REWRITE: return "REWRITE"; + 121 case OP_DELETE: return "DELETE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:118.6-118.7: - 115 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; - 116 case OP_READ_POSITION: return "READ_POSITION"; - 117 case OP_WRITE: return "WRITE"; - 118 > case OP_REWRITE: return "REWRITE"; +run_file.at-9162-cmod.c:120.6-120.7: + 117 case OP_READ_DIR_LOCK: return "READ_DIR_LK"; + 118 case OP_READ_POSITION: return "READ_POSITION"; + 119 case OP_WRITE: return "WRITE"; + 120 > case OP_REWRITE: return "REWRITE"; ---- ^ - 119 case OP_DELETE: return "DELETE"; - 120 case OP_DELETE_FILE: return "DELETE_FILE"; + 121 case OP_DELETE: return "DELETE"; + 122 case OP_DELETE_FILE: return "DELETE_FILE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:119.6-119.7: - 116 case OP_READ_POSITION: return "READ_POSITION"; - 117 case OP_WRITE: return "WRITE"; - 118 case OP_REWRITE: return "REWRITE"; - 119 > case OP_DELETE: return "DELETE"; +run_file.at-9162-cmod.c:121.6-121.7: + 118 case OP_READ_POSITION: return "READ_POSITION"; + 119 case OP_WRITE: return "WRITE"; + 120 case OP_REWRITE: return "REWRITE"; + 121 > case OP_DELETE: return "DELETE"; ---- ^ - 120 case OP_DELETE_FILE: return "DELETE_FILE"; - 121 case OP_UNLOCK: return "UNLOCK"; + 122 case OP_DELETE_FILE: return "DELETE_FILE"; + 123 case OP_UNLOCK: return "UNLOCK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:120.6-120.7: - 117 case OP_WRITE: return "WRITE"; - 118 case OP_REWRITE: return "REWRITE"; - 119 case OP_DELETE: return "DELETE"; - 120 > case OP_DELETE_FILE: return "DELETE_FILE"; +run_file.at-9162-cmod.c:122.6-122.7: + 119 case OP_WRITE: return "WRITE"; + 120 case OP_REWRITE: return "REWRITE"; + 121 case OP_DELETE: return "DELETE"; + 122 > case OP_DELETE_FILE: return "DELETE_FILE"; ---- ^ - 121 case OP_UNLOCK: return "UNLOCK"; - 122 case OP_ROLLBACK: return "ROLLBACK"; + 123 case OP_UNLOCK: return "UNLOCK"; + 124 case OP_ROLLBACK: return "ROLLBACK"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:121.6-121.7: - 118 case OP_REWRITE: return "REWRITE"; - 119 case OP_DELETE: return "DELETE"; - 120 case OP_DELETE_FILE: return "DELETE_FILE"; - 121 > case OP_UNLOCK: return "UNLOCK"; +run_file.at-9162-cmod.c:123.6-123.7: + 120 case OP_REWRITE: return "REWRITE"; + 121 case OP_DELETE: return "DELETE"; + 122 case OP_DELETE_FILE: return "DELETE_FILE"; + 123 > case OP_UNLOCK: return "UNLOCK"; ---- ^ - 122 case OP_ROLLBACK: return "ROLLBACK"; - 123 case OP_COMMIT: return "COMMIT"; + 124 case OP_ROLLBACK: return "ROLLBACK"; + 125 case OP_COMMIT: return "COMMIT"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:122.6-122.7: - 119 case OP_DELETE: return "DELETE"; - 120 case OP_DELETE_FILE: return "DELETE_FILE"; - 121 case OP_UNLOCK: return "UNLOCK"; - 122 > case OP_ROLLBACK: return "ROLLBACK"; +run_file.at-9162-cmod.c:124.6-124.7: + 121 case OP_DELETE: return "DELETE"; + 122 case OP_DELETE_FILE: return "DELETE_FILE"; + 123 case OP_UNLOCK: return "UNLOCK"; + 124 > case OP_ROLLBACK: return "ROLLBACK"; ---- ^ - 123 case OP_COMMIT: return "COMMIT"; - 124 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; + 125 case OP_COMMIT: return "COMMIT"; + 126 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:123.6-123.7: - 120 case OP_DELETE_FILE: return "DELETE_FILE"; - 121 case OP_UNLOCK: return "UNLOCK"; - 122 case OP_ROLLBACK: return "ROLLBACK"; - 123 > case OP_COMMIT: return "COMMIT"; +run_file.at-9162-cmod.c:125.6-125.7: + 122 case OP_DELETE_FILE: return "DELETE_FILE"; + 123 case OP_UNLOCK: return "UNLOCK"; + 124 case OP_ROLLBACK: return "ROLLBACK"; + 125 > case OP_COMMIT: return "COMMIT"; ---- ^ - 124 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; - 125 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; + 126 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; + 127 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:124.6-124.7: - 121 case OP_UNLOCK: return "UNLOCK"; - 122 case OP_ROLLBACK: return "ROLLBACK"; - 123 case OP_COMMIT: return "COMMIT"; - 124 > case OP_WRITE_BEFORE: return "WRITE_BEFORE"; +run_file.at-9162-cmod.c:126.6-126.7: + 123 case OP_UNLOCK: return "UNLOCK"; + 124 case OP_ROLLBACK: return "ROLLBACK"; + 125 case OP_COMMIT: return "COMMIT"; + 126 > case OP_WRITE_BEFORE: return "WRITE_BEFORE"; ---- ^ - 125 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; - 126 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; + 127 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; + 128 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:125.6-125.7: - 122 case OP_ROLLBACK: return "ROLLBACK"; - 123 case OP_COMMIT: return "COMMIT"; - 124 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; - 125 > case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; +run_file.at-9162-cmod.c:127.6-127.7: + 124 case OP_ROLLBACK: return "ROLLBACK"; + 125 case OP_COMMIT: return "COMMIT"; + 126 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; + 127 > case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; ---- ^ - 126 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; - 127 case OP_WRITE_AFTER: return "WRITE_AFTER"; + 128 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; + 129 case OP_WRITE_AFTER: return "WRITE_AFTER"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:126.6-126.7: - 123 case OP_COMMIT: return "COMMIT"; - 124 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; - 125 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; - 126 > case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; +run_file.at-9162-cmod.c:128.6-128.7: + 125 case OP_COMMIT: return "COMMIT"; + 126 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; + 127 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; + 128 > case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; ---- ^ - 127 case OP_WRITE_AFTER: return "WRITE_AFTER"; - 128 case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; + 129 case OP_WRITE_AFTER: return "WRITE_AFTER"; + 130 case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:127.6-127.7: - 124 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; - 125 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; - 126 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; - 127 > case OP_WRITE_AFTER: return "WRITE_AFTER"; +run_file.at-9162-cmod.c:129.6-129.7: + 126 case OP_WRITE_BEFORE: return "WRITE_BEFORE"; + 127 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; + 128 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; + 129 > case OP_WRITE_AFTER: return "WRITE_AFTER"; ---- ^ - 128 case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; - 129 case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; + 130 case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; + 131 case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:128.6-128.7: - 125 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; - 126 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; - 127 case OP_WRITE_AFTER: return "WRITE_AFTER"; - 128 > case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; +run_file.at-9162-cmod.c:130.6-130.7: + 127 case OP_WRITE_BEFORE_TAB: return "WRITE_BEFORE_TAB"; + 128 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; + 129 case OP_WRITE_AFTER: return "WRITE_AFTER"; + 130 > case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; ---- ^ - 129 case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; - 130 } + 131 case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; + 132 } >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:129.6-129.7: - 126 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; - 127 case OP_WRITE_AFTER: return "WRITE_AFTER"; - 128 case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; - 129 > case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; +run_file.at-9162-cmod.c:131.6-131.7: + 128 case OP_WRITE_BEFORE_PAGE: return "WRITE_BEFORE_PAGE"; + 129 case OP_WRITE_AFTER: return "WRITE_AFTER"; + 130 case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; + 131 > case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; ---- ^ - 130 } - 131 sprintf(tmp, "Func 0x%02X:", opCode); + 132 } + 133 sprintf(tmp, "Func 0x%02X:", opCode); >> Error: Unexpected indicator: `e' -run_file.at-9007-cmod.c:131.6-131.7: - 128 case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; - 129 case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; - 130 } - 131 > sprintf(tmp, "Func 0x%02X:", opCode); +run_file.at-9162-cmod.c:133.6-133.7: + 130 case OP_WRITE_AFTER_TAB: return "WRITE_AFTER_TAB"; + 131 case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; + 132 } + 133 > sprintf(tmp, "Func 0x%02X:", opCode); ---- ^ - 132 return tmp; - 133 } + 134 return tmp; + 135 } >> Error: Unexpected indicator: `i' -run_file.at-9007-cmod.c:132.6-132.7: - 129 case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; - 130 } - 131 sprintf(tmp, "Func 0x%02X:", opCode); - 132 > return tmp; +run_file.at-9162-cmod.c:134.6-134.7: + 131 case OP_WRITE_AFTER_PAGE: return "WRITE_AFTER_PAGE"; + 132 } + 133 sprintf(tmp, "Func 0x%02X:", opCode); + 134 > return tmp; ---- ^ - 133 } + 135 } >> Error: Unexpected indicator: `u' -Considering: import/gnucobol/tests/testsuite.src/run_file.at:9007:0 -run_file.at-9007-prog.cob:10.34-10.42: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:9162:0 +run_file.at-9162-prog.cob:10.34-10.42: 7 8 INPUT-OUTPUT SECTION. 9 FILE-CONTROL. @@ -4951,7 +4994,7 @@ run_file.at-9007-prog.cob:10.34-10.42: 12 FILE STATUS IS CUST-STAT . >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-9007-prog.cob:44.54: +run_file.at-9162-prog.cob:44.54: 41 05 FILLER PIC X(8) VALUE "FOR00000". 42 43 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -4961,7 +5004,7 @@ run_file.at-9007-prog.cob:44.54: 46 >> Hint: Missing -run_file.at-9007-prog.cob:44.55-44.62: +run_file.at-9162-prog.cob:44.55-44.62: 41 05 FILLER PIC X(8) VALUE "FOR00000". 42 43 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -4971,7 +5014,7 @@ run_file.at-9007-prog.cob:44.55-44.62: 46 >> Error: Invalid syntax -run_file.at-9007-prog.cob:54.55: +run_file.at-9162-prog.cob:54.55: 51 05 FILLER PIC X(25) VALUE "EPSILON EQUIPMENT SUPPLY ". 52 05 FILLER PIC X(25) VALUE "FORTUNE COOKIE COMPANY ". 53 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -4981,7 +5024,7 @@ run_file.at-9007-prog.cob:54.55: 56 >> Hint: Missing -run_file.at-9007-prog.cob:54.56-54.63: +run_file.at-9162-prog.cob:54.56-54.63: 51 05 FILLER PIC X(25) VALUE "EPSILON EQUIPMENT SUPPLY ". 52 05 FILLER PIC X(25) VALUE "FORTUNE COOKIE COMPANY ". 53 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -4991,7 +5034,7 @@ run_file.at-9007-prog.cob:54.56-54.63: 56 >> Error: Invalid syntax -run_file.at-9007-prog.cob:65.55: +run_file.at-9162-prog.cob:65.55: 62 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 63 64 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL @@ -5001,7 +5044,7 @@ run_file.at-9007-prog.cob:65.55: 67 02 DATA-NO-TERMINALS-TBL. >> Hint: Missing -run_file.at-9007-prog.cob:65.56-65.63: +run_file.at-9162-prog.cob:65.56-65.63: 62 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 63 64 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL @@ -5011,7 +5054,7 @@ run_file.at-9007-prog.cob:65.56-65.63: 67 02 DATA-NO-TERMINALS-TBL. >> Error: Invalid syntax -run_file.at-9007-prog.cob:77.61: +run_file.at-9162-prog.cob:77.61: 74 05 FILLER PIC 9(3) COMP-3 VALUE 254. 75 76 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -5021,7 +5064,7 @@ run_file.at-9007-prog.cob:77.61: 79 05 SUB BINARY-SHORT UNSIGNED. >> Hint: Missing -run_file.at-9007-prog.cob:77.62-77.69: +run_file.at-9162-prog.cob:77.62-77.69: 74 05 FILLER PIC 9(3) COMP-3 VALUE 254. 75 76 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -5031,8 +5074,8 @@ run_file.at-9007-prog.cob:77.62-77.69: 79 05 SUB BINARY-SHORT UNSIGNED. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:9245:0 -run_file.at-9245-prog.cob:15.50: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:9400:0 +run_file.at-9400-prog.cob:15.50: 12 01 I PIC XX COMP-X. 13 14 01 WS-FCD-DDNAME PIC X(8) VALUE SPACES. @@ -5042,7 +5085,7 @@ run_file.at-9245-prog.cob:15.50: 17 01 WS-FCD-SIZE PIC 9(04) VALUE 0 COMP-5. >> Hint: Missing -run_file.at-9245-prog.cob:15.51-15.55: +run_file.at-9400-prog.cob:15.51-15.55: 12 01 I PIC XX COMP-X. 13 14 01 WS-FCD-DDNAME PIC X(8) VALUE SPACES. @@ -5052,7 +5095,7 @@ run_file.at-9245-prog.cob:15.51-15.55: 17 01 WS-FCD-SIZE PIC 9(04) VALUE 0 COMP-5. >> Error: Invalid syntax -run_file.at-9245-prog.cob:49.11-49.30: +run_file.at-9400-prog.cob:49.11-49.30: 46 LINKAGE SECTION. 47 48 01 FCD-MAP. @@ -5064,7 +5107,7 @@ run_file.at-9245-prog.cob:49.11-49.30: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -run_file.at-9245-prog.cob:74.15-74.21: +run_file.at-9400-prog.cob:74.15-74.21: 71 72 MOVE "TESTOUT" TO WS-FCD-DDNAME 73 @@ -5074,9 +5117,9 @@ run_file.at-9245-prog.cob:74.15-74.21: 76 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:9270:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:9434:0 -run_file.at-9434-prog.cob:17.11-17.24: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:9425:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:9589:0 +run_file.at-9589-prog.cob:17.11-17.24: 14 88 EXTFH-OPCODE-ISCLOSE VALUE X'80'. 15 88 EXTFH-OPCODE-ISWRITE VALUE X'F3'. 16 01 FCD-PARAMETER-BLOCK. @@ -5088,7 +5131,7 @@ run_file.at-9434-prog.cob:17.11-17.24: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -run_file.at-9434-prog.cob:46.16-46.22: +run_file.at-9589-prog.cob:46.16-46.22: 43 DISPLAY PROGRAM-NAME ': STARTING.' 44 DISPLAY PROGRAM-NAME ': CREATING LINE SEQUENTIAL FILE.' 45 SET EXTFH-OPCODE-ISOPENOUTPUT TO TRUE @@ -5098,7 +5141,7 @@ run_file.at-9434-prog.cob:46.16-46.22: 48 MOVE fcd--open-closed TO FCD-OPEN-MODE >> Error: Invalid syntax -run_file.at-9434-prog.cob:49.16-49.22: +run_file.at-9589-prog.cob:49.16-49.22: 46 MOVE LENGTH OF FCD-PARAMETER-BLOCK TO FCD-LENGTH 47 MOVE fcd--version-number TO FCD-VERSION 48 MOVE fcd--open-closed TO FCD-OPEN-MODE @@ -5108,7 +5151,7 @@ run_file.at-9434-prog.cob:49.16-49.22: 51 MOVE fcd--format-cobol2 TO FCD-FILE-FORMAT >> Error: Invalid syntax -run_file.at-9434-prog.cob:52.16-52.22: +run_file.at-9589-prog.cob:52.16-52.22: 49 MOVE LENGTH OF LSEQ-FILENAME TO FCD-NAME-LENGTH 50 MOVE fcd--exclusive-bit TO FCD-LOCK-MODE 51 MOVE fcd--format-cobol2 TO FCD-FILE-FORMAT @@ -5118,7 +5161,7 @@ run_file.at-9434-prog.cob:52.16-52.22: 54 MOVE 0 TO FCD-MIN-REC-LENGTH >> Error: Invalid syntax -run_file.at-9434-prog.cob:94.16-94.22: +run_file.at-9589-prog.cob:94.16-94.22: 91 DISPLAY PROGRAM-NAME ': READING LINE SEQUENTIAL FILE.' 92 SET EXTFH-OPCODE-ISOPENINPUT TO TRUE 93 MOVE fcd--open-closed TO FCD-OPEN-MODE @@ -5128,7 +5171,7 @@ run_file.at-9434-prog.cob:94.16-94.22: 96 MOVE LENGTH OF LSEQ-RECORDAREA TO FCD-MAX-REC-LENGTH >> Error: Invalid syntax -run_file.at-9434-prog.cob:96.16-96.22: +run_file.at-9589-prog.cob:96.16-96.22: 93 MOVE fcd--open-closed TO FCD-OPEN-MODE 94 MOVE LENGTH OF LSEQ-FILENAME TO FCD-NAME-LENGTH 95 MOVE fcd--exclusive-bit TO FCD-LOCK-MODE @@ -5138,30 +5181,30 @@ run_file.at-9434-prog.cob:96.16-96.22: 98 SET FCD-FILENAME-ADDRESS TO ADDRESS OF LSEQ-FILENAME >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:9463:0 -run_file.at-9463-reference:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:9618:0 +run_file.at-9618-reference:1.6-1.7: 1 > THERE IS LITTLE LAMB ---- ^ 2 THE LAMB WAS GRAND AND A GRANDMA 3 THE OLD EWE CHORTLED >> Error: Unexpected indicator: `I' -run_file.at-9463-reference:1.7-1.8: +run_file.at-9618-reference:1.7-1.8: 1 > THERE IS LITTLE LAMB ---- ^ 2 THE LAMB WAS GRAND AND A GRANDMA 3 THE OLD EWE CHORTLED >> Error: Invalid syntax -run_file.at-9463-reference:2.6-2.7: +run_file.at-9618-reference:2.6-2.7: 1 THERE IS LITTLE LAMB 2 > THE LAMB WAS GRAND AND A GRANDMA ---- ^ 3 THE OLD EWE CHORTLED >> Error: Unexpected indicator: `M' -Considering: import/gnucobol/tests/testsuite.src/run_file.at:9643:0 -run_file.at-9643-prog.cob:19.11-19.24: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:9798:0 +run_file.at-9798-prog.cob:19.11-19.24: 16 88 EXTFH-OPCODE-ISWRITE VALUE X'F3'. 17 * 18 01 FCD-PARAMETER-BLOCK. @@ -5173,7 +5216,7 @@ run_file.at-9643-prog.cob:19.11-19.24: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -run_file.at-9643-prog.cob:48.16-48.22: +run_file.at-9798-prog.cob:48.16-48.22: 45 DISPLAY PROGRAM-NAME ': STARTING.' 46 DISPLAY PROGRAM-NAME ': CREATING FIXED SEQ FILE.' 47 SET EXTFH-OPCODE-ISOPENOUTPUT TO TRUE @@ -5183,7 +5226,7 @@ run_file.at-9643-prog.cob:48.16-48.22: 50 MOVE fcd--sequential-org TO FCD-ORGANIZATION >> Error: Invalid syntax -run_file.at-9643-prog.cob:52.16-52.22: +run_file.at-9798-prog.cob:52.16-52.22: 49 move fcd--version-number TO FCD-VERSION 50 MOVE fcd--sequential-org TO FCD-ORGANIZATION 51 MOVE fcd--open-closed TO FCD-OPEN-MODE @@ -5193,7 +5236,7 @@ run_file.at-9643-prog.cob:52.16-52.22: 54 move fcd--format-cobol2 to FCD-FILE-FORMAT >> Error: Invalid syntax -run_file.at-9643-prog.cob:55.16-55.22: +run_file.at-9798-prog.cob:55.16-55.22: 52 MOVE LENGTH OF FIX-FILENAME TO FCD-NAME-LENGTH 53 MOVE fcd--exclusive-bit TO FCD-LOCK-MODE 54 move fcd--format-cobol2 to FCD-FILE-FORMAT @@ -5203,7 +5246,7 @@ run_file.at-9643-prog.cob:55.16-55.22: 57 SET FCD-FILENAME-ADDRESS TO ADDRESS OF FIX-FILENAME >> Error: Invalid syntax -run_file.at-9643-prog.cob:100.16-100.22: +run_file.at-9798-prog.cob:100.16-100.22: 97 SET EXTFH-OPCODE-ISOPENINPUT TO TRUE 98 MOVE fcd--sequential-org TO FCD-ORGANIZATION 99 MOVE fcd--open-closed TO FCD-OPEN-MODE @@ -5213,7 +5256,7 @@ run_file.at-9643-prog.cob:100.16-100.22: 102 move fcd--format-cobol2 to FCD-FILE-FORMAT >> Error: Invalid syntax -run_file.at-9643-prog.cob:103.16-103.22: +run_file.at-9798-prog.cob:103.16-103.22: 100 MOVE LENGTH OF FIX-FILENAME TO FCD-NAME-LENGTH 101 MOVE fcd--exclusive-bit TO FCD-LOCK-MODE 102 move fcd--format-cobol2 to FCD-FILE-FORMAT @@ -5223,8 +5266,8 @@ run_file.at-9643-prog.cob:103.16-103.22: 105 SET FCD-FILENAME-ADDRESS TO ADDRESS OF FIX-FILENAME >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:9824:0 -run_file.at-9824-prog.cob:15.16-15.24: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:9979:0 +run_file.at-9979-prog.cob:15.16-15.24: 12 ALTERNATE RECORD KEY IS CM-TELEPHONE WITH DUPLICATES 13 ALTERNATE RECORD KEY IS SPLIT-KEY3 14 SOURCE IS CM-DISK,CM-DP-MGR,CM-MACHINE WITH DUPLICATES @@ -5234,7 +5277,7 @@ run_file.at-9824-prog.cob:15.16-15.24: 17 >> Error: Invalid syntax -run_file.at-9824-prog.cob:48.50: +run_file.at-9979-prog.cob:48.50: 45 46 01 CUST-STAT PIC X(2) VALUE SPACES. 47 01 WS-FCD-DDNAME PIC X(8) VALUE SPACES. @@ -5244,7 +5287,7 @@ run_file.at-9824-prog.cob:48.50: 50 01 ACTION-CODE PIC X(2). >> Hint: Missing -run_file.at-9824-prog.cob:48.51-48.55: +run_file.at-9979-prog.cob:48.51-48.55: 45 46 01 CUST-STAT PIC X(2) VALUE SPACES. 47 01 WS-FCD-DDNAME PIC X(8) VALUE SPACES. @@ -5254,7 +5297,7 @@ run_file.at-9824-prog.cob:48.51-48.55: 50 01 ACTION-CODE PIC X(2). >> Error: Invalid syntax -run_file.at-9824-prog.cob:66.11-66.30: +run_file.at-9979-prog.cob:66.11-66.30: 63 01 FCD-RECORD PIC X(512) VALUE SPACES. 64 65 01 FCD-MAP. @@ -5266,7 +5309,7 @@ run_file.at-9824-prog.cob:66.11-66.30: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -run_file.at-9824-prog.cob:93.17-93.21: +run_file.at-9979-prog.cob:93.17-93.21: 90 *----------------------------------------------------------------* 91 000-MAIN. 92 @@ -5276,7 +5319,7 @@ run_file.at-9824-prog.cob:93.17-93.21: 95 WRITE TSPFL-RECORD. >> Error: Invalid syntax -run_file.at-9824-prog.cob:101.15-101.21: +run_file.at-9979-prog.cob:101.15-101.21: 98 SET FCD-KEY-DEF-ADDRESS TO ADDRESS OF KEY-DEF. 99 SET FCD-FILENAME-ADDRESS TO ADDRESS OF FCD-FILENAME. 100 MOVE 64 TO FCD-NAME-LENGTH @@ -5286,8 +5329,8 @@ run_file.at-9824-prog.cob:101.15-101.21: 103 MOVE 512 TO FCD-CURRENT-REC-LEN >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:10153:0 -run_file.at-10153-prog.cob:86.11-86.23: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:10308:0 +run_file.at-10308-prog.cob:86.11-86.23: 83 78 UNLOCK-RECORD VALUE X'0F'. 84 85 01 FCD-AREA. @@ -5299,7 +5342,7 @@ run_file.at-10153-prog.cob:86.11-86.23: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -run_file.at-10153-prog.cob:155.16-155.22: +run_file.at-10308-prog.cob:155.16-155.22: 152 SET FCD-FILENAME-ADDRESS TO ADDRESS OF FILE-NAME 153 SET FCD-KEY-DEF-ADDRESS TO ADDRESS OF KEY-DEF-AREA 154 MOVE 16 TO FCD-FS-FLAGS @@ -5309,7 +5352,7 @@ run_file.at-10153-prog.cob:155.16-155.22: 157 MOVE LENGTH OF PRIME-KEY TO COMPONENT-LENGTH >> Error: Invalid syntax -run_file.at-10153-prog.cob:157.16-157.22: +run_file.at-10308-prog.cob:157.16-157.22: 154 MOVE 16 TO FCD-FS-FLAGS 155 MOVE LENGTH OF RECORD-AREA TO FCD-CURRENT-REC-LEN 156 MOVE 1 TO NUMBER-OF-KEYS @@ -5319,9 +5362,9 @@ run_file.at-10153-prog.cob:157.16-157.22: 159 MOVE 0 TO FCD-LOCK-MODE >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:10152:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:10488:0 -run_file.at-10488-prog.cob:97.11-97.23: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:10307:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:10643:0 +run_file.at-10643-prog.cob:97.11-97.23: 94 78 ADD-KEY-VALUE VALUE X'09'. 95 78 UNLOCK-RECORD VALUE X'0F'. 96 01 FCD-AREA. @@ -5333,8 +5376,8 @@ run_file.at-10488-prog.cob:97.11-97.23: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -Considering: import/gnucobol/tests/testsuite.src/run_file.at:10488:0 -run_file.at-10488-progs.cob:2.6-2.19: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:10643:0 +run_file.at-10643-progs.cob:2.6-2.19: 1 2 > $SET ODOSLIDE ---- ^^^^^^^^^^^^^ @@ -5342,8 +5385,8 @@ run_file.at-10488-progs.cob:2.6-2.19: 4 IDENTIFICATION DIVISION. >> Warning: Ignored compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_file.at:10676:0 -run_file.at-10676-prog.cob:86.12-86.24: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:10831:0 +run_file.at-10831-prog.cob:86.12-86.24: 83 78 UNLOCK-RECORD VALUE X'0F'. 84 85 01 FCD-AREA. @@ -5355,7 +5398,7 @@ run_file.at-10676-prog.cob:86.12-86.24: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -run_file.at-10676-prog.cob:134.16-134.22: +run_file.at-10831-prog.cob:134.16-134.22: 131 ** FIXED(0) OR VARIABLE(1) 132 MOVE 0 TO FCD-RECORDING-MODE 133 SET FCD-FILENAME-ADDRESS TO ADDRESS OF FILE-NAME @@ -5365,7 +5408,7 @@ run_file.at-10676-prog.cob:134.16-134.22: 136 MOVE LENGTH OF RECORD-AREA TO FCD-CURRENT-REC-LEN >> Error: Invalid syntax -run_file.at-10676-prog.cob:135.16-135.22: +run_file.at-10831-prog.cob:135.16-135.22: 132 MOVE 0 TO FCD-RECORDING-MODE 133 SET FCD-FILENAME-ADDRESS TO ADDRESS OF FILE-NAME 134 MOVE LENGTH OF RECORD-AREA TO FCD-MIN-REC-LENGTH @@ -5375,7 +5418,7 @@ run_file.at-10676-prog.cob:135.16-135.22: 137 PERFORM A-200-CALL-EXTFH. >> Error: Invalid syntax -run_file.at-10676-prog.cob:136.16-136.22: +run_file.at-10831-prog.cob:136.16-136.22: 133 SET FCD-FILENAME-ADDRESS TO ADDRESS OF FILE-NAME 134 MOVE LENGTH OF RECORD-AREA TO FCD-MIN-REC-LENGTH 135 MOVE LENGTH OF RECORD-AREA TO FCD-MAX-REC-LENGTH @@ -5385,8 +5428,8 @@ run_file.at-10676-prog.cob:136.16-136.22: 138 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:10835:0 -run_file.at-10835-prog.cob:45.11-45.30: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:10990:0 +run_file.at-10990-prog.cob:45.11-45.30: 42 78 OP-CLOSE VALUE X"fa80". 43 44 01 FCD. @@ -5398,8 +5441,8 @@ run_file.at-10835-prog.cob:45.11-45.30: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -Considering: import/gnucobol/tests/testsuite.src/run_file.at:11193:0 -run_file.at-11193-prog.cob:15.50: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:11348:0 +run_file.at-11348-prog.cob:15.50: 12 01 I PIC XX COMP-X. 13 14 01 WS-FCD-DDNAME PIC X(10) VALUE SPACES. @@ -5409,7 +5452,7 @@ run_file.at-11193-prog.cob:15.50: 17 01 WS-FCD-SIZE PIC 9(04) VALUE 0 COMP-5. >> Hint: Missing -run_file.at-11193-prog.cob:15.51-15.55: +run_file.at-11348-prog.cob:15.51-15.55: 12 01 I PIC XX COMP-X. 13 14 01 WS-FCD-DDNAME PIC X(10) VALUE SPACES. @@ -5419,7 +5462,7 @@ run_file.at-11193-prog.cob:15.51-15.55: 17 01 WS-FCD-SIZE PIC 9(04) VALUE 0 COMP-5. >> Error: Invalid syntax -run_file.at-11193-prog.cob:72.52-72.53: +run_file.at-11348-prog.cob:72.52-72.53: 69 78 fcd--dup-prime-access value 1. 70 78 fcd--random-access value 4. 71 78 fcd--dynamic-access value 8. @@ -5429,7 +5472,7 @@ run_file.at-11193-prog.cob:72.52-72.53: 74 78 fcd--open-input value 0. >> Error: Invalid syntax -run_file.at-11193-prog.cob:88.52-88.53: +run_file.at-11348-prog.cob:88.52-88.53: 85 05 FCD-TRANS-LOG PIC 9(2) COMP-X. 86 05 FILLER PIC X(1). 87 05 FCD-LOCK-MODE PIC 9(2) COMP-X. @@ -5439,7 +5482,7 @@ run_file.at-11193-prog.cob:88.52-88.53: 90 78 fcd--retry-open-bit value h"20". >> Error: Invalid syntax -run_file.at-11193-prog.cob:89.52-89.53: +run_file.at-11348-prog.cob:89.52-89.53: 86 05 FILLER PIC X(1). 87 05 FCD-LOCK-MODE PIC 9(2) COMP-X. 88 78 fcd--multilock-bit value h"80". @@ -5449,7 +5492,7 @@ run_file.at-11193-prog.cob:89.52-89.53: 91 78 fcd--skip-lock-bit value h"10". >> Error: Invalid syntax -run_file.at-11193-prog.cob:90.52-90.53: +run_file.at-11348-prog.cob:90.52-90.53: 87 05 FCD-LOCK-MODE PIC 9(2) COMP-X. 88 78 fcd--multilock-bit value h"80". 89 78 fcd--writelock-bit value h"40". @@ -5459,7 +5502,7 @@ run_file.at-11193-prog.cob:90.52-90.53: 92 78 fcd--retry-lock-bit value h"08". >> Error: Invalid syntax -run_file.at-11193-prog.cob:91.52-91.53: +run_file.at-11348-prog.cob:91.52-91.53: 88 78 fcd--multilock-bit value h"80". 89 78 fcd--writelock-bit value h"40". 90 78 fcd--retry-open-bit value h"20". @@ -5469,7 +5512,7 @@ run_file.at-11193-prog.cob:91.52-91.53: 93 78 fcd--manual-lock-bit value h"04". >> Error: Invalid syntax -run_file.at-11193-prog.cob:92.52-92.53: +run_file.at-11348-prog.cob:92.52-92.53: 89 78 fcd--writelock-bit value h"40". 90 78 fcd--retry-open-bit value h"20". 91 78 fcd--skip-lock-bit value h"10". @@ -5479,7 +5522,7 @@ run_file.at-11193-prog.cob:92.52-92.53: 94 78 fcd--auto-lock-bit value h"02". >> Error: Invalid syntax -run_file.at-11193-prog.cob:93.52-93.53: +run_file.at-11348-prog.cob:93.52-93.53: 90 78 fcd--retry-open-bit value h"20". 91 78 fcd--skip-lock-bit value h"10". 92 78 fcd--retry-lock-bit value h"08". @@ -5489,7 +5532,7 @@ run_file.at-11193-prog.cob:93.52-93.53: 95 78 fcd--exclusive-bit value h"01". >> Error: Invalid syntax -run_file.at-11193-prog.cob:94.52-94.53: +run_file.at-11348-prog.cob:94.52-94.53: 91 78 fcd--skip-lock-bit value h"10". 92 78 fcd--retry-lock-bit value h"08". 93 78 fcd--manual-lock-bit value h"04". @@ -5499,7 +5542,7 @@ run_file.at-11193-prog.cob:94.52-94.53: 96 78 fcd--sharing-bits >> Error: Invalid syntax -run_file.at-11193-prog.cob:95.52-95.53: +run_file.at-11348-prog.cob:95.52-95.53: 92 78 fcd--retry-lock-bit value h"08". 93 78 fcd--manual-lock-bit value h"04". 94 78 fcd--auto-lock-bit value h"02". @@ -5509,7 +5552,7 @@ run_file.at-11193-prog.cob:95.52-95.53: 97 value fcd--manual-lock-bit + fcd--auto-lock-bit. >> Error: Invalid syntax -run_file.at-11193-prog.cob:97.18: +run_file.at-11348-prog.cob:97.18: 94 78 fcd--auto-lock-bit value h"02". 95 78 fcd--exclusive-bit value h"01". 96 78 fcd--sharing-bits @@ -5519,7 +5562,7 @@ run_file.at-11193-prog.cob:97.18: 99 78 fcd--optional-file value h"80". >> Hint: Missing -run_file.at-11193-prog.cob:97.19-97.39: +run_file.at-11348-prog.cob:97.19-97.39: 94 78 fcd--auto-lock-bit value h"02". 95 78 fcd--exclusive-bit value h"01". 96 78 fcd--sharing-bits @@ -5529,7 +5572,7 @@ run_file.at-11193-prog.cob:97.19-97.39: 99 78 fcd--optional-file value h"80". >> Error: Invalid syntax -run_file.at-11193-prog.cob:99.52-99.53: +run_file.at-11348-prog.cob:99.52-99.53: 96 78 fcd--sharing-bits 97 value fcd--manual-lock-bit + fcd--auto-lock-bit. 98 05 FCD-OTHER-FLAGS PIC 9(2) COMP-X. @@ -5539,7 +5582,7 @@ run_file.at-11193-prog.cob:99.52-99.53: 101 78 fcd--not-optional value h"20". >> Error: Invalid syntax -run_file.at-11193-prog.cob:100.52-100.53: +run_file.at-11348-prog.cob:100.52-100.53: 97 value fcd--manual-lock-bit + fcd--auto-lock-bit. 98 05 FCD-OTHER-FLAGS PIC 9(2) COMP-X. 99 78 fcd--optional-file value h"80". @@ -5549,7 +5592,7 @@ run_file.at-11193-prog.cob:100.52-100.53: 102 78 fcd--external-name value h"10". >> Error: Invalid syntax -run_file.at-11193-prog.cob:101.52-101.53: +run_file.at-11348-prog.cob:101.52-101.53: 98 05 FCD-OTHER-FLAGS PIC 9(2) COMP-X. 99 78 fcd--optional-file value h"80". 100 78 fcd--nodetectlock-input value h"40". @@ -5559,7 +5602,7 @@ run_file.at-11193-prog.cob:101.52-101.53: 103 78 fcd--get-info value h"08". >> Error: Invalid syntax -run_file.at-11193-prog.cob:102.52-102.53: +run_file.at-11348-prog.cob:102.52-102.53: 99 78 fcd--optional-file value h"80". 100 78 fcd--nodetectlock-input value h"40". 101 78 fcd--not-optional value h"20". @@ -5569,7 +5612,7 @@ run_file.at-11193-prog.cob:102.52-102.53: 104 78 fcd--nodetectlock value h"04". >> Error: Invalid syntax -run_file.at-11193-prog.cob:103.52-103.53: +run_file.at-11348-prog.cob:103.52-103.53: 100 78 fcd--nodetectlock-input value h"40". 101 78 fcd--not-optional value h"20". 102 78 fcd--external-name value h"10". @@ -5579,7 +5622,7 @@ run_file.at-11193-prog.cob:103.52-103.53: 105 78 fcd--multiple-reel value h"02". >> Error: Invalid syntax -run_file.at-11193-prog.cob:104.52-104.53: +run_file.at-11348-prog.cob:104.52-104.53: 101 78 fcd--not-optional value h"20". 102 78 fcd--external-name value h"10". 103 78 fcd--get-info value h"08". @@ -5589,7 +5632,7 @@ run_file.at-11193-prog.cob:104.52-104.53: 106 78 fcd--line-advancing value h"01". >> Error: Invalid syntax -run_file.at-11193-prog.cob:105.52-105.53: +run_file.at-11348-prog.cob:105.52-105.53: 102 78 fcd--external-name value h"10". 103 78 fcd--get-info value h"08". 104 78 fcd--nodetectlock value h"04". @@ -5599,7 +5642,7 @@ run_file.at-11193-prog.cob:105.52-105.53: 107 78 fcd--special-sequential >> Error: Invalid syntax -run_file.at-11193-prog.cob:106.52-106.53: +run_file.at-11348-prog.cob:106.52-106.53: 103 78 fcd--get-info value h"08". 104 78 fcd--nodetectlock value h"04". 105 78 fcd--multiple-reel value h"02". @@ -5609,7 +5652,7 @@ run_file.at-11193-prog.cob:106.52-106.53: 108 value fcd--optional-file >> Error: Invalid syntax -run_file.at-11193-prog.cob:108.18: +run_file.at-11348-prog.cob:108.18: 105 78 fcd--multiple-reel value h"02". 106 78 fcd--line-advancing value h"01". 107 78 fcd--special-sequential @@ -5619,7 +5662,7 @@ run_file.at-11193-prog.cob:108.18: 110 05 FILLER PIC X(2). >> Hint: Missing -run_file.at-11193-prog.cob:108.19-108.37: +run_file.at-11348-prog.cob:108.19-108.37: 105 78 fcd--multiple-reel value h"02". 106 78 fcd--line-advancing value h"01". 107 78 fcd--special-sequential @@ -5629,7 +5672,7 @@ run_file.at-11193-prog.cob:108.19-108.37: 110 05 FILLER PIC X(2). >> Error: Invalid syntax -run_file.at-11193-prog.cob:153.52-153.53: +run_file.at-11348-prog.cob:153.52-153.53: 150 05 FCD-ADDITIONAL-STATUS REDEFINES FCD-BLOCKING 151 PIC X COMP-X. 152 05 FCD-LOCKTYPES PIC 99 COMP-X. @@ -5639,7 +5682,7 @@ run_file.at-11193-prog.cob:153.52-153.53: 155 78 fcd--separate-lock-file value h"20". >> Error: Invalid syntax -run_file.at-11193-prog.cob:154.52-154.53: +run_file.at-11348-prog.cob:154.52-154.53: 151 PIC X COMP-X. 152 05 FCD-LOCKTYPES PIC 99 COMP-X. 153 78 fcd--interlang-locking value h"80". @@ -5649,7 +5692,7 @@ run_file.at-11193-prog.cob:154.52-154.53: 156 78 fcd--single-open value h"10". >> Error: Invalid syntax -run_file.at-11193-prog.cob:155.52-155.53: +run_file.at-11348-prog.cob:155.52-155.53: 152 05 FCD-LOCKTYPES PIC 99 COMP-X. 153 78 fcd--interlang-locking value h"80". 154 78 fcd--allow-readers value h"40". @@ -5659,7 +5702,7 @@ run_file.at-11193-prog.cob:155.52-155.53: 157 78 fcd--nfs-file-lock value h"08". >> Error: Invalid syntax -run_file.at-11193-prog.cob:156.52-156.53: +run_file.at-11348-prog.cob:156.52-156.53: 153 78 fcd--interlang-locking value h"80". 154 78 fcd--allow-readers value h"40". 155 78 fcd--separate-lock-file value h"20". @@ -5669,7 +5712,7 @@ run_file.at-11193-prog.cob:156.52-156.53: 158 78 fcd--nfs-file-lock-hp value h"04". >> Error: Invalid syntax -run_file.at-11193-prog.cob:157.52-157.53: +run_file.at-11348-prog.cob:157.52-157.53: 154 78 fcd--allow-readers value h"40". 155 78 fcd--separate-lock-file value h"20". 156 78 fcd--single-open value h"10". @@ -5679,7 +5722,7 @@ run_file.at-11193-prog.cob:157.52-157.53: 159 78 fcd--nfs-file-locks >> Error: Invalid syntax -run_file.at-11193-prog.cob:158.52-158.53: +run_file.at-11348-prog.cob:158.52-158.53: 155 78 fcd--separate-lock-file value h"20". 156 78 fcd--single-open value h"10". 157 78 fcd--nfs-file-lock value h"08". @@ -5689,7 +5732,7 @@ run_file.at-11193-prog.cob:158.52-158.53: 160 value fcd--nfs-file-lock + fcd--nfs-file-lock-hp. >> Error: Invalid syntax -run_file.at-11193-prog.cob:160.18: +run_file.at-11348-prog.cob:160.18: 157 78 fcd--nfs-file-lock value h"08". 158 78 fcd--nfs-file-lock-hp value h"04". 159 78 fcd--nfs-file-locks @@ -5699,7 +5742,7 @@ run_file.at-11193-prog.cob:160.18: 162 05 FCD-CONFIG-FLAGS PIC 99 COMP-X. >> Hint: Missing -run_file.at-11193-prog.cob:160.19-160.37: +run_file.at-11348-prog.cob:160.19-160.37: 157 78 fcd--nfs-file-lock value h"08". 158 78 fcd--nfs-file-lock-hp value h"04". 159 78 fcd--nfs-file-locks @@ -5709,7 +5752,7 @@ run_file.at-11193-prog.cob:160.19-160.37: 162 05 FCD-CONFIG-FLAGS PIC 99 COMP-X. >> Error: Invalid syntax -run_file.at-11193-prog.cob:212.15-212.21: +run_file.at-11348-prog.cob:212.15-212.21: 209 210 MOVE "TESTOUT" TO WS-FCD-DDNAME 211 @@ -5719,8 +5762,8 @@ run_file.at-11193-prog.cob:212.15-212.21: 214 DISPLAY "Writing " WS-FCD-DDNAME '.'. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:11230:0 -run_file.at-11230-reference:3.6-3.7: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:11385:0 +run_file.at-11385-reference:3.6-3.7: 1 1 2 2 3 > 3 Have a great day @@ -5729,7 +5772,7 @@ run_file.at-11230-reference:3.6-3.7: 5 5 Have a great day >> Error: Unexpected indicator: `v' -run_file.at-11230-reference:3.7-3.8: +run_file.at-11385-reference:3.7-3.8: 1 1 2 2 3 > 3 Have a great day @@ -5738,7 +5781,7 @@ run_file.at-11230-reference:3.7-3.8: 5 5 Have a great day >> Error: Invalid syntax -run_file.at-11230-reference:5.6-5.7: +run_file.at-11385-reference:5.6-5.7: 2 2 3 3 Have a great day 4 4 @@ -5748,7 +5791,7 @@ run_file.at-11230-reference:5.6-5.7: 7 7 >> Error: Unexpected indicator: `v' -run_file.at-11230-reference:8.6-8.7: +run_file.at-11385-reference:8.6-8.7: 5 5 Have a great day 6 6 7 7 @@ -5758,8 +5801,8 @@ run_file.at-11230-reference:8.6-8.7: 10 10 >> Error: Unexpected indicator: `j' -Considering: import/gnucobol/tests/testsuite.src/run_file.at:11443:0 -run_file.at-11443-prog.cob:9.34-9.42: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:11598:0 +run_file.at-11598-prog.cob:9.34-9.42: 6 7 INPUT-OUTPUT SECTION. 8 FILE-CONTROL. @@ -5769,7 +5812,7 @@ run_file.at-11443-prog.cob:9.34-9.42: 11 ACCESS IS SEQUENTIAL >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-11443-prog.cob:57.54: +run_file.at-11598-prog.cob:57.54: 54 05 FILLER PIC X(8) VALUE "FOR00000". 55 56 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -5779,7 +5822,7 @@ run_file.at-11443-prog.cob:57.54: 59 >> Hint: Missing -run_file.at-11443-prog.cob:57.55-57.62: +run_file.at-11598-prog.cob:57.55-57.62: 54 05 FILLER PIC X(8) VALUE "FOR00000". 55 56 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -5789,7 +5832,7 @@ run_file.at-11443-prog.cob:57.55-57.62: 59 >> Error: Invalid syntax -run_file.at-11443-prog.cob:67.55: +run_file.at-11598-prog.cob:67.55: 64 05 FILLER PIC X(25) VALUE "EPSILON EQUIPMENT SUPPLY ". 65 05 FILLER PIC X(25) VALUE "FORTUNE COOKIE COMPANY ". 66 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -5799,7 +5842,7 @@ run_file.at-11443-prog.cob:67.55: 69 >> Hint: Missing -run_file.at-11443-prog.cob:67.56-67.63: +run_file.at-11598-prog.cob:67.56-67.63: 64 05 FILLER PIC X(25) VALUE "EPSILON EQUIPMENT SUPPLY ". 65 05 FILLER PIC X(25) VALUE "FORTUNE COOKIE COMPANY ". 66 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -5809,7 +5852,7 @@ run_file.at-11443-prog.cob:67.56-67.63: 69 >> Error: Invalid syntax -run_file.at-11443-prog.cob:78.55: +run_file.at-11598-prog.cob:78.55: 75 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 76 77 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL @@ -5819,7 +5862,7 @@ run_file.at-11443-prog.cob:78.55: 80 02 DATA-NO-TERMINALS-TBL. >> Hint: Missing -run_file.at-11443-prog.cob:78.56-78.63: +run_file.at-11598-prog.cob:78.56-78.63: 75 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 76 77 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL @@ -5829,7 +5872,7 @@ run_file.at-11443-prog.cob:78.56-78.63: 80 02 DATA-NO-TERMINALS-TBL. >> Error: Invalid syntax -run_file.at-11443-prog.cob:90.61: +run_file.at-11598-prog.cob:90.61: 87 05 FILLER PIC 9(3) COMP-3 VALUE 254. 88 89 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -5839,7 +5882,7 @@ run_file.at-11443-prog.cob:90.61: 92 05 SUB BINARY-SHORT UNSIGNED. >> Hint: Missing -run_file.at-11443-prog.cob:90.62-90.69: +run_file.at-11598-prog.cob:90.62-90.69: 87 05 FILLER PIC 9(3) COMP-3 VALUE 254. 88 89 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -5849,8 +5892,8 @@ run_file.at-11443-prog.cob:90.62-90.69: 92 05 SUB BINARY-SHORT UNSIGNED. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:12161:0 -run_file.at-12161-prog.cob:12.21-12.29: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12316:0 +run_file.at-12316-prog.cob:12.21-12.29: 9 INPUT-OUTPUT SECTION. 10 FILE-CONTROL. 11 SELECT TSPFILE @@ -5860,7 +5903,7 @@ run_file.at-12161-prog.cob:12.21-12.29: 14 RECORD KEY IS CM-CUST-NUM >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-12161-prog.cob:84.54: +run_file.at-12316-prog.cob:84.54: 81 05 FILLER PIC X(8) VALUE "PRE00000". 82 83 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -5870,7 +5913,7 @@ run_file.at-12161-prog.cob:84.54: 86 >> Hint: Missing -run_file.at-12161-prog.cob:84.55-84.62: +run_file.at-12316-prog.cob:84.55-84.62: 81 05 FILLER PIC X(8) VALUE "PRE00000". 82 83 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -5880,7 +5923,7 @@ run_file.at-12161-prog.cob:84.55-84.62: 86 >> Error: Invalid syntax -run_file.at-12161-prog.cob:105.55: +run_file.at-12316-prog.cob:105.55: 102 05 FILLER PIC X(25) VALUE "PRESTIGE OFFICE FURNITURE". 103 104 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -5890,7 +5933,7 @@ run_file.at-12161-prog.cob:105.55: 107 >> Hint: Missing -run_file.at-12161-prog.cob:105.56-105.63: +run_file.at-12316-prog.cob:105.56-105.63: 102 05 FILLER PIC X(25) VALUE "PRESTIGE OFFICE FURNITURE". 103 104 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -5900,7 +5943,7 @@ run_file.at-12161-prog.cob:105.56-105.63: 107 >> Error: Invalid syntax -run_file.at-12161-prog.cob:126.55: +run_file.at-12316-prog.cob:126.55: 123 05 FILLER PIC X(25) VALUE "114A MAPLE GROVE ". 124 125 02 DATA-ADDRESS-1 REDEFINES DATA-ADDRESS-1-TBL @@ -5910,7 +5953,7 @@ run_file.at-12161-prog.cob:126.55: 128 >> Hint: Missing -run_file.at-12161-prog.cob:126.56-126.63: +run_file.at-12316-prog.cob:126.56-126.63: 123 05 FILLER PIC X(25) VALUE "114A MAPLE GROVE ". 124 125 02 DATA-ADDRESS-1 REDEFINES DATA-ADDRESS-1-TBL @@ -5920,7 +5963,7 @@ run_file.at-12161-prog.cob:126.56-126.63: 128 >> Error: Invalid syntax -run_file.at-12161-prog.cob:147.55: +run_file.at-12316-prog.cob:147.55: 144 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 145 146 02 DATA-ADDRESS-2 REDEFINES DATA-ADDRESS-2-TBL @@ -5930,7 +5973,7 @@ run_file.at-12161-prog.cob:147.55: 149 >> Hint: Missing -run_file.at-12161-prog.cob:147.56-147.63: +run_file.at-12316-prog.cob:147.56-147.63: 144 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 145 146 02 DATA-ADDRESS-2 REDEFINES DATA-ADDRESS-2-TBL @@ -5940,7 +5983,7 @@ run_file.at-12161-prog.cob:147.56-147.63: 149 >> Error: Invalid syntax -run_file.at-12161-prog.cob:168.55: +run_file.at-12316-prog.cob:168.55: 165 05 FILLER PIC X(10) VALUE "N.Y. ". 166 167 02 DATA-ADDRESS-3 REDEFINES DATA-ADDRESS-3-TBL @@ -5950,7 +5993,7 @@ run_file.at-12161-prog.cob:168.55: 170 >> Hint: Missing -run_file.at-12161-prog.cob:168.56-168.63: +run_file.at-12316-prog.cob:168.56-168.63: 165 05 FILLER PIC X(10) VALUE "N.Y. ". 166 167 02 DATA-ADDRESS-3 REDEFINES DATA-ADDRESS-3-TBL @@ -5960,7 +6003,7 @@ run_file.at-12161-prog.cob:168.56-168.63: 170 >> Error: Invalid syntax -run_file.at-12161-prog.cob:189.55: +run_file.at-12316-prog.cob:189.55: 186 05 FILLER PIC 9(10) VALUE 4169898509. 187 188 02 DATA-TELEPHONE REDEFINES DATA-TELEPHONE-TBL @@ -5970,7 +6013,7 @@ run_file.at-12161-prog.cob:189.55: 191 >> Hint: Missing -run_file.at-12161-prog.cob:189.56-189.63: +run_file.at-12316-prog.cob:189.56-189.63: 186 05 FILLER PIC 9(10) VALUE 4169898509. 187 188 02 DATA-TELEPHONE REDEFINES DATA-TELEPHONE-TBL @@ -5980,7 +6023,7 @@ run_file.at-12161-prog.cob:189.56-189.63: 191 >> Error: Invalid syntax -run_file.at-12161-prog.cob:210.55: +run_file.at-12316-prog.cob:210.55: 207 05 FILLER PIC X(20) VALUE "MR. THOMAS JEFFERSON". 208 209 02 DATA-DP-MGR REDEFINES DATA-DP-MGR-TBL @@ -5990,7 +6033,7 @@ run_file.at-12161-prog.cob:210.55: 212 >> Hint: Missing -run_file.at-12161-prog.cob:210.56-210.63: +run_file.at-12316-prog.cob:210.56-210.63: 207 05 FILLER PIC X(20) VALUE "MR. THOMAS JEFFERSON". 208 209 02 DATA-DP-MGR REDEFINES DATA-DP-MGR-TBL @@ -6000,7 +6043,7 @@ run_file.at-12161-prog.cob:210.56-210.63: 212 >> Error: Invalid syntax -run_file.at-12161-prog.cob:231.54: +run_file.at-12316-prog.cob:231.54: 228 05 FILLER PIC X(8) VALUE "UNI-9040". 229 230 02 DATA-MACHINE REDEFINES DATA-MACHINE-TBL @@ -6010,7 +6053,7 @@ run_file.at-12161-prog.cob:231.54: 233 >> Hint: Missing -run_file.at-12161-prog.cob:231.55-231.62: +run_file.at-12316-prog.cob:231.55-231.62: 228 05 FILLER PIC X(8) VALUE "UNI-9040". 229 230 02 DATA-MACHINE REDEFINES DATA-MACHINE-TBL @@ -6020,7 +6063,7 @@ run_file.at-12161-prog.cob:231.55-231.62: 233 >> Error: Invalid syntax -run_file.at-12161-prog.cob:252.61: +run_file.at-12316-prog.cob:252.61: 249 05 FILLER PIC 9(3) COMP-3 VALUE 86. 250 251 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -6030,7 +6073,7 @@ run_file.at-12161-prog.cob:252.61: 254 78 REC-MAX VALUE MAX-SUB. >> Hint: Missing -run_file.at-12161-prog.cob:252.62-252.69: +run_file.at-12316-prog.cob:252.62-252.69: 249 05 FILLER PIC 9(3) COMP-3 VALUE 86. 250 251 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -6040,7 +6083,7 @@ run_file.at-12161-prog.cob:252.62-252.69: 254 78 REC-MAX VALUE MAX-SUB. >> Error: Invalid syntax -run_file.at-12161-prog.cob:254.43: +run_file.at-12316-prog.cob:254.43: 251 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL 252 PIC 9(3) COMP-3 OCCURS MAX-SUB. 253 @@ -6050,7 +6093,7 @@ run_file.at-12161-prog.cob:254.43: 256 05 REC-NUM BINARY-SHORT UNSIGNED VALUE 0. >> Hint: Missing -run_file.at-12161-prog.cob:254.44-254.51: +run_file.at-12316-prog.cob:254.44-254.51: 251 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL 252 PIC 9(3) COMP-3 OCCURS MAX-SUB. 253 @@ -6060,22 +6103,22 @@ run_file.at-12161-prog.cob:254.44-254.51: 256 05 REC-NUM BINARY-SHORT UNSIGNED VALUE 0. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:12281:0 -run_file.at-12281-reference:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12436:0 +run_file.at-12436-reference:1.6-1.7: 1 > Loading sample data file. ---- ^ 2 Sample data file load complete. 3 List sample data file >> Error: Unexpected indicator: `g' -run_file.at-12281-reference:1.8-1.14: +run_file.at-12436-reference:1.8-1.14: 1 > Loading sample data file. ---- ^^^^^^ 2 Sample data file load complete. 3 List sample data file >> Error: Invalid syntax -run_file.at-12281-reference:3.6-3.7: +run_file.at-12436-reference:3.6-3.7: 1 Loading sample data file. 2 Sample data file load complete. 3 > List sample data file @@ -6084,7 +6127,7 @@ run_file.at-12281-reference:3.6-3.7: 5 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . >> Error: Unexpected indicator: `a' -run_file.at-12281-reference:4.6-4.7: +run_file.at-12436-reference:4.6-4.7: 1 Loading sample data file. 2 Sample data file load complete. 3 List sample data file @@ -6094,7 +6137,7 @@ run_file.at-12281-reference:4.6-4.7: 6 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. >> Error: Unexpected indicator: `L' -run_file.at-12281-reference:5.6-5.7: +run_file.at-12436-reference:5.6-5.7: 2 Sample data file load complete. 3 List sample data file 4 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=8417 . @@ -6104,7 +6147,7 @@ run_file.at-12281-reference:5.6-5.7: 7 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. >> Error: Unexpected indicator: `E' -run_file.at-12281-reference:6.6-6.7: +run_file.at-12436-reference:6.6-6.7: 3 List sample data file 4 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=8417 . 5 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . @@ -6114,7 +6157,7 @@ run_file.at-12281-reference:6.6-6.7: 8 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=8470 . >> Error: Unexpected indicator: `E' -run_file.at-12281-reference:7.6-7.7: +run_file.at-12436-reference:7.6-7.7: 4 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD. Disk=8417 . 5 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . 6 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. @@ -6124,7 +6167,7 @@ run_file.at-12281-reference:7.6-7.7: 9 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . >> Error: Unexpected indicator: `P' -run_file.at-12281-reference:8.6-8.7: +run_file.at-12436-reference:8.6-8.7: 5 Key: BET00000 is BETA SHOE MFG. INC. Disk=8470 . 6 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. 7 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. @@ -6134,7 +6177,7 @@ run_file.at-12281-reference:8.6-8.7: 10 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . >> Error: Unexpected indicator: `O' -run_file.at-12281-reference:9.6-9.7: +run_file.at-12436-reference:9.6-9.7: 6 Key: DEL00000 is DELTA LUGGAGE REPAIRS Disk=********. 7 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. 8 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=8470 . @@ -6144,7 +6187,7 @@ run_file.at-12281-reference:9.6-9.7: 11 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. >> Error: Unexpected indicator: `A' -run_file.at-12281-reference:10.6-10.7: +run_file.at-12436-reference:10.6-10.7: 7 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY Disk=********. 8 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=8470 . 9 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . @@ -6154,7 +6197,7 @@ run_file.at-12281-reference:10.6-10.7: 12 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . >> Error: Unexpected indicator: `I' -run_file.at-12281-reference:11.6-11.7: +run_file.at-12436-reference:11.6-11.7: 8 Key: FOR00000 is FORTUNE COOKIE COMPANY Disk=8470 . 9 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . 10 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . @@ -6164,7 +6207,7 @@ run_file.at-12281-reference:11.6-11.7: 13 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . >> Error: Unexpected indicator: `&' -run_file.at-12281-reference:12.6-12.7: +run_file.at-12436-reference:12.6-12.7: 9 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY Disk=8417 . 10 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . 11 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. @@ -6174,7 +6217,7 @@ run_file.at-12281-reference:12.6-12.7: 14 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . >> Error: Unexpected indicator: `N' -run_file.at-12281-reference:13.6-13.7: +run_file.at-12436-reference:13.6-13.7: 10 Key: GIB00000 is GIBRALTER LIFE INSURANCE Disk=8417 . 11 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. 12 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . @@ -6184,7 +6227,7 @@ run_file.at-12281-reference:13.6-13.7: 15 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. >> Error: Unexpected indicator: `O' -run_file.at-12281-reference:14.6-14.7: +run_file.at-12436-reference:14.6-14.7: 11 Key: H&J00000 is H & J PLUMBING SUPPLIES Disk=********. 12 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . 13 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . @@ -6194,7 +6237,7 @@ run_file.at-12281-reference:14.6-14.7: 16 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . >> Error: Unexpected indicator: `O' -run_file.at-12281-reference:15.6-15.7: +run_file.at-12436-reference:15.6-15.7: 12 Key: INC00000 is INCREMENTAL BACKUP CORP. Disk=8417 . 13 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . 14 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . @@ -6204,7 +6247,7 @@ run_file.at-12281-reference:15.6-15.7: 17 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. >> Error: Unexpected indicator: `E' -run_file.at-12281-reference:16.6-16.7: +run_file.at-12436-reference:16.6-16.7: 13 Key: JOH00000 is JOHNSON BOATING SUPPLIES Disk=8417 . 14 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . 15 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. @@ -6214,7 +6257,7 @@ run_file.at-12281-reference:16.6-16.7: 18 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . >> Error: Unexpected indicator: `O' -run_file.at-12281-reference:17.6-17.7: +run_file.at-12436-reference:17.6-17.7: 14 Key: KON00000 is KONFLAB PLASTIC PRODUCTS. Disk=8417 . 15 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. 16 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . @@ -6224,7 +6267,7 @@ run_file.at-12281-reference:17.6-17.7: 19 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . >> Error: Unexpected indicator: `E' -run_file.at-12281-reference:18.6-18.7: +run_file.at-12436-reference:18.6-18.7: 15 Key: LEW00000 is LEWISTON GRAPHICS LTD. Disk=********. 16 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . 17 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. @@ -6234,7 +6277,7 @@ run_file.at-12281-reference:18.6-18.7: 20 Hit End of File >> Error: Unexpected indicator: `L' -run_file.at-12281-reference:19.6-19.7: +run_file.at-12436-reference:19.6-19.7: 16 Key: MOR00000 is MORNINGSIDE CARPENTRY. Disk=8470 . 17 Key: NEW00000 is NEW WAVE SURF SHOPS INC. Disk=********. 18 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . @@ -6244,7 +6287,7 @@ run_file.at-12281-reference:19.6-19.7: 21 List sample data file by Phone >> Error: Unexpected indicator: `R' -run_file.at-12281-reference:21.6-21.7: +run_file.at-12436-reference:21.6-21.7: 18 Key: OLD00000 is OLD TYME PIZZA MFG. CO. Disk=8470 . 19 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . 20 Hit End of File @@ -6254,7 +6297,7 @@ run_file.at-12281-reference:21.6-21.7: 23 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . >> Error: Unexpected indicator: `a' -run_file.at-12281-reference:22.6-22.7: +run_file.at-12436-reference:22.6-22.7: 19 Key: PRE00000 is PRESTIGE OFFICE FURNITURE Disk=8470 . 20 Hit End of File 21 List sample data file by Phone @@ -6264,7 +6307,7 @@ run_file.at-12281-reference:22.6-22.7: 24 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . >> Error: Unexpected indicator: `1' -run_file.at-12281-reference:23.6-23.7: +run_file.at-12436-reference:23.6-23.7: 20 Hit End of File 21 List sample data file by Phone 22 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. @@ -6274,7 +6317,7 @@ run_file.at-12281-reference:23.6-23.7: 25 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . >> Error: Unexpected indicator: `5' -run_file.at-12281-reference:24.6-24.7: +run_file.at-12436-reference:24.6-24.7: 21 List sample data file by Phone 22 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. 23 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . @@ -6284,7 +6327,7 @@ run_file.at-12281-reference:24.6-24.7: 26 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:25.6-25.7: +run_file.at-12436-reference:25.6-25.7: 22 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. 23 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . 24 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . @@ -6294,7 +6337,7 @@ run_file.at-12281-reference:25.6-25.7: 27 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:26.6-26.7: +run_file.at-12436-reference:26.6-26.7: 23 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . 24 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . 25 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . @@ -6304,7 +6347,7 @@ run_file.at-12281-reference:26.6-26.7: 28 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:27.6-27.7: +run_file.at-12436-reference:27.6-27.7: 24 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . 25 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . 26 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . @@ -6314,7 +6357,7 @@ run_file.at-12281-reference:27.6-27.7: 29 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:28.6-28.7: +run_file.at-12436-reference:28.6-28.7: 25 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . 26 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . 27 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. @@ -6324,7 +6367,7 @@ run_file.at-12281-reference:28.6-28.7: 30 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . >> Error: Unexpected indicator: `2' -run_file.at-12281-reference:29.6-29.7: +run_file.at-12436-reference:29.6-29.7: 26 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . 27 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. 28 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . @@ -6334,7 +6377,7 @@ run_file.at-12281-reference:29.6-29.7: 31 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:30.6-30.7: +run_file.at-12436-reference:30.6-30.7: 27 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. 28 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . 29 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . @@ -6344,7 +6387,7 @@ run_file.at-12281-reference:30.6-30.7: 32 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:31.6-31.7: +run_file.at-12436-reference:31.6-31.7: 28 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . 29 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . 30 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . @@ -6354,7 +6397,7 @@ run_file.at-12281-reference:31.6-31.7: 33 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:32.6-32.7: +run_file.at-12436-reference:32.6-32.7: 29 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . 30 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . 31 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . @@ -6364,7 +6407,7 @@ run_file.at-12281-reference:32.6-32.7: 34 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . >> Error: Unexpected indicator: `4' -run_file.at-12281-reference:33.6-33.7: +run_file.at-12436-reference:33.6-33.7: 30 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . 31 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . 32 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . @@ -6374,7 +6417,7 @@ run_file.at-12281-reference:33.6-33.7: 35 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:34.6-34.7: +run_file.at-12436-reference:34.6-34.7: 31 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . 32 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . 33 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. @@ -6384,7 +6427,7 @@ run_file.at-12281-reference:34.6-34.7: 36 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . >> Error: Unexpected indicator: `4' -run_file.at-12281-reference:35.6-35.7: +run_file.at-12436-reference:35.6-35.7: 32 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . 33 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. 34 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . @@ -6394,7 +6437,7 @@ run_file.at-12281-reference:35.6-35.7: 37 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:36.6-36.7: +run_file.at-12436-reference:36.6-36.7: 33 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. 34 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . 35 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . @@ -6404,7 +6447,7 @@ run_file.at-12281-reference:36.6-36.7: 38 Hit End of File >> Error: Unexpected indicator: `2' -run_file.at-12281-reference:37.6-37.7: +run_file.at-12436-reference:37.6-37.7: 34 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . 35 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . 36 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . @@ -6414,7 +6457,7 @@ run_file.at-12281-reference:37.6-37.7: 39 Test Read/Delete >> Error: Unexpected indicator: `7' -run_file.at-12281-reference:39.6-39.7: +run_file.at-12436-reference:39.6-39.7: 36 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . 37 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . 38 Hit End of File @@ -6424,7 +6467,7 @@ run_file.at-12281-reference:39.6-39.7: 41 Delete: ALP00000 random >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:40.6-40.7: +run_file.at-12436-reference:40.6-40.7: 37 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . 38 Hit End of File 39 Test Read/Delete @@ -6434,7 +6477,7 @@ run_file.at-12281-reference:40.6-40.7: 42 Read: BET00000 4169898509 >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:41.6-41.7: +run_file.at-12436-reference:41.6-41.7: 38 Hit End of File 39 Test Read/Delete 40 Delete: INC00000 random @@ -6444,7 +6487,7 @@ run_file.at-12281-reference:41.6-41.7: 43 Delete: PRE00000 random >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:43.6-43.7: +run_file.at-12436-reference:43.6-43.7: 40 Delete: INC00000 random 41 Delete: ALP00000 random 42 Read: BET00000 4169898509 @@ -6454,7 +6497,7 @@ run_file.at-12281-reference:43.6-43.7: 45 Initial: BET00000 4169898509 >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:44.6-44.7: +run_file.at-12436-reference:44.6-44.7: 41 Delete: ALP00000 random 42 Read: BET00000 4169898509 43 Delete: PRE00000 random @@ -6464,7 +6507,7 @@ run_file.at-12281-reference:44.6-44.7: 46 Initial: DEL00000 4169898509 >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:45.6-45.7: +run_file.at-12436-reference:45.6-45.7: 42 Read: BET00000 4169898509 43 Delete: PRE00000 random 44 Expected 10 after delete PRE00000 @@ -6474,7 +6517,7 @@ run_file.at-12281-reference:45.6-45.7: 47 Initial: MOR00000 4169898509 >> Error: Unexpected indicator: `l' -run_file.at-12281-reference:46.6-46.7: +run_file.at-12436-reference:46.6-46.7: 43 Delete: PRE00000 random 44 Expected 10 after delete PRE00000 45 Initial: BET00000 4169898509 @@ -6484,7 +6527,7 @@ run_file.at-12281-reference:46.6-46.7: 48 Initial: EPS00000 5292398745 >> Error: Unexpected indicator: `l' -run_file.at-12281-reference:47.6-47.7: +run_file.at-12436-reference:47.6-47.7: 44 Expected 10 after delete PRE00000 45 Initial: BET00000 4169898509 46 Initial: DEL00000 4169898509 @@ -6494,7 +6537,7 @@ run_file.at-12281-reference:47.6-47.7: 49 Start: BET00000 4169898509 >> Error: Unexpected indicator: `l' -run_file.at-12281-reference:48.6-48.7: +run_file.at-12436-reference:48.6-48.7: 45 Initial: BET00000 4169898509 46 Initial: DEL00000 4169898509 47 Initial: MOR00000 4169898509 @@ -6504,7 +6547,7 @@ run_file.at-12281-reference:48.6-48.7: 50 Next: DEL00000 4169898509 >> Error: Unexpected indicator: `l' -run_file.at-12281-reference:49.6-49.7: +run_file.at-12436-reference:49.6-49.7: 46 Initial: DEL00000 4169898509 47 Initial: MOR00000 4169898509 48 Initial: EPS00000 5292398745 @@ -6514,7 +6557,7 @@ run_file.at-12281-reference:49.6-49.7: 51 Delete: DEL00000 sequential >> Error: Unexpected indicator: `t' -run_file.at-12281-reference:50.6-50.7: +run_file.at-12436-reference:50.6-50.7: 47 Initial: MOR00000 4169898509 48 Initial: EPS00000 5292398745 49 Start: BET00000 4169898509 @@ -6524,7 +6567,7 @@ run_file.at-12281-reference:50.6-50.7: 52 Next: MOR00000 4169898509 >> Error: Unexpected indicator: `t' -run_file.at-12281-reference:51.6-51.7: +run_file.at-12436-reference:51.6-51.7: 48 Initial: EPS00000 5292398745 49 Start: BET00000 4169898509 50 Next: DEL00000 4169898509 @@ -6534,7 +6577,7 @@ run_file.at-12281-reference:51.6-51.7: 53 Next: EPS00000 5292398745 >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:52.6-52.7: +run_file.at-12436-reference:52.6-52.7: 49 Start: BET00000 4169898509 50 Next: DEL00000 4169898509 51 Delete: DEL00000 sequential @@ -6544,7 +6587,7 @@ run_file.at-12281-reference:52.6-52.7: 54 Delete: EPS00000 sequential >> Error: Unexpected indicator: `t' -run_file.at-12281-reference:53.6-53.7: +run_file.at-12436-reference:53.6-53.7: 50 Next: DEL00000 4169898509 51 Delete: DEL00000 sequential 52 Next: MOR00000 4169898509 @@ -6554,7 +6597,7 @@ run_file.at-12281-reference:53.6-53.7: 55 List sample data file by Phone >> Error: Unexpected indicator: `t' -run_file.at-12281-reference:54.6-54.7: +run_file.at-12436-reference:54.6-54.7: 51 Delete: DEL00000 sequential 52 Next: MOR00000 4169898509 53 Next: EPS00000 5292398745 @@ -6564,7 +6607,7 @@ run_file.at-12281-reference:54.6-54.7: 56 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:55.6-55.7: +run_file.at-12436-reference:55.6-55.7: 52 Next: MOR00000 4169898509 53 Next: EPS00000 5292398745 54 Delete: EPS00000 sequential @@ -6574,7 +6617,7 @@ run_file.at-12281-reference:55.6-55.7: 57 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . >> Error: Unexpected indicator: `a' -run_file.at-12281-reference:56.6-56.7: +run_file.at-12436-reference:56.6-56.7: 53 Next: EPS00000 5292398745 54 Delete: EPS00000 sequential 55 List sample data file by Phone @@ -6584,7 +6627,7 @@ run_file.at-12281-reference:56.6-56.7: 58 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:57.6-57.7: +run_file.at-12436-reference:57.6-57.7: 54 Delete: EPS00000 sequential 55 List sample data file by Phone 56 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . @@ -6594,7 +6637,7 @@ run_file.at-12281-reference:57.6-57.7: 59 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:58.6-58.7: +run_file.at-12436-reference:58.6-58.7: 55 List sample data file by Phone 56 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . 57 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . @@ -6604,7 +6647,7 @@ run_file.at-12281-reference:58.6-58.7: 60 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:59.6-59.7: +run_file.at-12436-reference:59.6-59.7: 56 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . 57 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . 58 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . @@ -6614,7 +6657,7 @@ run_file.at-12281-reference:59.6-59.7: 61 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:60.6-60.7: +run_file.at-12436-reference:60.6-60.7: 57 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . 58 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . 59 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . @@ -6624,7 +6667,7 @@ run_file.at-12281-reference:60.6-60.7: 62 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:61.6-61.7: +run_file.at-12436-reference:61.6-61.7: 58 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . 59 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . 60 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . @@ -6634,7 +6677,7 @@ run_file.at-12281-reference:61.6-61.7: 63 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . >> Error: Unexpected indicator: `4' -run_file.at-12281-reference:62.6-62.7: +run_file.at-12436-reference:62.6-62.7: 59 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . 60 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . 61 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . @@ -6644,7 +6687,7 @@ run_file.at-12281-reference:62.6-62.7: 64 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:63.6-63.7: +run_file.at-12436-reference:63.6-63.7: 60 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . 61 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . 62 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. @@ -6654,7 +6697,7 @@ run_file.at-12281-reference:63.6-63.7: 65 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . >> Error: Unexpected indicator: `4' -run_file.at-12281-reference:64.6-64.7: +run_file.at-12436-reference:64.6-64.7: 61 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . 62 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. 63 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . @@ -6664,7 +6707,7 @@ run_file.at-12281-reference:64.6-64.7: 66 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:65.6-65.7: +run_file.at-12436-reference:65.6-65.7: 62 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. 63 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . 64 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . @@ -6674,7 +6717,7 @@ run_file.at-12281-reference:65.6-65.7: 67 Hit End of File >> Error: Unexpected indicator: `2' -run_file.at-12281-reference:66.6-66.7: +run_file.at-12436-reference:66.6-66.7: 63 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . 64 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . 65 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . @@ -6684,7 +6727,7 @@ run_file.at-12281-reference:66.6-66.7: 68 List sample data file by Phone >> Error: Unexpected indicator: `7' -run_file.at-12281-reference:68.6-68.7: +run_file.at-12436-reference:68.6-68.7: 65 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . 66 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . 67 Hit End of File @@ -6694,7 +6737,7 @@ run_file.at-12281-reference:68.6-68.7: 70 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . >> Error: Unexpected indicator: `a' -run_file.at-12281-reference:69.6-69.7: +run_file.at-12436-reference:69.6-69.7: 66 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . 67 Hit End of File 68 List sample data file by Phone @@ -6704,7 +6747,7 @@ run_file.at-12281-reference:69.6-69.7: 71 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . >> Error: Unexpected indicator: `1' -run_file.at-12281-reference:70.6-70.7: +run_file.at-12436-reference:70.6-70.7: 67 Hit End of File 68 List sample data file by Phone 69 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. @@ -6714,7 +6757,7 @@ run_file.at-12281-reference:70.6-70.7: 72 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . >> Error: Unexpected indicator: `5' -run_file.at-12281-reference:71.6-71.7: +run_file.at-12436-reference:71.6-71.7: 68 List sample data file by Phone 69 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. 70 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . @@ -6724,7 +6767,7 @@ run_file.at-12281-reference:71.6-71.7: 73 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:72.6-72.7: +run_file.at-12436-reference:72.6-72.7: 69 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. 70 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . 71 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . @@ -6734,7 +6777,7 @@ run_file.at-12281-reference:72.6-72.7: 74 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:73.6-73.7: +run_file.at-12436-reference:73.6-73.7: 70 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . 71 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . 72 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . @@ -6744,7 +6787,7 @@ run_file.at-12281-reference:73.6-73.7: 75 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:74.6-74.7: +run_file.at-12436-reference:74.6-74.7: 71 Ph=4169898509 Key: BET00000 is BETA SHOE MFG. INC. . 72 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . 73 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . @@ -6754,7 +6797,7 @@ run_file.at-12281-reference:74.6-74.7: 76 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:75.6-75.7: +run_file.at-12436-reference:75.6-75.7: 72 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . 73 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . 74 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. @@ -6764,7 +6807,7 @@ run_file.at-12281-reference:75.6-75.7: 77 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . >> Error: Unexpected indicator: `2' -run_file.at-12281-reference:76.6-76.7: +run_file.at-12436-reference:76.6-76.7: 73 Ph=4169898509 Key: MOR00000 is MORNINGSIDE CARPENTRY. . 74 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. 75 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . @@ -6774,7 +6817,7 @@ run_file.at-12281-reference:76.6-76.7: 78 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:77.6-77.7: +run_file.at-12436-reference:77.6-77.7: 74 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. 75 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . 76 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . @@ -6784,7 +6827,7 @@ run_file.at-12281-reference:77.6-77.7: 79 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:78.6-78.7: +run_file.at-12436-reference:78.6-78.7: 75 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . 76 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . 77 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . @@ -6794,7 +6837,7 @@ run_file.at-12281-reference:78.6-78.7: 80 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:79.6-79.7: +run_file.at-12436-reference:79.6-79.7: 76 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . 77 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . 78 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . @@ -6804,7 +6847,7 @@ run_file.at-12281-reference:79.6-79.7: 81 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . >> Error: Unexpected indicator: `4' -run_file.at-12281-reference:80.6-80.7: +run_file.at-12436-reference:80.6-80.7: 77 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . 78 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . 79 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . @@ -6814,7 +6857,7 @@ run_file.at-12281-reference:80.6-80.7: 82 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:81.6-81.7: +run_file.at-12436-reference:81.6-81.7: 78 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . 79 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . 80 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. @@ -6824,7 +6867,7 @@ run_file.at-12281-reference:81.6-81.7: 83 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . >> Error: Unexpected indicator: `4' -run_file.at-12281-reference:82.6-82.7: +run_file.at-12436-reference:82.6-82.7: 79 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . 80 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. 81 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . @@ -6834,7 +6877,7 @@ run_file.at-12281-reference:82.6-82.7: 84 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:83.6-83.7: +run_file.at-12436-reference:83.6-83.7: 80 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. 81 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . 82 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . @@ -6844,7 +6887,7 @@ run_file.at-12281-reference:83.6-83.7: 85 Hit End of File >> Error: Unexpected indicator: `2' -run_file.at-12281-reference:84.6-84.7: +run_file.at-12436-reference:84.6-84.7: 81 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . 82 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . 83 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . @@ -6854,7 +6897,7 @@ run_file.at-12281-reference:84.6-84.7: 86 Read Prev/Delete >> Error: Unexpected indicator: `7' -run_file.at-12281-reference:86.6-86.7: +run_file.at-12436-reference:86.6-86.7: 83 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . 84 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . 85 Hit End of File @@ -6864,7 +6907,7 @@ run_file.at-12281-reference:86.6-86.7: 88 00002 Initial: MOR00000 4169898509 >> Error: Unexpected indicator: `r' -run_file.at-12281-reference:87.6-87.7: +run_file.at-12436-reference:87.6-87.7: 84 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . 85 Hit End of File 86 Read Prev/Delete @@ -6874,7 +6917,7 @@ run_file.at-12281-reference:87.6-87.7: 89 00003 Initial: DEL00000 4169898509 >> Error: Unexpected indicator: `I' -run_file.at-12281-reference:88.6-88.7: +run_file.at-12436-reference:88.6-88.7: 85 Hit End of File 86 Read Prev/Delete 87 00001 Initial: PRE00000 4169898509 @@ -6884,7 +6927,7 @@ run_file.at-12281-reference:88.6-88.7: 90 00004 Initial: BET00000 4169898509 >> Error: Unexpected indicator: `I' -run_file.at-12281-reference:89.6-89.7: +run_file.at-12436-reference:89.6-89.7: 86 Read Prev/Delete 87 00001 Initial: PRE00000 4169898509 88 00002 Initial: MOR00000 4169898509 @@ -6894,7 +6937,7 @@ run_file.at-12281-reference:89.6-89.7: 91 Start: PRE00000 4169898509 >> Error: Unexpected indicator: `I' -run_file.at-12281-reference:90.6-90.7: +run_file.at-12436-reference:90.6-90.7: 87 00001 Initial: PRE00000 4169898509 88 00002 Initial: MOR00000 4169898509 89 00003 Initial: DEL00000 4169898509 @@ -6904,7 +6947,7 @@ run_file.at-12281-reference:90.6-90.7: 92 Prev: MOR00000 4169898509 >> Error: Unexpected indicator: `I' -run_file.at-12281-reference:91.6-91.7: +run_file.at-12436-reference:91.6-91.7: 88 00002 Initial: MOR00000 4169898509 89 00003 Initial: DEL00000 4169898509 90 00004 Initial: BET00000 4169898509 @@ -6914,7 +6957,7 @@ run_file.at-12281-reference:91.6-91.7: 93 Delete: MOR00000 sequential >> Error: Unexpected indicator: `t' -run_file.at-12281-reference:92.6-92.7: +run_file.at-12436-reference:92.6-92.7: 89 00003 Initial: DEL00000 4169898509 90 00004 Initial: BET00000 4169898509 91 Start: PRE00000 4169898509 @@ -6924,7 +6967,7 @@ run_file.at-12281-reference:92.6-92.7: 94 Prev: DEL00000 4169898509 >> Error: Unexpected indicator: `v' -run_file.at-12281-reference:93.6-93.7: +run_file.at-12436-reference:93.6-93.7: 90 00004 Initial: BET00000 4169898509 91 Start: PRE00000 4169898509 92 Prev: MOR00000 4169898509 @@ -6934,7 +6977,7 @@ run_file.at-12281-reference:93.6-93.7: 95 Prev: BET00000 4169898509 >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:94.6-94.7: +run_file.at-12436-reference:94.6-94.7: 91 Start: PRE00000 4169898509 92 Prev: MOR00000 4169898509 93 Delete: MOR00000 sequential @@ -6944,7 +6987,7 @@ run_file.at-12281-reference:94.6-94.7: 96 Delete: BET00000 sequential >> Error: Unexpected indicator: `v' -run_file.at-12281-reference:95.6-95.7: +run_file.at-12436-reference:95.6-95.7: 92 Prev: MOR00000 4169898509 93 Delete: MOR00000 sequential 94 Prev: DEL00000 4169898509 @@ -6954,7 +6997,7 @@ run_file.at-12281-reference:95.6-95.7: 97 List sample data file by Phone >> Error: Unexpected indicator: `v' -run_file.at-12281-reference:96.6-96.7: +run_file.at-12436-reference:96.6-96.7: 93 Delete: MOR00000 sequential 94 Prev: DEL00000 4169898509 95 Prev: BET00000 4169898509 @@ -6964,7 +7007,7 @@ run_file.at-12281-reference:96.6-96.7: 98 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. >> Error: Unexpected indicator: `e' -run_file.at-12281-reference:97.6-97.7: +run_file.at-12436-reference:97.6-97.7: 94 Prev: DEL00000 4169898509 95 Prev: BET00000 4169898509 96 Delete: BET00000 sequential @@ -6974,7 +7017,7 @@ run_file.at-12281-reference:97.6-97.7: 99 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . >> Error: Unexpected indicator: `a' -run_file.at-12281-reference:98.6-98.7: +run_file.at-12436-reference:98.6-98.7: 95 Prev: BET00000 4169898509 96 Delete: BET00000 sequential 97 List sample data file by Phone @@ -6984,7 +7027,7 @@ run_file.at-12281-reference:98.6-98.7: 100 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . >> Error: Unexpected indicator: `1' -run_file.at-12281-reference:99.6-99.7: +run_file.at-12436-reference:99.6-99.7: 96 Delete: BET00000 sequential 97 List sample data file by Phone 98 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. @@ -6994,7 +7037,7 @@ run_file.at-12281-reference:99.6-99.7: 101 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. >> Error: Unexpected indicator: `5' -run_file.at-12281-reference:100.6-100.7: +run_file.at-12436-reference:100.6-100.7: 97 List sample data file by Phone 98 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. 99 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . @@ -7004,7 +7047,7 @@ run_file.at-12281-reference:100.6-100.7: 102 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:101.6-101.7: +run_file.at-12436-reference:101.6-101.7: 98 Ph=3131234432 Key: ALP00000 is ALPHA ELECTRICAL CO. LTD.. 99 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . 100 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . @@ -7014,7 +7057,7 @@ run_file.at-12281-reference:101.6-101.7: 103 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:102.6-102.7: +run_file.at-12436-reference:102.6-102.7: 99 Ph=3455445444 Key: INC00000 is INCREMENTAL BACKUP CORP. . 100 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . 101 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. @@ -7024,7 +7067,7 @@ run_file.at-12281-reference:102.6-102.7: 104 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . >> Error: Unexpected indicator: `2' -run_file.at-12281-reference:103.6-103.7: +run_file.at-12436-reference:103.6-103.7: 100 Ph=4169898509 Key: DEL00000 is DELTA LUGGAGE REPAIRS . 101 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. 102 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . @@ -7034,7 +7077,7 @@ run_file.at-12281-reference:103.6-103.7: 105 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:104.6-104.7: +run_file.at-12436-reference:104.6-104.7: 101 Ph=4169898509 Key: PRE00000 is PRESTIGE OFFICE FURNITURE. 102 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . 103 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . @@ -7044,7 +7087,7 @@ run_file.at-12281-reference:104.6-104.7: 106 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:105.6-105.7: +run_file.at-12436-reference:105.6-105.7: 102 Ph=5292398745 Key: EPS00000 is EPSILON EQUIPMENT SUPPLY . 103 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . 104 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . @@ -7054,7 +7097,7 @@ run_file.at-12281-reference:105.6-105.7: 107 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:106.6-106.7: +run_file.at-12436-reference:106.6-106.7: 103 Ph=6456445643 Key: GIB00000 is GIBRALTER LIFE INSURANCE . 104 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . 105 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . @@ -7064,7 +7107,7 @@ run_file.at-12281-reference:106.6-106.7: 108 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . >> Error: Unexpected indicator: `4' -run_file.at-12281-reference:107.6-107.7: +run_file.at-12436-reference:107.6-107.7: 104 Ph=6456445643 Key: JOH00000 is JOHNSON BOATING SUPPLIES . 105 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . 106 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . @@ -7074,7 +7117,7 @@ run_file.at-12281-reference:107.6-107.7: 109 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . >> Error: Unexpected indicator: `6' -run_file.at-12281-reference:108.6-108.7: +run_file.at-12436-reference:108.6-108.7: 105 Ph=6546456333 Key: H&J00000 is H & J PLUMBING SUPPLIES . 106 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . 107 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. @@ -7084,7 +7127,7 @@ run_file.at-12281-reference:108.6-108.7: 110 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . >> Error: Unexpected indicator: `4' -run_file.at-12281-reference:109.6-109.7: +run_file.at-12436-reference:109.6-109.7: 106 Ph=6554456433 Key: LEW00000 is LEWISTON GRAPHICS LTD. . 107 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. 108 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . @@ -7094,7 +7137,7 @@ run_file.at-12281-reference:109.6-109.7: 111 Ph=8787458374 Key: OLD00000 is OLD TYME PIZZA MFG. CO. . >> Error: Unexpected indicator: `9' -run_file.at-12281-reference:110.6-110.7: +run_file.at-12436-reference:110.6-110.7: 107 Ph=7456434355 Key: KON00000 is KONFLAB PLASTIC PRODUCTS.. 108 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . 109 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . @@ -7104,7 +7147,7 @@ run_file.at-12281-reference:110.6-110.7: 112 Hit End of File >> Error: Unexpected indicator: `2' -run_file.at-12281-reference:111.6-111.7: +run_file.at-12436-reference:111.6-111.7: 108 Ph=7534587453 Key: NEW00000 is NEW WAVE SURF SHOPS INC. . 109 Ph=8009329492 Key: FOR00000 is FORTUNE COOKIE COMPANY . 110 Ph=8372487274 Key: GAM00000 is GAMMA X-RAY TECHNOLOGY . @@ -7113,8 +7156,797 @@ run_file.at-12281-reference:111.6-111.7: 112 Hit End of File >> Error: Unexpected indicator: `7' -Considering: import/gnucobol/tests/testsuite.src/run_file.at:12369:0 -run_file.at-12369-prog.cob:32.11-32.36: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12694:0 +run_file.at-12694-prog1.cob:2.7-4.32: + 1 + 2 > COPY "prog.cpy" REPLACING +---- ^^^^^^^^^^^^^^^^^^^^^^^^^ + 3 > ==FILE-COLSEQ== BY ==COLLATING SEQUENCE IS ASCII== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 4 > ==KEY-COLSEQ== BY ====. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog.cpy' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12704:0 +run_file.at-12704-prog2.cob:2.7-4.32: + 1 + 2 > COPY "prog.cpy" REPLACING +---- ^^^^^^^^^^^^^^^^^^^^^^^^^ + 3 > ==FILE-COLSEQ== BY ==== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 4 > ==KEY-COLSEQ== BY ====. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog.cpy' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12715:0 +run_file.at-12715-prog3.cob:2.7-4.72: + 1 + 2 > COPY "prog.cpy" REPLACING +---- ^^^^^^^^^^^^^^^^^^^^^^^^^ + 3 > ==FILE-COLSEQ== BY ==COLLATING SEQUENCE IS ASCII== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 4 > ==KEY-COLSEQ== BY ==COLLATING SEQUENCE OF MY-AKEY1 IS EBCDIC==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog.cpy' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12725:0 +run_file.at-12725-prog4.cob:2.7-4.72: + 1 + 2 > COPY "prog.cpy" REPLACING +---- ^^^^^^^^^^^^^^^^^^^^^^^^^ + 3 > ==FILE-COLSEQ== BY ==== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 4 > ==KEY-COLSEQ== BY ==COLLATING SEQUENCE OF MY-AKEY1 IS EBCDIC==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog.cpy' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12735:0 +run_file.at-12735-prog5.cob:2.7-4.72: + 1 + 2 > COPY "prog.cpy" REPLACING +---- ^^^^^^^^^^^^^^^^^^^^^^^^^ + 3 > ==FILE-COLSEQ== BY ==COLLATING SEQUENCE IS EBCDIC== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 4 > ==KEY-COLSEQ== BY ==COLLATING SEQUENCE OF MY-AKEY1 IS EBCDIC==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog.cpy' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12745:0 +run_file.at-12745-prog6.cob:2.7-4.32: + 1 + 2 > COPY "prog.cpy" REPLACING +---- ^^^^^^^^^^^^^^^^^^^^^^^^^ + 3 > ==FILE-COLSEQ== BY ==== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 4 > ==KEY-COLSEQ== BY ====. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog.cpy' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12755:0 +run_file.at-12755-prog7.cob:2.7-4.71: + 1 + 2 > COPY "prog.cpy" REPLACING +---- ^^^^^^^^^^^^^^^^^^^^^^^^^ + 3 > ==FILE-COLSEQ== BY ==COLLATING SEQUENCE IS EBCDIC== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 4 > ==KEY-COLSEQ== BY ==COLLATING SEQUENCE OF MY-AKEY1 IS ASCII==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog.cpy' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12765:0 +run_file.at-12765-prog8.cob:2.7-4.71: + 1 + 2 > COPY "prog.cpy" REPLACING +---- ^^^^^^^^^^^^^^^^^^^^^^^^^ + 3 > ==FILE-COLSEQ== BY ==== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 4 > ==KEY-COLSEQ== BY ==COLLATING SEQUENCE OF MY-AKEY1 IS ASCII==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog.cpy' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12696:0 +run_file.at-12696-reference_ascii:1.6-1.7: + 1 > WRITING DATA +---- ^ + 2 DELETING DATA + 3 READING BY PKEY +>> Error: Unexpected indicator: `G' + +run_file.at-12696-reference_ascii:1.8-1.12: + 1 > WRITING DATA +---- ^^^^ + 2 DELETING DATA + 3 READING BY PKEY +>> Error: Invalid syntax + +run_file.at-12696-reference_ascii:2.6-2.7: + 1 WRITING DATA + 2 > DELETING DATA +---- ^ + 3 READING BY PKEY + 4 222 555 +0000000044 6 +>> Error: Unexpected indicator: `N' + +run_file.at-12696-reference_ascii:3.6-3.7: + 1 WRITING DATA + 2 DELETING DATA + 3 > READING BY PKEY +---- ^ + 4 222 555 +0000000044 6 + 5 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `G' + +run_file.at-12696-reference_ascii:4.6-4.7: + 1 WRITING DATA + 2 DELETING DATA + 3 READING BY PKEY + 4 > 222 555 +0000000044 6 +---- ^ + 5 666 AAA +0000000041 5 + 6 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `5' + +run_file.at-12696-reference_ascii:5.6-5.7: + 2 DELETING DATA + 3 READING BY PKEY + 4 222 555 +0000000044 6 + 5 > 666 AAA +0000000041 5 +---- ^ + 6 CCC 888 +0000000043 1 + 7 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `A' + +run_file.at-12696-reference_ascii:6.6-6.7: + 3 READING BY PKEY + 4 222 555 +0000000044 6 + 5 666 AAA +0000000041 5 + 6 > CCC 888 +0000000043 1 +---- ^ + 7 DDD 777 +0000000042 3 + 8 READING BY AKEY1 +>> Error: Unexpected indicator: `8' + +run_file.at-12696-reference_ascii:7.6-7.7: + 4 222 555 +0000000044 6 + 5 666 AAA +0000000041 5 + 6 CCC 888 +0000000043 1 + 7 > DDD 777 +0000000042 3 +---- ^ + 8 READING BY AKEY1 + 9 222 555 +0000000044 6 +>> Error: Unexpected indicator: `7' + +run_file.at-12696-reference_ascii:8.6-8.7: + 5 666 AAA +0000000041 5 + 6 CCC 888 +0000000043 1 + 7 DDD 777 +0000000042 3 + 8 > READING BY AKEY1 +---- ^ + 9 222 555 +0000000044 6 + 10 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `G' + +run_file.at-12696-reference_ascii:9.6-9.7: + 6 CCC 888 +0000000043 1 + 7 DDD 777 +0000000042 3 + 8 READING BY AKEY1 + 9 > 222 555 +0000000044 6 +---- ^ + 10 DDD 777 +0000000042 3 + 11 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `5' + +run_file.at-12696-reference_ascii:10.6-10.7: + 7 DDD 777 +0000000042 3 + 8 READING BY AKEY1 + 9 222 555 +0000000044 6 + 10 > DDD 777 +0000000042 3 +---- ^ + 11 CCC 888 +0000000043 1 + 12 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `7' + +run_file.at-12696-reference_ascii:11.6-11.7: + 8 READING BY AKEY1 + 9 222 555 +0000000044 6 + 10 DDD 777 +0000000042 3 + 11 > CCC 888 +0000000043 1 +---- ^ + 12 666 AAA +0000000041 5 + 13 READING BY AKEY2 +>> Error: Unexpected indicator: `8' + +run_file.at-12696-reference_ascii:12.6-12.7: + 9 222 555 +0000000044 6 + 10 DDD 777 +0000000042 3 + 11 CCC 888 +0000000043 1 + 12 > 666 AAA +0000000041 5 +---- ^ + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `A' + +run_file.at-12696-reference_ascii:13.6-13.7: + 10 DDD 777 +0000000042 3 + 11 CCC 888 +0000000043 1 + 12 666 AAA +0000000041 5 + 13 > READING BY AKEY2 +---- ^ + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `G' + +run_file.at-12696-reference_ascii:14.6-14.7: + 11 CCC 888 +0000000043 1 + 12 666 AAA +0000000041 5 + 13 READING BY AKEY2 + 14 > 666 AAA +0000000041 5 +---- ^ + 15 DDD 777 +0000000042 3 + 16 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `A' + +run_file.at-12696-reference_ascii:15.6-15.7: + 12 666 AAA +0000000041 5 + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 + 15 > DDD 777 +0000000042 3 +---- ^ + 16 CCC 888 +0000000043 1 + 17 222 555 +0000000044 6 +>> Error: Unexpected indicator: `7' + +run_file.at-12696-reference_ascii:16.6-16.7: + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 + 16 > CCC 888 +0000000043 1 +---- ^ + 17 222 555 +0000000044 6 + 18 DONE +>> Error: Unexpected indicator: `8' + +run_file.at-12696-reference_ascii:17.6-17.7: + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 + 16 CCC 888 +0000000043 1 + 17 > 222 555 +0000000044 6 +---- ^ + 18 DONE +>> Error: Unexpected indicator: `5' + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12717:0 +run_file.at-12717-reference_ascii_ebcdic:1.6-1.7: + 1 > WRITING DATA +---- ^ + 2 DELETING DATA + 3 READING BY PKEY +>> Error: Unexpected indicator: `G' + +run_file.at-12717-reference_ascii_ebcdic:1.8-1.12: + 1 > WRITING DATA +---- ^^^^ + 2 DELETING DATA + 3 READING BY PKEY +>> Error: Invalid syntax + +run_file.at-12717-reference_ascii_ebcdic:2.6-2.7: + 1 WRITING DATA + 2 > DELETING DATA +---- ^ + 3 READING BY PKEY + 4 222 555 +0000000044 6 +>> Error: Unexpected indicator: `N' + +run_file.at-12717-reference_ascii_ebcdic:3.6-3.7: + 1 WRITING DATA + 2 DELETING DATA + 3 > READING BY PKEY +---- ^ + 4 222 555 +0000000044 6 + 5 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `G' + +run_file.at-12717-reference_ascii_ebcdic:4.6-4.7: + 1 WRITING DATA + 2 DELETING DATA + 3 READING BY PKEY + 4 > 222 555 +0000000044 6 +---- ^ + 5 666 AAA +0000000041 5 + 6 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `5' + +run_file.at-12717-reference_ascii_ebcdic:5.6-5.7: + 2 DELETING DATA + 3 READING BY PKEY + 4 222 555 +0000000044 6 + 5 > 666 AAA +0000000041 5 +---- ^ + 6 CCC 888 +0000000043 1 + 7 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `A' + +run_file.at-12717-reference_ascii_ebcdic:6.6-6.7: + 3 READING BY PKEY + 4 222 555 +0000000044 6 + 5 666 AAA +0000000041 5 + 6 > CCC 888 +0000000043 1 +---- ^ + 7 DDD 777 +0000000042 3 + 8 READING BY AKEY1 +>> Error: Unexpected indicator: `8' + +run_file.at-12717-reference_ascii_ebcdic:7.6-7.7: + 4 222 555 +0000000044 6 + 5 666 AAA +0000000041 5 + 6 CCC 888 +0000000043 1 + 7 > DDD 777 +0000000042 3 +---- ^ + 8 READING BY AKEY1 + 9 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `7' + +run_file.at-12717-reference_ascii_ebcdic:8.6-8.7: + 5 666 AAA +0000000041 5 + 6 CCC 888 +0000000043 1 + 7 DDD 777 +0000000042 3 + 8 > READING BY AKEY1 +---- ^ + 9 666 AAA +0000000041 5 + 10 222 555 +0000000044 6 +>> Error: Unexpected indicator: `G' + +run_file.at-12717-reference_ascii_ebcdic:9.6-9.7: + 6 CCC 888 +0000000043 1 + 7 DDD 777 +0000000042 3 + 8 READING BY AKEY1 + 9 > 666 AAA +0000000041 5 +---- ^ + 10 222 555 +0000000044 6 + 11 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `A' + +run_file.at-12717-reference_ascii_ebcdic:10.6-10.7: + 7 DDD 777 +0000000042 3 + 8 READING BY AKEY1 + 9 666 AAA +0000000041 5 + 10 > 222 555 +0000000044 6 +---- ^ + 11 DDD 777 +0000000042 3 + 12 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `5' + +run_file.at-12717-reference_ascii_ebcdic:11.6-11.7: + 8 READING BY AKEY1 + 9 666 AAA +0000000041 5 + 10 222 555 +0000000044 6 + 11 > DDD 777 +0000000042 3 +---- ^ + 12 CCC 888 +0000000043 1 + 13 READING BY AKEY2 +>> Error: Unexpected indicator: `7' + +run_file.at-12717-reference_ascii_ebcdic:12.6-12.7: + 9 666 AAA +0000000041 5 + 10 222 555 +0000000044 6 + 11 DDD 777 +0000000042 3 + 12 > CCC 888 +0000000043 1 +---- ^ + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `8' + +run_file.at-12717-reference_ascii_ebcdic:13.6-13.7: + 10 222 555 +0000000044 6 + 11 DDD 777 +0000000042 3 + 12 CCC 888 +0000000043 1 + 13 > READING BY AKEY2 +---- ^ + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `G' + +run_file.at-12717-reference_ascii_ebcdic:14.6-14.7: + 11 DDD 777 +0000000042 3 + 12 CCC 888 +0000000043 1 + 13 READING BY AKEY2 + 14 > 666 AAA +0000000041 5 +---- ^ + 15 DDD 777 +0000000042 3 + 16 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `A' + +run_file.at-12717-reference_ascii_ebcdic:15.6-15.7: + 12 CCC 888 +0000000043 1 + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 + 15 > DDD 777 +0000000042 3 +---- ^ + 16 CCC 888 +0000000043 1 + 17 222 555 +0000000044 6 +>> Error: Unexpected indicator: `7' + +run_file.at-12717-reference_ascii_ebcdic:16.6-16.7: + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 + 16 > CCC 888 +0000000043 1 +---- ^ + 17 222 555 +0000000044 6 + 18 DONE +>> Error: Unexpected indicator: `8' + +run_file.at-12717-reference_ascii_ebcdic:17.6-17.7: + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 + 16 CCC 888 +0000000043 1 + 17 > 222 555 +0000000044 6 +---- ^ + 18 DONE +>> Error: Unexpected indicator: `5' + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12737:0 +run_file.at-12737-reference_ebcdic:1.6-1.7: + 1 > WRITING DATA +---- ^ + 2 DELETING DATA + 3 READING BY PKEY +>> Error: Unexpected indicator: `G' + +run_file.at-12737-reference_ebcdic:1.8-1.12: + 1 > WRITING DATA +---- ^^^^ + 2 DELETING DATA + 3 READING BY PKEY +>> Error: Invalid syntax + +run_file.at-12737-reference_ebcdic:2.6-2.7: + 1 WRITING DATA + 2 > DELETING DATA +---- ^ + 3 READING BY PKEY + 4 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `N' + +run_file.at-12737-reference_ebcdic:3.6-3.7: + 1 WRITING DATA + 2 DELETING DATA + 3 > READING BY PKEY +---- ^ + 4 CCC 888 +0000000043 1 + 5 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `G' + +run_file.at-12737-reference_ebcdic:4.6-4.7: + 1 WRITING DATA + 2 DELETING DATA + 3 READING BY PKEY + 4 > CCC 888 +0000000043 1 +---- ^ + 5 DDD 777 +0000000042 3 + 6 222 555 +0000000044 6 +>> Error: Unexpected indicator: `8' + +run_file.at-12737-reference_ebcdic:5.6-5.7: + 2 DELETING DATA + 3 READING BY PKEY + 4 CCC 888 +0000000043 1 + 5 > DDD 777 +0000000042 3 +---- ^ + 6 222 555 +0000000044 6 + 7 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `7' + +run_file.at-12737-reference_ebcdic:6.6-6.7: + 3 READING BY PKEY + 4 CCC 888 +0000000043 1 + 5 DDD 777 +0000000042 3 + 6 > 222 555 +0000000044 6 +---- ^ + 7 666 AAA +0000000041 5 + 8 READING BY AKEY1 +>> Error: Unexpected indicator: `5' + +run_file.at-12737-reference_ebcdic:7.6-7.7: + 4 CCC 888 +0000000043 1 + 5 DDD 777 +0000000042 3 + 6 222 555 +0000000044 6 + 7 > 666 AAA +0000000041 5 +---- ^ + 8 READING BY AKEY1 + 9 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `A' + +run_file.at-12737-reference_ebcdic:8.6-8.7: + 5 DDD 777 +0000000042 3 + 6 222 555 +0000000044 6 + 7 666 AAA +0000000041 5 + 8 > READING BY AKEY1 +---- ^ + 9 666 AAA +0000000041 5 + 10 222 555 +0000000044 6 +>> Error: Unexpected indicator: `G' + +run_file.at-12737-reference_ebcdic:9.6-9.7: + 6 222 555 +0000000044 6 + 7 666 AAA +0000000041 5 + 8 READING BY AKEY1 + 9 > 666 AAA +0000000041 5 +---- ^ + 10 222 555 +0000000044 6 + 11 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `A' + +run_file.at-12737-reference_ebcdic:10.6-10.7: + 7 666 AAA +0000000041 5 + 8 READING BY AKEY1 + 9 666 AAA +0000000041 5 + 10 > 222 555 +0000000044 6 +---- ^ + 11 DDD 777 +0000000042 3 + 12 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `5' + +run_file.at-12737-reference_ebcdic:11.6-11.7: + 8 READING BY AKEY1 + 9 666 AAA +0000000041 5 + 10 222 555 +0000000044 6 + 11 > DDD 777 +0000000042 3 +---- ^ + 12 CCC 888 +0000000043 1 + 13 READING BY AKEY2 +>> Error: Unexpected indicator: `7' + +run_file.at-12737-reference_ebcdic:12.6-12.7: + 9 666 AAA +0000000041 5 + 10 222 555 +0000000044 6 + 11 DDD 777 +0000000042 3 + 12 > CCC 888 +0000000043 1 +---- ^ + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `8' + +run_file.at-12737-reference_ebcdic:13.6-13.7: + 10 222 555 +0000000044 6 + 11 DDD 777 +0000000042 3 + 12 CCC 888 +0000000043 1 + 13 > READING BY AKEY2 +---- ^ + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `G' + +run_file.at-12737-reference_ebcdic:14.6-14.7: + 11 DDD 777 +0000000042 3 + 12 CCC 888 +0000000043 1 + 13 READING BY AKEY2 + 14 > 666 AAA +0000000041 5 +---- ^ + 15 DDD 777 +0000000042 3 + 16 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `A' + +run_file.at-12737-reference_ebcdic:15.6-15.7: + 12 CCC 888 +0000000043 1 + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 + 15 > DDD 777 +0000000042 3 +---- ^ + 16 CCC 888 +0000000043 1 + 17 222 555 +0000000044 6 +>> Error: Unexpected indicator: `7' + +run_file.at-12737-reference_ebcdic:16.6-16.7: + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 + 16 > CCC 888 +0000000043 1 +---- ^ + 17 222 555 +0000000044 6 + 18 DONE +>> Error: Unexpected indicator: `8' + +run_file.at-12737-reference_ebcdic:17.6-17.7: + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 + 16 CCC 888 +0000000043 1 + 17 > 222 555 +0000000044 6 +---- ^ + 18 DONE +>> Error: Unexpected indicator: `5' + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12757:0 +run_file.at-12757-reference_ebcdic_ascii:1.6-1.7: + 1 > WRITING DATA +---- ^ + 2 DELETING DATA + 3 READING BY PKEY +>> Error: Unexpected indicator: `G' + +run_file.at-12757-reference_ebcdic_ascii:1.8-1.12: + 1 > WRITING DATA +---- ^^^^ + 2 DELETING DATA + 3 READING BY PKEY +>> Error: Invalid syntax + +run_file.at-12757-reference_ebcdic_ascii:2.6-2.7: + 1 WRITING DATA + 2 > DELETING DATA +---- ^ + 3 READING BY PKEY + 4 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `N' + +run_file.at-12757-reference_ebcdic_ascii:3.6-3.7: + 1 WRITING DATA + 2 DELETING DATA + 3 > READING BY PKEY +---- ^ + 4 CCC 888 +0000000043 1 + 5 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `G' + +run_file.at-12757-reference_ebcdic_ascii:4.6-4.7: + 1 WRITING DATA + 2 DELETING DATA + 3 READING BY PKEY + 4 > CCC 888 +0000000043 1 +---- ^ + 5 DDD 777 +0000000042 3 + 6 222 555 +0000000044 6 +>> Error: Unexpected indicator: `8' + +run_file.at-12757-reference_ebcdic_ascii:5.6-5.7: + 2 DELETING DATA + 3 READING BY PKEY + 4 CCC 888 +0000000043 1 + 5 > DDD 777 +0000000042 3 +---- ^ + 6 222 555 +0000000044 6 + 7 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `7' + +run_file.at-12757-reference_ebcdic_ascii:6.6-6.7: + 3 READING BY PKEY + 4 CCC 888 +0000000043 1 + 5 DDD 777 +0000000042 3 + 6 > 222 555 +0000000044 6 +---- ^ + 7 666 AAA +0000000041 5 + 8 READING BY AKEY1 +>> Error: Unexpected indicator: `5' + +run_file.at-12757-reference_ebcdic_ascii:7.6-7.7: + 4 CCC 888 +0000000043 1 + 5 DDD 777 +0000000042 3 + 6 222 555 +0000000044 6 + 7 > 666 AAA +0000000041 5 +---- ^ + 8 READING BY AKEY1 + 9 222 555 +0000000044 6 +>> Error: Unexpected indicator: `A' + +run_file.at-12757-reference_ebcdic_ascii:8.6-8.7: + 5 DDD 777 +0000000042 3 + 6 222 555 +0000000044 6 + 7 666 AAA +0000000041 5 + 8 > READING BY AKEY1 +---- ^ + 9 222 555 +0000000044 6 + 10 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `G' + +run_file.at-12757-reference_ebcdic_ascii:9.6-9.7: + 6 222 555 +0000000044 6 + 7 666 AAA +0000000041 5 + 8 READING BY AKEY1 + 9 > 222 555 +0000000044 6 +---- ^ + 10 DDD 777 +0000000042 3 + 11 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `5' + +run_file.at-12757-reference_ebcdic_ascii:10.6-10.7: + 7 666 AAA +0000000041 5 + 8 READING BY AKEY1 + 9 222 555 +0000000044 6 + 10 > DDD 777 +0000000042 3 +---- ^ + 11 CCC 888 +0000000043 1 + 12 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `7' + +run_file.at-12757-reference_ebcdic_ascii:11.6-11.7: + 8 READING BY AKEY1 + 9 222 555 +0000000044 6 + 10 DDD 777 +0000000042 3 + 11 > CCC 888 +0000000043 1 +---- ^ + 12 666 AAA +0000000041 5 + 13 READING BY AKEY2 +>> Error: Unexpected indicator: `8' + +run_file.at-12757-reference_ebcdic_ascii:12.6-12.7: + 9 222 555 +0000000044 6 + 10 DDD 777 +0000000042 3 + 11 CCC 888 +0000000043 1 + 12 > 666 AAA +0000000041 5 +---- ^ + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 +>> Error: Unexpected indicator: `A' + +run_file.at-12757-reference_ebcdic_ascii:13.6-13.7: + 10 DDD 777 +0000000042 3 + 11 CCC 888 +0000000043 1 + 12 666 AAA +0000000041 5 + 13 > READING BY AKEY2 +---- ^ + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 +>> Error: Unexpected indicator: `G' + +run_file.at-12757-reference_ebcdic_ascii:14.6-14.7: + 11 CCC 888 +0000000043 1 + 12 666 AAA +0000000041 5 + 13 READING BY AKEY2 + 14 > 666 AAA +0000000041 5 +---- ^ + 15 DDD 777 +0000000042 3 + 16 CCC 888 +0000000043 1 +>> Error: Unexpected indicator: `A' + +run_file.at-12757-reference_ebcdic_ascii:15.6-15.7: + 12 666 AAA +0000000041 5 + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 + 15 > DDD 777 +0000000042 3 +---- ^ + 16 CCC 888 +0000000043 1 + 17 222 555 +0000000044 6 +>> Error: Unexpected indicator: `7' + +run_file.at-12757-reference_ebcdic_ascii:16.6-16.7: + 13 READING BY AKEY2 + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 + 16 > CCC 888 +0000000043 1 +---- ^ + 17 222 555 +0000000044 6 + 18 DONE +>> Error: Unexpected indicator: `8' + +run_file.at-12757-reference_ebcdic_ascii:17.6-17.7: + 14 666 AAA +0000000041 5 + 15 DDD 777 +0000000042 3 + 16 CCC 888 +0000000043 1 + 17 > 222 555 +0000000044 6 +---- ^ + 18 DONE +>> Error: Unexpected indicator: `5' + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12852:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:12943:0 +run_file.at-12943-prog.cob:32.11-32.36: 29 CLOSE f 30 31 SET LAST EXCEPTION TO OFF @@ -7124,7 +7956,7 @@ run_file.at-12369-prog.cob:32.11-32.36: 34 OPEN INPUT f >> Error: Invalid >>TURN compiler directive -run_file.at-12369-prog.cob:46.11-46.38: +run_file.at-12943-prog.cob:46.11-46.38: 43 44 CLOSE f 45 @@ -7134,8 +7966,8 @@ run_file.at-12369-prog.cob:46.11-46.38: 48 *> Read f too many times without libcob error >> Error: Invalid >>TURN compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_file.at:12582:0 -run_file.at-12582-prog.cob:10.34-10.42: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13156:0 +run_file.at-13156-prog.cob:10.34-10.42: 7 8 INPUT-OUTPUT SECTION. 9 FILE-CONTROL. @@ -7145,7 +7977,7 @@ run_file.at-12582-prog.cob:10.34-10.42: 12 FILE STATUS IS CUST-STAT . >> Warning: Ignored EXTERNAL (implementation pending) -run_file.at-12582-prog.cob:44.54: +run_file.at-13156-prog.cob:44.54: 41 05 FILLER PIC X(8) VALUE "FOR00000". 42 43 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -7155,7 +7987,7 @@ run_file.at-12582-prog.cob:44.54: 46 >> Hint: Missing -run_file.at-12582-prog.cob:44.55-44.62: +run_file.at-13156-prog.cob:44.55-44.62: 41 05 FILLER PIC X(8) VALUE "FOR00000". 42 43 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL @@ -7165,7 +7997,7 @@ run_file.at-12582-prog.cob:44.55-44.62: 46 >> Error: Invalid syntax -run_file.at-12582-prog.cob:54.55: +run_file.at-13156-prog.cob:54.55: 51 05 FILLER PIC X(25) VALUE "EPSILON EQUIPMENT SUPPLY ". 52 05 FILLER PIC X(25) VALUE "FORTUNE COOKIE COMPANY ". 53 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -7175,7 +8007,7 @@ run_file.at-12582-prog.cob:54.55: 56 >> Hint: Missing -run_file.at-12582-prog.cob:54.56-54.63: +run_file.at-13156-prog.cob:54.56-54.63: 51 05 FILLER PIC X(25) VALUE "EPSILON EQUIPMENT SUPPLY ". 52 05 FILLER PIC X(25) VALUE "FORTUNE COOKIE COMPANY ". 53 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL @@ -7185,7 +8017,7 @@ run_file.at-12582-prog.cob:54.56-54.63: 56 >> Error: Invalid syntax -run_file.at-12582-prog.cob:65.55: +run_file.at-13156-prog.cob:65.55: 62 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 63 64 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL @@ -7195,7 +8027,7 @@ run_file.at-12582-prog.cob:65.55: 67 02 DATA-NO-TERMINALS-TBL. >> Hint: Missing -run_file.at-12582-prog.cob:65.56-65.63: +run_file.at-13156-prog.cob:65.56-65.63: 62 05 FILLER PIC X(10) VALUE "WHITEPLAIN". 63 64 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL @@ -7205,7 +8037,7 @@ run_file.at-12582-prog.cob:65.56-65.63: 67 02 DATA-NO-TERMINALS-TBL. >> Error: Invalid syntax -run_file.at-12582-prog.cob:77.54: +run_file.at-13156-prog.cob:77.54: 74 05 FILLER PIC 9(5) VALUE 254. 75 76 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -7215,7 +8047,7 @@ run_file.at-12582-prog.cob:77.54: 79 05 SUB USAGE BINARY-SHORT UNSIGNED. >> Hint: Missing -run_file.at-12582-prog.cob:77.55-77.62: +run_file.at-13156-prog.cob:77.55-77.62: 74 05 FILLER PIC 9(5) VALUE 254. 75 76 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL @@ -7225,117 +8057,137 @@ run_file.at-12582-prog.cob:77.55-77.62: 79 05 SUB USAGE BINARY-SHORT UNSIGNED. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:12798:0 -run_file.at-12798-prog.cob:41.54: - 38 05 FILLER PIC X(8) VALUE "DEL00000". - 39 - 40 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL - 41 > PIC X(8) OCCURS MAX-SUB. +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13400:0 +run_file.at-13400-prog.cob:43.54: + 40 05 FILLER PIC X(8) VALUE "DEL00000". + 41 + 42 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL + 43 > PIC X(8) OCCURS MAX-SUB. ---- ^ - 42 02 DATA-COMPANY-TBL. - 43 05 FILLER PIC X(25) VALUE "ALPHA ELECTRICAL CO. LTD.". + 44 02 DATA-COMPANY-TBL. + 45 05 FILLER PIC X(25) VALUE "SPACE COMPANY ". >> Hint: Missing -run_file.at-12798-prog.cob:41.55-41.62: - 38 05 FILLER PIC X(8) VALUE "DEL00000". - 39 - 40 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL - 41 > PIC X(8) OCCURS MAX-SUB. +run_file.at-13400-prog.cob:43.55-43.62: + 40 05 FILLER PIC X(8) VALUE "DEL00000". + 41 + 42 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL + 43 > PIC X(8) OCCURS MAX-SUB. ---- ^^^^^^^ - 42 02 DATA-COMPANY-TBL. - 43 05 FILLER PIC X(25) VALUE "ALPHA ELECTRICAL CO. LTD.". + 44 02 DATA-COMPANY-TBL. + 45 05 FILLER PIC X(25) VALUE "SPACE COMPANY ". >> Error: Invalid syntax -run_file.at-12798-prog.cob:48.55: - 45 05 FILLER PIC X(25) VALUE "GAMMA X-RAY TECHNOLOGY ". - 46 05 FILLER PIC X(25) VALUE "DELTA LUGGAGE REPAIRS ". - 47 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL - 48 > PIC X(25) OCCURS MAX-SUB. +run_file.at-13400-prog.cob:51.55: + 48 05 FILLER PIC X(25) VALUE "GAMMA X-RAY TECHNOLOGY ". + 49 05 FILLER PIC X(25) VALUE "DELTA LUGGAGE REPAIRS ". + 50 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL + 51 > PIC X(25) OCCURS MAX-SUB. ---- ^ - 49 02 DATA-ADDRESS-2-TBL. - 50 05 FILLER PIC X(10) VALUE "NEW YORK ". + 52 02 DATA-ADDRESS-2-TBL. + 53 05 FILLER PIC X(10) VALUE "EARTH ". >> Hint: Missing -run_file.at-12798-prog.cob:48.56-48.63: - 45 05 FILLER PIC X(25) VALUE "GAMMA X-RAY TECHNOLOGY ". - 46 05 FILLER PIC X(25) VALUE "DELTA LUGGAGE REPAIRS ". - 47 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL - 48 > PIC X(25) OCCURS MAX-SUB. +run_file.at-13400-prog.cob:51.56-51.63: + 48 05 FILLER PIC X(25) VALUE "GAMMA X-RAY TECHNOLOGY ". + 49 05 FILLER PIC X(25) VALUE "DELTA LUGGAGE REPAIRS ". + 50 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL + 51 > PIC X(25) OCCURS MAX-SUB. ---- ^^^^^^^ - 49 02 DATA-ADDRESS-2-TBL. - 50 05 FILLER PIC X(10) VALUE "NEW YORK ". + 52 02 DATA-ADDRESS-2-TBL. + 53 05 FILLER PIC X(10) VALUE "EARTH ". >> Error: Invalid syntax -run_file.at-12798-prog.cob:55.55: - 52 05 FILLER PIC X(10) VALUE "WASHINGTON". - 53 05 FILLER PIC X(10) VALUE "TORONTO ". - 54 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL - 55 > PIC X(10) OCCURS MAX-SUB. +run_file.at-13400-prog.cob:59.55: + 56 05 FILLER PIC X(10) VALUE "WASHINGTON". + 57 05 FILLER PIC X(10) VALUE "TORONTO ". + 58 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL + 59 > PIC X(10) OCCURS MAX-SUB. ---- ^ - 56 - 57 02 DATA-NO-TERMINALS-TBL. + 60 + 61 02 DATA-NO-TERMINALS-TBL. >> Hint: Missing -run_file.at-12798-prog.cob:55.56-55.63: - 52 05 FILLER PIC X(10) VALUE "WASHINGTON". - 53 05 FILLER PIC X(10) VALUE "TORONTO ". - 54 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL - 55 > PIC X(10) OCCURS MAX-SUB. +run_file.at-13400-prog.cob:59.56-59.63: + 56 05 FILLER PIC X(10) VALUE "WASHINGTON". + 57 05 FILLER PIC X(10) VALUE "TORONTO ". + 58 02 DATA-ADDRESS REDEFINES DATA-ADDRESS-2-TBL + 59 > PIC X(10) OCCURS MAX-SUB. ---- ^^^^^^^ - 56 - 57 02 DATA-NO-TERMINALS-TBL. + 60 + 61 02 DATA-NO-TERMINALS-TBL. +>> Error: Invalid syntax + +run_file.at-13400-prog.cob:68.54: + 65 05 FILLER PIC 9(3) VALUE 9. + 66 05 FILLER PIC 9(3) VALUE 9. + 67 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL + 68 > PIC 9(3) OCCURS MAX-SUB. +---- ^ + 69 02 DATA-NO-TERMINALS-TBL2. + 70 05 FILLER PIC 9(3) VALUE 50. +>> Hint: Missing + +run_file.at-13400-prog.cob:68.55-68.62: + 65 05 FILLER PIC 9(3) VALUE 9. + 66 05 FILLER PIC 9(3) VALUE 9. + 67 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL + 68 > PIC 9(3) OCCURS MAX-SUB. +---- ^^^^^^^ + 69 02 DATA-NO-TERMINALS-TBL2. + 70 05 FILLER PIC 9(3) VALUE 50. >> Error: Invalid syntax -run_file.at-12798-prog.cob:63.54: - 60 05 FILLER PIC 9(3) VALUE 3. - 61 05 FILLER PIC 9(3) VALUE 254. - 62 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL - 63 > PIC 9(3) OCCURS MAX-SUB. +run_file.at-13400-prog.cob:76.54: + 73 05 FILLER PIC 9(3) VALUE 3. + 74 05 FILLER PIC 9(3) VALUE 254. + 75 02 DATA-NO-TERMINALS2 REDEFINES DATA-NO-TERMINALS-TBL2 + 76 > PIC 9(3) OCCURS MAX-SUB. ---- ^ - 64 01 WORK-AREA. - 65 05 SUB BINARY-SHORT UNSIGNED. + 77 01 WORK-AREA. + 78 05 SUB BINARY-SHORT UNSIGNED. >> Hint: Missing -run_file.at-12798-prog.cob:63.55-63.62: - 60 05 FILLER PIC 9(3) VALUE 3. - 61 05 FILLER PIC 9(3) VALUE 254. - 62 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL - 63 > PIC 9(3) OCCURS MAX-SUB. +run_file.at-13400-prog.cob:76.55-76.62: + 73 05 FILLER PIC 9(3) VALUE 3. + 74 05 FILLER PIC 9(3) VALUE 254. + 75 02 DATA-NO-TERMINALS2 REDEFINES DATA-NO-TERMINALS-TBL2 + 76 > PIC 9(3) OCCURS MAX-SUB. ---- ^^^^^^^ - 64 01 WORK-AREA. - 65 05 SUB BINARY-SHORT UNSIGNED. ->> Error: Invalid syntax - -Considering: import/gnucobol/tests/testsuite.src/run_file.at:12935:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13004:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13091:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13142:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13190:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13192:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13249:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13316:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13397:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13453:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13544:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13596:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13686:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13762:0 -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13896:0 -run_file.at-13896-expected.txt:1.6-1.7: + 77 01 WORK-AREA. + 78 05 SUB BINARY-SHORT UNSIGNED. +>> Error: Invalid syntax + +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13540:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13609:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13696:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13747:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13795:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13797:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13854:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:13921:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14002:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14058:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14149:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14201:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14291:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14367:0 +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14501:0 +run_file.at-14501-expected.txt:1.6-1.7: 1 > ERROR ON FILE2 ---- ^ 2 STAT-FILE1: 00 3 STAT-FILE2: 35 >> Error: Unexpected indicator: `O' -run_file.at-13896-expected.txt:1.7-1.8: +run_file.at-14501-expected.txt:1.7-1.8: 1 > ERROR ON FILE2 ---- ^ 2 STAT-FILE1: 00 3 STAT-FILE2: 35 >> Error: Invalid syntax -run_file.at-13896-expected.txt:4.6-4.7: +run_file.at-14501-expected.txt:4.6-4.7: 1 ERROR ON FILE2 2 STAT-FILE1: 00 3 STAT-FILE2: 35 @@ -7345,7 +8197,7 @@ run_file.at-13896-expected.txt:4.6-4.7: 6 STAT-FILE1: 10 >> Error: Unexpected indicator: `I' -run_file.at-13896-expected.txt:5.6-5.7: +run_file.at-14501-expected.txt:5.6-5.7: 2 STAT-FILE1: 00 3 STAT-FILE2: 35 4 READ FILE1 @@ -7355,7 +8207,7 @@ run_file.at-13896-expected.txt:5.6-5.7: 7 STAT-FILE2: 35 >> Error: Unexpected indicator: `O' -run_file.at-13896-expected.txt:8.6-8.7: +run_file.at-14501-expected.txt:8.6-8.7: 5 ERROR ON FILE1 6 STAT-FILE1: 10 7 STAT-FILE2: 35 @@ -7365,7 +8217,7 @@ run_file.at-13896-expected.txt:8.6-8.7: 10 STAT-FILE1: 10 >> Error: Unexpected indicator: `I' -run_file.at-13896-expected.txt:9.6-9.7: +run_file.at-14501-expected.txt:9.6-9.7: 6 STAT-FILE1: 10 7 STAT-FILE2: 35 8 READ FILE2 @@ -7375,7 +8227,7 @@ run_file.at-13896-expected.txt:9.6-9.7: 11 STAT-FILE2: 47 >> Error: Unexpected indicator: `O' -run_file.at-13896-expected.txt:12.6-12.7: +run_file.at-14501-expected.txt:12.6-12.7: 9 ERROR ON FILE2 10 STAT-FILE1: 10 11 STAT-FILE2: 47 @@ -7385,7 +8237,7 @@ run_file.at-13896-expected.txt:12.6-12.7: 14 STAT-FILE1: 00 >> Error: Unexpected indicator: `F' -run_file.at-13896-expected.txt:13.6-13.7: +run_file.at-14501-expected.txt:13.6-13.7: 10 STAT-FILE1: 10 11 STAT-FILE2: 47 12 CLOSE FILES @@ -7395,8 +8247,8 @@ run_file.at-13896-expected.txt:13.6-13.7: 15 STAT-FILE2: 42 >> Error: Unexpected indicator: `O' -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13893:0 -run_file.at-13893-prog1.cob:45.17-45.21: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14498:0 +run_file.at-14498-prog1.cob:45.17-45.21: 42 CLOSE FILE1. 43 CLOSE FILE2. 44 DISPLAY "DELETE FILES". @@ -7406,7 +8258,7 @@ run_file.at-13893-prog1.cob:45.17-45.21: 47 STOP RUN. >> Error: Invalid syntax -run_file.at-13893-prog1.cob:46.17-46.21: +run_file.at-14498-prog1.cob:46.17-46.21: 43 CLOSE FILE2. 44 DISPLAY "DELETE FILES". 45 DELETE FILE FILE1. @@ -7415,8 +8267,8 @@ run_file.at-13893-prog1.cob:46.17-46.21: 47 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_file.at:13898:0 -run_file.at-13898-prog2.cob:45.17-45.21: +Considering: import/gnucobol/tests/testsuite.src/run_file.at:14503:0 +run_file.at-14503-prog2.cob:45.17-45.21: 42 CLOSE FILE1 43 FILE2. 44 DISPLAY "DELETE FILES". @@ -7426,7 +8278,7 @@ run_file.at-13898-prog2.cob:45.17-45.21: 47 STOP RUN. >> Error: Invalid syntax -run_file.at-13898-prog2.cob:45.27: +run_file.at-14503-prog2.cob:45.27: 42 CLOSE FILE1 43 FILE2. 44 DISPLAY "DELETE FILES". @@ -7436,7 +8288,7 @@ run_file.at-13898-prog2.cob:45.27: 47 STOP RUN. >> Hint: Missing . -run_file.at-13898-prog2.cob:46.22-46.27: +run_file.at-14503-prog2.cob:46.22-46.27: 43 FILE2. 44 DISPLAY "DELETE FILES". 45 DELETE FILE FILE1 diff --git a/test/output-tests/run_fundamental.expected b/test/output-tests/run_fundamental.expected index 33d1f9a70..5d34be6df 100644 --- a/test/output-tests/run_fundamental.expected +++ b/test/output-tests/run_fundamental.expected @@ -76,26 +76,28 @@ Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:233:0 Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:284:0 Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:333:0 Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:444:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:475:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:518:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:547:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:614:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:737:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:868:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:904:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:951:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:952:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:988:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1032:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1033:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1065:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1097:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1129:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1174:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1223:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1306:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1390:0 -run_fundamental.at-1390-prog.cob:7.11-7.15: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2122:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2427:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2494:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2546:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2575:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2641:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2764:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2895:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2931:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2978:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2979:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3015:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3059:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3060:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3092:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3124:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3156:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3201:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3250:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3333:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3417:0 +run_fundamental.at-3417-prog.cob:7.11-7.15: 4 LINKAGE SECTION. 5 01 r BINARY-LONG. 6 PROCEDURE DIVISION RETURNING r. @@ -105,7 +107,7 @@ run_fundamental.at-1390-prog.cob:7.11-7.15: 9 . >> Error: Invalid syntax -run_fundamental.at-1390-prog.cob:7.17: +run_fundamental.at-3417-prog.cob:7.17: 4 LINKAGE SECTION. 5 01 r BINARY-LONG. 6 PROCEDURE DIVISION RETURNING r. @@ -115,7 +117,7 @@ run_fundamental.at-1390-prog.cob:7.17: 9 . >> Hint: Missing . -run_fundamental.at-1390-prog.cob:7.18-7.20: +run_fundamental.at-3417-prog.cob:7.18-7.20: 4 LINKAGE SECTION. 5 01 r BINARY-LONG. 6 PROCEDURE DIVISION RETURNING r. @@ -125,7 +127,7 @@ run_fundamental.at-1390-prog.cob:7.18-7.20: 9 . >> Warning: Invalid syntax -run_fundamental.at-1390-prog.cob:7.22: +run_fundamental.at-3417-prog.cob:7.22: 4 LINKAGE SECTION. 5 01 r BINARY-LONG. 6 PROCEDURE DIVISION RETURNING r. @@ -135,7 +137,7 @@ run_fundamental.at-1390-prog.cob:7.22: 9 . >> Hint: Missing . -run_fundamental.at-1390-prog.cob:8.11-8.17: +run_fundamental.at-3417-prog.cob:8.11-8.17: 5 01 r BINARY-LONG. 6 PROCEDURE DIVISION RETURNING r. 7 move 1 to r @@ -145,7 +147,7 @@ run_fundamental.at-1390-prog.cob:8.11-8.17: 10 END FUNCTION f1. >> Warning: Invalid syntax -run_fundamental.at-1390-prog.cob:17.11-17.14: +run_fundamental.at-3417-prog.cob:17.11-17.14: 14 01 i BINARY-LONG. 15 01 r BINARY-LONG. 16 PROCEDURE DIVISION USING i RETURNING r. @@ -155,7 +157,7 @@ run_fundamental.at-1390-prog.cob:17.11-17.14: 19 . >> Error: Invalid syntax -run_fundamental.at-1390-prog.cob:17.16: +run_fundamental.at-3417-prog.cob:17.16: 14 01 i BINARY-LONG. 15 01 r BINARY-LONG. 16 PROCEDURE DIVISION USING i RETURNING r. @@ -165,7 +167,7 @@ run_fundamental.at-1390-prog.cob:17.16: 19 . >> Hint: Missing . -run_fundamental.at-1390-prog.cob:17.17-17.19: +run_fundamental.at-3417-prog.cob:17.17-17.19: 14 01 i BINARY-LONG. 15 01 r BINARY-LONG. 16 PROCEDURE DIVISION USING i RETURNING r. @@ -175,7 +177,7 @@ run_fundamental.at-1390-prog.cob:17.17-17.19: 19 . >> Warning: Invalid syntax -run_fundamental.at-1390-prog.cob:17.21: +run_fundamental.at-3417-prog.cob:17.21: 14 01 i BINARY-LONG. 15 01 r BINARY-LONG. 16 PROCEDURE DIVISION USING i RETURNING r. @@ -185,7 +187,7 @@ run_fundamental.at-1390-prog.cob:17.21: 19 . >> Hint: Missing . -run_fundamental.at-1390-prog.cob:17.22-17.28: +run_fundamental.at-3417-prog.cob:17.22-17.28: 14 01 i BINARY-LONG. 15 01 r BINARY-LONG. 16 PROCEDURE DIVISION USING i RETURNING r. @@ -195,7 +197,7 @@ run_fundamental.at-1390-prog.cob:17.22-17.28: 19 . >> Warning: Invalid syntax -run_fundamental.at-1390-prog.cob:17.30: +run_fundamental.at-3417-prog.cob:17.30: 14 01 i BINARY-LONG. 15 01 r BINARY-LONG. 16 PROCEDURE DIVISION USING i RETURNING r. @@ -205,7 +207,7 @@ run_fundamental.at-1390-prog.cob:17.30: 19 . >> Hint: Missing . -run_fundamental.at-1390-prog.cob:18.11-18.17: +run_fundamental.at-3417-prog.cob:18.11-18.17: 15 01 r BINARY-LONG. 16 PROCEDURE DIVISION USING i RETURNING r. 17 add i to i giving r @@ -215,7 +217,7 @@ run_fundamental.at-1390-prog.cob:18.11-18.17: 20 END FUNCTION f2. >> Warning: Invalid syntax -run_fundamental.at-1390-prog.cob:45.19-45.20: +run_fundamental.at-3417-prog.cob:45.19-45.20: 42 77 curr PIC 9.9999,99Y. 43 44 PROCEDURE DIVISION. @@ -225,7 +227,7 @@ run_fundamental.at-1390-prog.cob:45.19-45.20: 47 DISPLAY "ERROR 1" GOBACK >> Error: Invalid syntax -run_fundamental.at-1390-prog.cob:45.19: +run_fundamental.at-3417-prog.cob:45.19: 42 77 curr PIC 9.9999,99Y. 43 44 PROCEDURE DIVISION. @@ -235,7 +237,7 @@ run_fundamental.at-1390-prog.cob:45.19: 47 DISPLAY "ERROR 1" GOBACK >> Hint: Missing -run_fundamental.at-1390-prog.cob:53.19-53.20: +run_fundamental.at-3417-prog.cob:53.19-53.20: 50 IF n1 NOT = 2 51 DISPLAY "ERROR 2" GOBACK 52 END-IF @@ -245,7 +247,7 @@ run_fundamental.at-1390-prog.cob:53.19-53.20: 55 DISPLAY "ERROR 1 2nd" GOBACK >> Error: Invalid syntax -run_fundamental.at-1390-prog.cob:53.19: +run_fundamental.at-3417-prog.cob:53.19: 50 IF n1 NOT = 2 51 DISPLAY "ERROR 2" GOBACK 52 END-IF @@ -255,9 +257,9 @@ run_fundamental.at-1390-prog.cob:53.19: 55 DISPLAY "ERROR 1 2nd" GOBACK >> Hint: Missing -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1412:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1494:0 -run_fundamental.at-1494-prog.cob:11.71: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3439:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3521:0 +run_fundamental.at-3521-prog.cob:11.71: 8 01 argument PIC X ANY LENGTH. 9 01 result. 10 05 filler PIC X OCCURS 0 to 999 DEPENDING ON arg-len. @@ -267,7 +269,7 @@ run_fundamental.at-1494-prog.cob:11.71: 13 MOVE argument TO result. >> Hint: Missing END -run_fundamental.at-1494-prog.cob:12.11-12.15: +run_fundamental.at-3521-prog.cob:12.11-12.15: 9 01 result. 10 05 filler PIC X OCCURS 0 to 999 DEPENDING ON arg-len. 11 PROCEDURE DIVISION USING BY REFERENCE argument RETURNING result. @@ -277,7 +279,7 @@ run_fundamental.at-1494-prog.cob:12.11-12.15: 14 END FUNCTION reply. >> Error: Invalid syntax -run_fundamental.at-1494-prog.cob:12.24: +run_fundamental.at-3521-prog.cob:12.24: 9 01 result. 10 05 filler PIC X OCCURS 0 to 999 DEPENDING ON arg-len. 11 PROCEDURE DIVISION USING BY REFERENCE argument RETURNING result. @@ -287,7 +289,7 @@ run_fundamental.at-1494-prog.cob:12.24: 14 END FUNCTION reply. >> Hint: Missing -run_fundamental.at-1494-prog.cob:12.25-12.31: +run_fundamental.at-3521-prog.cob:12.25-12.31: 9 01 result. 10 05 filler PIC X OCCURS 0 to 999 DEPENDING ON arg-len. 11 PROCEDURE DIVISION USING BY REFERENCE argument RETURNING result. @@ -297,7 +299,7 @@ run_fundamental.at-1494-prog.cob:12.25-12.31: 14 END FUNCTION reply. >> Error: Invalid syntax -run_fundamental.at-1494-prog.cob:14.7-14.10: +run_fundamental.at-3521-prog.cob:14.7-14.10: 11 PROCEDURE DIVISION USING BY REFERENCE argument RETURNING result. 12 MOVE FUNCTION LENGTH (argument) TO arg-len 13 MOVE argument TO result. @@ -307,10 +309,10 @@ run_fundamental.at-1494-prog.cob:14.7-14.10: 16 IDENTIFICATION DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1526:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1525:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1558:0 -run_fundamental.at-1558-module.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3553:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3552:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3585:0 +run_fundamental.at-3585-module.c:5.6-5.7: 2 #include 3 #include 4 @@ -320,7 +322,7 @@ run_fundamental.at-1558-module.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -run_fundamental.at-1558-module.c:5.7-5.8: +run_fundamental.at-3585-module.c:5.7-5.8: 2 #include 3 #include 4 @@ -330,7 +332,7 @@ run_fundamental.at-1558-module.c:5.7-5.8: 7 { >> Error: Invalid syntax -run_fundamental.at-1558-module.c:6.6-6.7: +run_fundamental.at-3585-module.c:6.6-6.7: 3 #include 4 5 COB_EXT_EXPORT int @@ -340,7 +342,7 @@ run_fundamental.at-1558-module.c:6.6-6.7: 8 return 0; >> Error: Unexpected indicator: `v' -run_fundamental.at-1558-module.c:8.6-8.7: +run_fundamental.at-3585-module.c:8.6-8.7: 5 COB_EXT_EXPORT int 6 some (void) 7 { @@ -349,14 +351,14 @@ run_fundamental.at-1558-module.c:8.6-8.7: 9 } >> Error: Unexpected indicator: `r' -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1557:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1617:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1670:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1723:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1777:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1856:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:1956:0 -run_fundamental.at-1956-prog.cob:60.50: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3584:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3644:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3697:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3750:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3804:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3883:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3983:0 +run_fundamental.at-3983-prog.cob:60.50: 57 58 DATA DIVISION. 59 WORKING-STORAGE SECTION. @@ -366,7 +368,7 @@ run_fundamental.at-1956-prog.cob:60.50: 62 >> Hint: Missing -run_fundamental.at-1956-prog.cob:60.51-60.55: +run_fundamental.at-3983-prog.cob:60.51-60.55: 57 58 DATA DIVISION. 59 WORKING-STORAGE SECTION. @@ -376,8 +378,8 @@ run_fundamental.at-1956-prog.cob:60.51-60.55: 62 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2060:0 -run_fundamental.at-2060-prog.cob:28.50: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4087:0 +run_fundamental.at-4087-prog.cob:28.50: 25 . 26 DATA DIVISION. 27 WORKING-STORAGE SECTION. @@ -387,7 +389,7 @@ run_fundamental.at-2060-prog.cob:28.50: 30 >> Hint: Missing -run_fundamental.at-2060-prog.cob:28.51-28.55: +run_fundamental.at-4087-prog.cob:28.51-28.55: 25 . 26 DATA DIVISION. 27 WORKING-STORAGE SECTION. @@ -397,24 +399,24 @@ run_fundamental.at-2060-prog.cob:28.51-28.55: 30 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2119:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2170:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2219:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2271:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2293:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2329:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2330:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2371:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2372:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2397:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2429:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2453:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2477:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2501:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2526:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2549:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2571:0 -run_fundamental.at-2571-prog.cob:11.20-11.26: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4146:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4197:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4246:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4298:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4320:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4356:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4357:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4398:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4399:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4424:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4455:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4480:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4504:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4528:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4553:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4576:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4598:0 +run_fundamental.at-4598-prog.cob:11.20-11.26: 8 01 NORMAL PIC 9 VALUE 0. 9 PROCEDURE DIVISION. 10 DISPLAY NORMAL NO ADVANCING *> Intentionally no period or END-DISPLAY @@ -422,22 +424,22 @@ run_fundamental.at-2571-prog.cob:11.20-11.26: ---- ^^^^^^ >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2598:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2625:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2688:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2751:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2814:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2877:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:2940:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3003:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3066:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3102:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3338:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3642:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:3877:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4112:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4171:0 -run_fundamental.at-4171-dump.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4625:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4652:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4715:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4778:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4841:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4904:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4967:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5030:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5093:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5129:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5365:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5669:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5904:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6139:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6198:0 +run_fundamental.at-6198-dump.c:5.6-5.7: 2 #include 3 #include 4 @@ -447,7 +449,7 @@ run_fundamental.at-4171-dump.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -run_fundamental.at-4171-dump.c:5.7-5.8: +run_fundamental.at-6198-dump.c:5.7-5.8: 2 #include 3 #include 4 @@ -457,7 +459,7 @@ run_fundamental.at-4171-dump.c:5.7-5.8: 7 { >> Error: Invalid syntax -run_fundamental.at-4171-dump.c:6.6-6.7: +run_fundamental.at-6198-dump.c:6.6-6.7: 3 #include 4 5 COB_EXT_EXPORT int @@ -467,7 +469,7 @@ run_fundamental.at-4171-dump.c:6.6-6.7: 8 printf ("%c%c", p[0], p[1]); >> Error: Unexpected indicator: `c' -run_fundamental.at-4171-dump.c:8.6-8.7: +run_fundamental.at-6198-dump.c:8.6-8.7: 5 COB_EXT_EXPORT int 6 dump (char *p) 7 { @@ -477,7 +479,7 @@ run_fundamental.at-4171-dump.c:8.6-8.7: 10 } >> Error: Unexpected indicator: `t' -run_fundamental.at-4171-dump.c:9.6-9.7: +run_fundamental.at-6198-dump.c:9.6-9.7: 6 dump (char *p) 7 { 8 printf ("%c%c", p[0], p[1]); @@ -486,13 +488,13 @@ run_fundamental.at-4171-dump.c:9.6-9.7: 10 } >> Error: Unexpected indicator: `r' -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4172:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4462:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4508:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4560:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4608:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4648:0 -run_fundamental.at-4648-prog.cob:12.7-12.19: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6199:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6489:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6535:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6587:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6635:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6675:0 +run_fundamental.at-6675-prog.cob:12.7-12.19: 9 05 misalign-1 PIC X. 10 05 ptr POINTER, SYNC. 11 05 ptr-num REDEFINES ptr, @@ -502,7 +504,7 @@ run_fundamental.at-4648-prog.cob:12.7-12.19: 14 >>ELSE >> Error: Malformed compiler directive -run_fundamental.at-4648-prog.cob:14.7-14.13: +run_fundamental.at-6675-prog.cob:14.7-14.13: 11 05 ptr-num REDEFINES ptr, 12 >>IF P64 SET 13 USAGE BINARY-DOUBLE UNSIGNED. @@ -512,7 +514,7 @@ run_fundamental.at-4648-prog.cob:14.7-14.13: 16 >>END-IF >> Error: Unexpected >>ELSE compiler directive -run_fundamental.at-4648-prog.cob:15.40-15.45: +run_fundamental.at-6675-prog.cob:15.40-15.45: 12 >>IF P64 SET 13 USAGE BINARY-DOUBLE UNSIGNED. 14 >>ELSE @@ -522,7 +524,7 @@ run_fundamental.at-4648-prog.cob:15.40-15.45: 17 05 misalign-2 PIC X. >> Error: Invalid syntax -run_fundamental.at-4648-prog.cob:16.7-16.15: +run_fundamental.at-6675-prog.cob:16.7-16.15: 13 USAGE BINARY-DOUBLE UNSIGNED. 14 >>ELSE 15 USAGE BINARY-LONG UNSIGNED. @@ -532,17 +534,18 @@ run_fundamental.at-4648-prog.cob:16.7-16.15: 18 >> Error: Unexpected >>END-IF compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4745:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4774:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4802:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4828:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4861:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:4982:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5018:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5040:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5063:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5089:0 -run_fundamental.at-5089-prog.cob:12.36: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6772:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6801:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6829:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6855:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6888:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7009:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7045:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7078:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7100:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7123:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7149:0 +run_fundamental.at-7149-prog.cob:12.36: 9 PROCEDURE DIVISION. 10 D DISPLAY "KO" NO ADVANCING UPON STDOUT 11 D END-DISPLAY. @@ -552,7 +555,7 @@ run_fundamental.at-5089-prog.cob:12.36: 14 STOP RUN. >> Hint: Missing . -run_fundamental.at-5089-prog.cob:12.37-12.41: +run_fundamental.at-7149-prog.cob:12.37-12.41: 9 PROCEDURE DIVISION. 10 D DISPLAY "KO" NO ADVANCING UPON STDOUT 11 D END-DISPLAY. @@ -562,7 +565,7 @@ run_fundamental.at-5089-prog.cob:12.37-12.41: 14 STOP RUN. >> Warning: Invalid syntax -run_fundamental.at-5089-prog.cob:13.11-13.22: +run_fundamental.at-7149-prog.cob:13.11-13.22: 10 D DISPLAY "KO" NO ADVANCING UPON STDOUT 11 D END-DISPLAY. 12 DISPLAY "OK" NO ADVANCING UPON STDOUT @@ -571,8 +574,8 @@ run_fundamental.at-5089-prog.cob:13.11-13.22: 14 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5112:0 -run_fundamental.at-5112-prog.cob:9.6-9.38: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7172:0 +run_fundamental.at-7172-prog.cob:9.6-9.38: 6 PROCEDURE DIVISION. 7 DISPLAY "OK" NO ADVANCING 8 END-DISPLAY. @@ -582,7 +585,7 @@ run_fundamental.at-5112-prog.cob:9.6-9.38: 11 STOP RUN. >> Error: Invalid >>D compiler directive -run_fundamental.at-5112-prog.cob:10.6-10.25: +run_fundamental.at-7172-prog.cob:10.6-10.25: 7 DISPLAY "OK" NO ADVANCING 8 END-DISPLAY. 9 >>D DISPLAY "KO" NO ADVANCING @@ -591,8 +594,8 @@ run_fundamental.at-5112-prog.cob:10.6-10.25: 11 STOP RUN. >> Error: Invalid >>D compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5135:0 -run_fundamental.at-5135-prog.cob:9.6-9.38: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7195:0 +run_fundamental.at-7195-prog.cob:9.6-9.38: 6 PROCEDURE DIVISION. 7 DISPLAY "OK" NO ADVANCING 8 END-DISPLAY. @@ -602,7 +605,7 @@ run_fundamental.at-5135-prog.cob:9.6-9.38: 11 STOP RUN. >> Error: Invalid >>D compiler directive -run_fundamental.at-5135-prog.cob:10.6-10.25: +run_fundamental.at-7195-prog.cob:10.6-10.25: 7 DISPLAY "OK" NO ADVANCING 8 END-DISPLAY. 9 >>D DISPLAY "KO" NO ADVANCING @@ -611,17 +614,17 @@ run_fundamental.at-5135-prog.cob:10.6-10.25: 11 STOP RUN. >> Error: Invalid >>D compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5172:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5217:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5262:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5313:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5363:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5426:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5486:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5538:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5576:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5623:0 -run_fundamental.at-5623-prog.cob:10.43: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7232:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7277:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7322:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7373:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7423:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7486:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7546:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7598:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7636:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7683:0 +run_fundamental.at-7683-prog.cob:10.43: 7 DATA DIVISION. 8 WORKING-STORAGE SECTION. 9 01 DATA-FIELD PIC X(40) VALUE "ABCD" BASED. @@ -631,7 +634,7 @@ run_fundamental.at-5623-prog.cob:10.43: 12 LINKAGE SECTION. >> Hint: Missing -run_fundamental.at-5623-prog.cob:10.44-10.48: +run_fundamental.at-7683-prog.cob:10.44-10.48: 7 DATA DIVISION. 8 WORKING-STORAGE SECTION. 9 01 DATA-FIELD PIC X(40) VALUE "ABCD" BASED. @@ -641,19 +644,19 @@ run_fundamental.at-5623-prog.cob:10.44-10.48: 12 LINKAGE SECTION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:5670:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6013:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6072:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6161:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6229:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6281:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6280:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6308:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6385:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6348:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6440:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6484:0 -run_fundamental.at-6484-prog.cob:13.26: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7730:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8073:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8132:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8221:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8289:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8351:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8350:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8378:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8455:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8418:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8510:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8554:0 +run_fundamental.at-8554-prog.cob:13.26: 10 PROCEDURE DIVISION. 11 MAIN-PROGRAM SECTION. 12 INIZIO. @@ -663,7 +666,7 @@ run_fundamental.at-6484-prog.cob:13.26: 15 END-IF >> Hint: Missing ) -run_fundamental.at-6484-prog.cob:13.27-13.30: +run_fundamental.at-8554-prog.cob:13.27-13.30: 10 PROCEDURE DIVISION. 11 MAIN-PROGRAM SECTION. 12 INIZIO. @@ -673,7 +676,7 @@ run_fundamental.at-6484-prog.cob:13.27-13.30: 15 END-IF >> Error: Invalid syntax -run_fundamental.at-6484-prog.cob:13.44-13.45: +run_fundamental.at-8554-prog.cob:13.44-13.45: 10 PROCEDURE DIVISION. 11 MAIN-PROGRAM SECTION. 12 INIZIO. @@ -683,7 +686,7 @@ run_fundamental.at-6484-prog.cob:13.44-13.45: 15 END-IF >> Error: Invalid syntax -run_fundamental.at-6484-prog.cob:16.30: +run_fundamental.at-8554-prog.cob:16.30: 13 IF VAR1 = (VAR2 AND VAR3 AND VAR4) 14 DISPLAY "TRUE 1" 15 END-IF @@ -693,7 +696,7 @@ run_fundamental.at-6484-prog.cob:16.30: 18 END-IF >> Hint: Missing ) -run_fundamental.at-6484-prog.cob:16.31-16.34: +run_fundamental.at-8554-prog.cob:16.31-16.34: 13 IF VAR1 = (VAR2 AND VAR3 AND VAR4) 14 DISPLAY "TRUE 1" 15 END-IF @@ -703,7 +706,7 @@ run_fundamental.at-6484-prog.cob:16.31-16.34: 18 END-IF >> Error: Invalid syntax -run_fundamental.at-6484-prog.cob:16.48-16.49: +run_fundamental.at-8554-prog.cob:16.48-16.49: 13 IF VAR1 = (VAR2 AND VAR3 AND VAR4) 14 DISPLAY "TRUE 1" 15 END-IF @@ -713,7 +716,7 @@ run_fundamental.at-6484-prog.cob:16.48-16.49: 18 END-IF >> Error: Invalid syntax -run_fundamental.at-6484-prog.cob:19.30: +run_fundamental.at-8554-prog.cob:19.30: 16 IF VAR1 NOT = (VAR2 AND VAR3 AND VAR4) 17 DISPLAY "TRUE 2" 18 END-IF @@ -723,7 +726,7 @@ run_fundamental.at-6484-prog.cob:19.30: 21 END-IF >> Hint: Missing ) -run_fundamental.at-6484-prog.cob:19.31-19.34: +run_fundamental.at-8554-prog.cob:19.31-19.34: 16 IF VAR1 NOT = (VAR2 AND VAR3 AND VAR4) 17 DISPLAY "TRUE 2" 18 END-IF @@ -733,7 +736,7 @@ run_fundamental.at-6484-prog.cob:19.31-19.34: 21 END-IF >> Error: Invalid syntax -run_fundamental.at-6484-prog.cob:19.48-19.49: +run_fundamental.at-8554-prog.cob:19.48-19.49: 16 IF VAR1 NOT = (VAR2 AND VAR3 AND VAR4) 17 DISPLAY "TRUE 2" 18 END-IF @@ -743,9 +746,9 @@ run_fundamental.at-6484-prog.cob:19.48-19.49: 21 END-IF >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6560:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6764:0 -run_fundamental.at-6764-prog.cob:174.16-174.22: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8629:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8833:0 +run_fundamental.at-8833-prog.cob:174.16-174.22: 171 CHECK-LENGTH. 172 *>----------- 173 *> @@ -755,7 +758,7 @@ run_fundamental.at-6764-prog.cob:174.16-174.22: 176 THEN >> Error: Invalid syntax -run_fundamental.at-6764-prog.cob:179.16-179.22: +run_fundamental.at-8833-prog.cob:179.16-179.22: 176 THEN 177 DISPLAY 'Error 1 size <' W01-I '> !=2' . 178 *> @@ -765,7 +768,7 @@ run_fundamental.at-6764-prog.cob:179.16-179.22: 181 THEN >> Error: Invalid syntax -run_fundamental.at-6764-prog.cob:184.16-184.22: +run_fundamental.at-8833-prog.cob:184.16-184.22: 181 THEN 182 DISPLAY 'Error 2 size <' W01-I '> !=2' . 183 *> @@ -775,7 +778,7 @@ run_fundamental.at-6764-prog.cob:184.16-184.22: 186 THEN >> Error: Invalid syntax -run_fundamental.at-6764-prog.cob:190.16-190.22: +run_fundamental.at-8833-prog.cob:190.16-190.22: 187 DISPLAY 'Error 3 size <' W01-I '> !=1' . 188 *> 189 @@ -785,15 +788,15 @@ run_fundamental.at-6764-prog.cob:190.16-190.22: 192 THEN >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6816:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6874:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6925:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:6977:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7029:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7158:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:7232:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:9015:0 -run_fundamental.at-9015-prog.cob:30.22-30.32: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8885:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8943:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:8994:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:9046:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:9098:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:9227:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:9301:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:11084:0 +run_fundamental.at-11084-prog.cob:30.22-30.32: 27 05 FIELD-15 FLOAT-DECIMAL-34 . 28 05 FIELD-16 FLOAT-LONG . 29 05 FIELD-17 FLOAT-SHORT . @@ -803,7 +806,7 @@ run_fundamental.at-9015-prog.cob:30.22-30.32: 32 05 FIELD-20 SIGNED-SHORT . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:31.22-31.33: +run_fundamental.at-11084-prog.cob:31.22-31.33: 28 05 FIELD-16 FLOAT-LONG . 29 05 FIELD-17 FLOAT-SHORT . 30 05 FIELD-18 SIGNED-INT . @@ -813,7 +816,7 @@ run_fundamental.at-9015-prog.cob:31.22-31.33: 33 05 FIELD-21 UNSIGNED-INT . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:32.22-32.34: +run_fundamental.at-11084-prog.cob:32.22-32.34: 29 05 FIELD-17 FLOAT-SHORT . 30 05 FIELD-18 SIGNED-INT . 31 05 FIELD-19 SIGNED-LONG . @@ -823,7 +826,7 @@ run_fundamental.at-9015-prog.cob:32.22-32.34: 34 05 FIELD-22 UNSIGNED-LONG . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:33.22-33.34: +run_fundamental.at-11084-prog.cob:33.22-33.34: 30 05 FIELD-18 SIGNED-INT . 31 05 FIELD-19 SIGNED-LONG . 32 05 FIELD-20 SIGNED-SHORT . @@ -833,7 +836,7 @@ run_fundamental.at-9015-prog.cob:33.22-33.34: 35 05 FIELD-23 UNSIGNED-SHORT . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:34.22-34.35: +run_fundamental.at-11084-prog.cob:34.22-34.35: 31 05 FIELD-19 SIGNED-LONG . 32 05 FIELD-20 SIGNED-SHORT . 33 05 FIELD-21 UNSIGNED-INT . @@ -843,7 +846,7 @@ run_fundamental.at-9015-prog.cob:34.22-34.35: 36 05 FIELD-24 COMP-1 . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:35.22-35.36: +run_fundamental.at-11084-prog.cob:35.22-35.36: 32 05 FIELD-20 SIGNED-SHORT . 33 05 FIELD-21 UNSIGNED-INT . 34 05 FIELD-22 UNSIGNED-LONG . @@ -853,7 +856,7 @@ run_fundamental.at-9015-prog.cob:35.22-35.36: 37 05 FIELD-25 COMP-2 . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:66.22-66.32: +run_fundamental.at-11084-prog.cob:66.22-66.32: 63 05 FIELD-15 FLOAT-DECIMAL-34 . 64 05 FIELD-16 FLOAT-LONG . 65 05 FIELD-17 FLOAT-SHORT . @@ -863,7 +866,7 @@ run_fundamental.at-9015-prog.cob:66.22-66.32: 68 05 FIELD-20 SIGNED-SHORT . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:67.22-67.33: +run_fundamental.at-11084-prog.cob:67.22-67.33: 64 05 FIELD-16 FLOAT-LONG . 65 05 FIELD-17 FLOAT-SHORT . 66 05 FIELD-18 SIGNED-INT . @@ -873,7 +876,7 @@ run_fundamental.at-9015-prog.cob:67.22-67.33: 69 05 FIELD-21 UNSIGNED-INT . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:68.22-68.34: +run_fundamental.at-11084-prog.cob:68.22-68.34: 65 05 FIELD-17 FLOAT-SHORT . 66 05 FIELD-18 SIGNED-INT . 67 05 FIELD-19 SIGNED-LONG . @@ -883,7 +886,7 @@ run_fundamental.at-9015-prog.cob:68.22-68.34: 70 05 FIELD-22 UNSIGNED-LONG . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:69.22-69.34: +run_fundamental.at-11084-prog.cob:69.22-69.34: 66 05 FIELD-18 SIGNED-INT . 67 05 FIELD-19 SIGNED-LONG . 68 05 FIELD-20 SIGNED-SHORT . @@ -893,7 +896,7 @@ run_fundamental.at-9015-prog.cob:69.22-69.34: 71 05 FIELD-23 UNSIGNED-SHORT . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:70.22-70.35: +run_fundamental.at-11084-prog.cob:70.22-70.35: 67 05 FIELD-19 SIGNED-LONG . 68 05 FIELD-20 SIGNED-SHORT . 69 05 FIELD-21 UNSIGNED-INT . @@ -903,7 +906,7 @@ run_fundamental.at-9015-prog.cob:70.22-70.35: 72 05 FIELD-24 COMP-1 . >> Error: Invalid syntax -run_fundamental.at-9015-prog.cob:71.22-71.36: +run_fundamental.at-11084-prog.cob:71.22-71.36: 68 05 FIELD-20 SIGNED-SHORT . 69 05 FIELD-21 UNSIGNED-INT . 70 05 FIELD-22 UNSIGNED-LONG . @@ -913,9 +916,9 @@ run_fundamental.at-9015-prog.cob:71.22-71.36: 73 05 FIELD-25 COMP-2 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:9060:0 -Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:9123:0 -run_fundamental.at-9123-prog.cob:10.7-10.12: +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:11129:0 +Considering: import/gnucobol/tests/testsuite.src/run_fundamental.at:11192:0 +run_fundamental.at-11192-prog.cob:10.7-10.12: 7 SPECIAL-NAMES . 8 CLASS HEXA IS '0' THRU '9' 9 'A' THRU 'F' . diff --git a/test/output-tests/run_misc.expected b/test/output-tests/run_misc.expected index 9a901e5ed..fafb41b27 100644 --- a/test/output-tests/run_misc.expected +++ b/test/output-tests/run_misc.expected @@ -72,79 +72,59 @@ Considering: import/gnucobol/tests/testsuite.src/run_misc.at:341:0 Considering: import/gnucobol/tests/testsuite.src/run_misc.at:340:0 Considering: import/gnucobol/tests/testsuite.src/run_misc.at:342:0 Considering: import/gnucobol/tests/testsuite.src/run_misc.at:394:0 -run_misc.at-394-callee.cob:15.42: - 12 01 LCL-X. - 13 05 LCL-VAR PIC 9 VALUE 0 OCCURS 1 INDEXED BY LCL-IDX. - 14 PROCEDURE DIVISION. - 15 > DISPLAY SPACE WITH NO ADVANCING UPON SYSOUT. +run_misc.at-394-callee.cob:12.42: + 9 01 WRK-X. + 10 05 WRK-VAR PIC 9 VALUE 0 OCCURS 1 INDEXED BY WRK-IDX. + 11 PROCEDURE DIVISION. + 12 > DISPLAY SPACE WITH NO ADVANCING UPON SYSOUT. ---- ^ - 16 ADD 1 TO WRK-VAR(1) LCL-VAR(1) - 17 SET WRK-IDX, LCL-IDX UP BY 1 + 13 ADD 1 TO WRK-VAR(1) + 14 SET WRK-IDX UP BY 1 >> Hint: Missing . -run_misc.at-394-callee.cob:15.43-15.47: - 12 01 LCL-X. - 13 05 LCL-VAR PIC 9 VALUE 0 OCCURS 1 INDEXED BY LCL-IDX. - 14 PROCEDURE DIVISION. - 15 > DISPLAY SPACE WITH NO ADVANCING UPON SYSOUT. +run_misc.at-394-callee.cob:12.43-12.47: + 9 01 WRK-X. + 10 05 WRK-VAR PIC 9 VALUE 0 OCCURS 1 INDEXED BY WRK-IDX. + 11 PROCEDURE DIVISION. + 12 > DISPLAY SPACE WITH NO ADVANCING UPON SYSOUT. ---- ^^^^ - 16 ADD 1 TO WRK-VAR(1) LCL-VAR(1) - 17 SET WRK-IDX, LCL-IDX UP BY 1 + 13 ADD 1 TO WRK-VAR(1) + 14 SET WRK-IDX UP BY 1 >> Warning: Invalid syntax -run_misc.at-394-callee.cob:20.46: - 17 SET WRK-IDX, LCL-IDX UP BY 1 - 18 SET DISP-IDX TO WRK-IDX. - 19 MOVE WRK-VAR(1) TO DISP-VAL. - 20 > DISPLAY DISP-VALS WITH NO ADVANCING UPON SYSOUT. +run_misc.at-394-callee.cob:17.46: + 14 SET WRK-IDX UP BY 1 + 15 SET DISP-IDX TO WRK-IDX. + 16 MOVE WRK-VAR(1) TO DISP-VAL. + 17 > DISPLAY DISP-VALS WITH NO ADVANCING UPON SYSOUT. ---- ^ - 21 SET DISP-IDX TO LCL-IDX. - 22 MOVE LCL-VAR(1) TO DISP-VAL. + 18 GOBACK. >> Hint: Missing . -run_misc.at-394-callee.cob:20.47-20.51: - 17 SET WRK-IDX, LCL-IDX UP BY 1 - 18 SET DISP-IDX TO WRK-IDX. - 19 MOVE WRK-VAR(1) TO DISP-VAL. - 20 > DISPLAY DISP-VALS WITH NO ADVANCING UPON SYSOUT. +run_misc.at-394-callee.cob:17.47-17.51: + 14 SET WRK-IDX UP BY 1 + 15 SET DISP-IDX TO WRK-IDX. + 16 MOVE WRK-VAR(1) TO DISP-VAL. + 17 > DISPLAY DISP-VALS WITH NO ADVANCING UPON SYSOUT. ---- ^^^^ - 21 SET DISP-IDX TO LCL-IDX. - 22 MOVE LCL-VAR(1) TO DISP-VAL. ->> Warning: Invalid syntax - -run_misc.at-394-callee.cob:23.46: - 20 DISPLAY DISP-VALS WITH NO ADVANCING UPON SYSOUT. - 21 SET DISP-IDX TO LCL-IDX. - 22 MOVE LCL-VAR(1) TO DISP-VAL. - 23 > DISPLAY DISP-VALS WITH NO ADVANCING UPON SYSOUT. ----- ^ - 24 GOBACK. ->> Hint: Missing . - -run_misc.at-394-callee.cob:23.47-23.51: - 20 DISPLAY DISP-VALS WITH NO ADVANCING UPON SYSOUT. - 21 SET DISP-IDX TO LCL-IDX. - 22 MOVE LCL-VAR(1) TO DISP-VAL. - 23 > DISPLAY DISP-VALS WITH NO ADVANCING UPON SYSOUT. ----- ^^^^ - 24 GOBACK. + 18 GOBACK. >> Warning: Invalid syntax Considering: import/gnucobol/tests/testsuite.src/run_misc.at:395:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:463:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:464:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:506:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:507:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:570:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:569:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:573:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:610:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:634:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:658:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:681:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:705:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:739:0 -run_misc.at-739-dump.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:468:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:469:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:511:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:512:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:575:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:574:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:578:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:615:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:639:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:663:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:686:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:710:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:744:0 +run_misc.at-744-dump.c:5.6-5.7: 2 #include 3 #include 4 @@ -154,7 +134,7 @@ run_misc.at-739-dump.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -run_misc.at-739-dump.c:5.7-5.8: +run_misc.at-744-dump.c:5.7-5.8: 2 #include 3 #include 4 @@ -164,7 +144,7 @@ run_misc.at-739-dump.c:5.7-5.8: 7 { >> Error: Invalid syntax -run_misc.at-739-dump.c:6.6-6.7: +run_misc.at-744-dump.c:6.6-6.7: 3 #include 4 5 COB_EXT_EXPORT int @@ -174,7 +154,7 @@ run_misc.at-739-dump.c:6.6-6.7: 8 printf ("%02x%02x%02x", data[0], data[1], data[2]); >> Error: Unexpected indicator: `u' -run_misc.at-739-dump.c:8.6-8.7: +run_misc.at-744-dump.c:8.6-8.7: 5 COB_EXT_EXPORT int 6 dump (unsigned char *data) 7 { @@ -184,7 +164,7 @@ run_misc.at-739-dump.c:8.6-8.7: 10 } >> Error: Unexpected indicator: `t' -run_misc.at-739-dump.c:9.6-9.7: +run_misc.at-744-dump.c:9.6-9.7: 6 dump (unsigned char *data) 7 { 8 printf ("%02x%02x%02x", data[0], data[1], data[2]); @@ -193,14 +173,14 @@ run_misc.at-739-dump.c:9.6-9.7: 10 } >> Error: Unexpected indicator: `r' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:740:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:782:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:804:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:844:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:870:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:905:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:942:0 -run_misc.at-942-prog.cob:2.7-2.44: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:745:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:787:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:809:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:849:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:875:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:910:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:947:0 +run_misc.at-947-prog.cob:2.7-2.44: 1 2 > >>TURN EC-BOUND-SUBSCRIPT CHECKING ON ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ @@ -208,7 +188,7 @@ run_misc.at-942-prog.cob:2.7-2.44: 4 PROGRAM-ID. prog. >> Error: Invalid >>TURN compiler directive -run_misc.at-942-prog.cob:14.7-14.45: +run_misc.at-947-prog.cob:14.7-14.45: 11 01 idx PIC 99 VALUE 6. 12 13 PROCEDURE DIVISION. @@ -218,7 +198,7 @@ run_misc.at-942-prog.cob:14.7-14.45: 16 >>TURN EC-BOUND-SUBSCRIPT CHECKING ON WITH LOCATION >> Error: Invalid >>TURN compiler directive -run_misc.at-942-prog.cob:16.7-16.58: +run_misc.at-947-prog.cob:16.7-16.58: 13 PROCEDURE DIVISION. 14 >>TURN EC-BOUND-SUBSCRIPT CHECKING OFF 15 DISPLAY y (idx) WITH NO ADVANCING @@ -228,7 +208,7 @@ run_misc.at-942-prog.cob:16.7-16.58: 18 DISPLAY y (idx) WITH NO ADVANCING >> Error: Invalid >>TURN compiler directive -run_misc.at-942-prog.cob:17.7-17.47: +run_misc.at-947-prog.cob:17.7-17.47: 14 >>TURN EC-BOUND-SUBSCRIPT CHECKING OFF 15 DISPLAY y (idx) WITH NO ADVANCING 16 >>TURN EC-BOUND-SUBSCRIPT CHECKING ON WITH LOCATION @@ -238,7 +218,7 @@ run_misc.at-942-prog.cob:17.7-17.47: 19 >>TURN EC-BOUND-SUBSCRIPT CHECKING ON >> Error: Invalid >>TURN compiler directive -run_misc.at-942-prog.cob:19.7-19.44: +run_misc.at-947-prog.cob:19.7-19.44: 16 >>TURN EC-BOUND-SUBSCRIPT CHECKING ON WITH LOCATION 17 >>TURN EC-BOUND, EC-PROGRAM CHECKING OFF 18 DISPLAY y (idx) WITH NO ADVANCING @@ -248,41 +228,41 @@ run_misc.at-942-prog.cob:19.7-19.44: 21 . >> Error: Invalid >>TURN compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:974:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:996:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1024:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1054:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1076:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1100:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1150:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1158:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1191:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1192:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1220:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1221:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1257:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1256:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1289:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1290:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1348:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1346:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1347:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1406:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1407:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1405:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1455:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1456:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1454:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1503:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1504:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1502:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1558:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1559:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1557:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1607:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1606:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1659:0 -run_misc.at-1659-dump.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:979:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1001:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1029:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1059:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1081:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1105:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1154:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1164:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1196:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1197:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1225:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1226:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1262:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1261:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1294:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1299:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1353:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1351:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1352:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1411:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1412:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1410:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1460:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1461:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1459:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1508:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1509:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1507:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1563:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1564:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1562:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1612:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1611:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1664:0 +run_misc.at-1664-dump.c:5.6-5.7: 2 #include 3 #include 4 @@ -292,7 +272,7 @@ run_misc.at-1659-dump.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -run_misc.at-1659-dump.c:5.7-5.8: +run_misc.at-1664-dump.c:5.7-5.8: 2 #include 3 #include 4 @@ -302,7 +282,7 @@ run_misc.at-1659-dump.c:5.7-5.8: 7 { >> Error: Invalid syntax -run_misc.at-1659-dump.c:6.6-6.7: +run_misc.at-1664-dump.c:6.6-6.7: 3 #include 4 5 COB_EXT_EXPORT int @@ -312,7 +292,7 @@ run_misc.at-1659-dump.c:6.6-6.7: 8 printf ("%8.8d\n", *p); >> Error: Unexpected indicator: `i' -run_misc.at-1659-dump.c:8.6-8.7: +run_misc.at-1664-dump.c:8.6-8.7: 5 COB_EXT_EXPORT int 6 dump (int *p) 7 { @@ -322,7 +302,7 @@ run_misc.at-1659-dump.c:8.6-8.7: 10 } >> Error: Unexpected indicator: `t' -run_misc.at-1659-dump.c:9.6-9.7: +run_misc.at-1664-dump.c:9.6-9.7: 6 dump (int *p) 7 { 8 printf ("%8.8d\n", *p); @@ -331,11 +311,11 @@ run_misc.at-1659-dump.c:9.6-9.7: 10 } >> Error: Unexpected indicator: `r' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1660:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1694:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1720:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1753:0 -run_misc.at-1753-prog.cob:9.11-9.19: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1671:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1699:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1725:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1758:0 +run_misc.at-1758-prog.cob:9.11-9.19: 6 CONFIGURATION SECTION. 7 SPECIAL-NAMES. 8 ALPHABET MY-ASCII IS STANDARD-1. @@ -345,8 +325,8 @@ run_misc.at-1753-prog.cob:9.11-9.19: 11 DATA DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1787:0 -run_misc.at-1787-prog.cob:8.29-8.34: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1797:0 +run_misc.at-1797-prog.cob:8.29-8.34: 5 ENVIRONMENT DIVISION. 6 CONFIGURATION SECTION. 7 SPECIAL-NAMES. @@ -356,7 +336,7 @@ run_misc.at-1787-prog.cob:8.29-8.34: 10 >> Error: Invalid syntax -run_misc.at-1787-prog.cob:8.34-8.35: +run_misc.at-1797-prog.cob:8.34-8.35: 5 ENVIRONMENT DIVISION. 6 CONFIGURATION SECTION. 7 SPECIAL-NAMES. @@ -366,7 +346,7 @@ run_misc.at-1787-prog.cob:8.34-8.35: 10 >> Error: Invalid syntax -run_misc.at-1787-prog.cob:8.34: +run_misc.at-1797-prog.cob:8.34: 5 ENVIRONMENT DIVISION. 6 CONFIGURATION SECTION. 7 SPECIAL-NAMES. @@ -376,7 +356,7 @@ run_misc.at-1787-prog.cob:8.34: 10 >> Hint: Missing IS -run_misc.at-1787-prog.cob:9.11-9.19: +run_misc.at-1797-prog.cob:9.11-9.19: 6 CONFIGURATION SECTION. 7 SPECIAL-NAMES. 8 ALPHABET ALPHA IS ASCII. @@ -386,30 +366,30 @@ run_misc.at-1787-prog.cob:9.11-9.19: 11 DATA DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1824:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1846:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1868:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1898:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2039:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2071:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2104:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2140:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2177:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2199:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2279:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2305:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2331:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2365:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2399:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2422:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2445:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2479:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2517:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2543:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2586:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2612:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2636:0 -run_misc.at-2636-prog.cob:9.33-9.34: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1829:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1851:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1873:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:1903:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2044:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2076:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2109:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2145:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2182:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2204:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2284:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2310:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2336:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2370:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2404:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2427:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2450:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2484:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2522:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2545:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2591:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2617:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2641:0 +run_misc.at-2641-prog.cob:9.33-9.34: 6 01 INDVAL PIC 9(4). 7 PROCEDURE DIVISION. 8 PERFORM VARYING INDVAL FROM 1 @@ -419,7 +399,7 @@ run_misc.at-2636-prog.cob:9.33-9.34: 11 DISPLAY INDVAL >> Error: Invalid syntax -run_misc.at-2636-prog.cob:9.33: +run_misc.at-2641-prog.cob:9.33: 6 01 INDVAL PIC 9(4). 7 PROCEDURE DIVISION. 8 PERFORM VARYING INDVAL FROM 1 @@ -429,12 +409,12 @@ run_misc.at-2636-prog.cob:9.33: 11 DISPLAY INDVAL >> Hint: Missing END_PERFORM -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2661:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2681:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2706:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2790:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2902:0 -run_misc.at-2902-prog.cob:59.19: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2666:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2686:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2711:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2795:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2907:0 +run_misc.at-2907-prog.cob:59.19: 56 * 57 * UNSTRING test 58 move spaces to simple-str @@ -444,7 +424,7 @@ run_misc.at-2902-prog.cob:59.19: 61 on overflow >> Hint: Missing -run_misc.at-2902-prog.cob:59.20-59.26: +run_misc.at-2907-prog.cob:59.20-59.26: 56 * 57 * UNSTRING test 58 move spaces to simple-str @@ -454,7 +434,7 @@ run_misc.at-2902-prog.cob:59.20-59.26: 61 on overflow >> Error: Invalid syntax -run_misc.at-2902-prog.cob:63.23: +run_misc.at-2907-prog.cob:63.23: 60 into simple-str 61 on overflow 62 move spaces to err-str @@ -464,7 +444,7 @@ run_misc.at-2902-prog.cob:63.23: 65 end-unstring >> Hint: Missing -run_misc.at-2902-prog.cob:63.24-63.43: +run_misc.at-2907-prog.cob:63.24-63.43: 60 into simple-str 61 on overflow 62 move spaces to err-str @@ -474,7 +454,7 @@ run_misc.at-2902-prog.cob:63.24-63.43: 65 end-unstring >> Error: Invalid syntax -run_misc.at-2902-prog.cob:80.19: +run_misc.at-2907-prog.cob:80.19: 77 end-if 78 * 79 move spaces to simple-str @@ -484,7 +464,7 @@ run_misc.at-2902-prog.cob:80.19: 82 on overflow >> Hint: Missing -run_misc.at-2902-prog.cob:80.20-80.45: +run_misc.at-2907-prog.cob:80.20-80.45: 77 end-if 78 * 79 move spaces to simple-str @@ -494,13 +474,13 @@ run_misc.at-2902-prog.cob:80.20-80.45: 82 on overflow >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2938:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2991:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3039:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3081:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3195:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3245:0 -run_misc.at-3245-prog.cob:24.19: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2943:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:2996:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3044:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3086:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3200:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3250:0 +run_misc.at-3250-prog.cob:24.19: 21 DISPLAY "PRM(2) is " PRM(2) ":". 22 DISPLAY "PRM(3) is " PRM(3) ":". 23 DISPLAY "PRM(4) is " PRM(4) ":". @@ -510,7 +490,7 @@ run_misc.at-3245-prog.cob:24.19: 26 DISPLAY "Now using Literal" >> Hint: Missing -run_misc.at-3245-prog.cob:24.20-24.47: +run_misc.at-3250-prog.cob:24.20-24.47: 21 DISPLAY "PRM(2) is " PRM(2) ":". 22 DISPLAY "PRM(3) is " PRM(3) ":". 23 DISPLAY "PRM(4) is " PRM(4) ":". @@ -520,8 +500,8 @@ run_misc.at-3245-prog.cob:24.20-24.47: 26 DISPLAY "Now using Literal" >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3299:0 -run_misc.at-3299-prog.cob:20.34-20.35: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3304:0 +run_misc.at-3304-prog.cob:20.34-20.35: 17 SORT TBL ASCENDING KEY TBL. 18 IF G NOT = "a3b2c5d4e1" 19 DISPLAY G. @@ -531,11 +511,11 @@ run_misc.at-3299-prog.cob:20.34-20.35: 22 DISPLAY G. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3403:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3513:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3516:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3538:0 -run_misc.at-3538-prog.cob:10.11-10.13: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3408:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3518:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3521:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3543:0 +run_misc.at-3543-prog.cob:10.11-10.13: 7 01 TBL REDEFINES VAL PIC X OCCURS 5. 8 PROCEDURE DIVISION. 9 SORT TBL ASCENDING @@ -544,8 +524,8 @@ run_misc.at-3538-prog.cob:10.11-10.13: 11 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3601:0 -run_misc.at-3601-prog.cob:7.29-7.35: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3606:0 +run_misc.at-3606-prog.cob:7.29-7.35: 4 ENVIRONMENT DIVISION. 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. @@ -555,7 +535,7 @@ run_misc.at-3601-prog.cob:7.29-7.35: 9 WORKING-STORAGE SECTION. >> Error: Invalid syntax -run_misc.at-3601-prog.cob:7.35-7.36: +run_misc.at-3606-prog.cob:7.35-7.36: 4 ENVIRONMENT DIVISION. 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. @@ -565,7 +545,7 @@ run_misc.at-3601-prog.cob:7.35-7.36: 9 WORKING-STORAGE SECTION. >> Error: Invalid syntax -run_misc.at-3601-prog.cob:7.35: +run_misc.at-3606-prog.cob:7.35: 4 ENVIRONMENT DIVISION. 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. @@ -575,8 +555,8 @@ run_misc.at-3601-prog.cob:7.35: 9 WORKING-STORAGE SECTION. >> Hint: Missing IS -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3603:0 -run_misc.at-3603-prog2.cob:9.35-9.41: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3608:0 +run_misc.at-3608-prog2.cob:9.35-9.41: 6 OBJECT-COMPUTER. 7 x86 PROGRAM COLLATING SEQUENCE IS EBCDIC-CODE. 8 SPECIAL-NAMES. @@ -586,7 +566,7 @@ run_misc.at-3603-prog2.cob:9.35-9.41: 11 WORKING-STORAGE SECTION. >> Error: Invalid syntax -run_misc.at-3603-prog2.cob:9.41-9.42: +run_misc.at-3608-prog2.cob:9.41-9.42: 6 OBJECT-COMPUTER. 7 x86 PROGRAM COLLATING SEQUENCE IS EBCDIC-CODE. 8 SPECIAL-NAMES. @@ -596,7 +576,7 @@ run_misc.at-3603-prog2.cob:9.41-9.42: 11 WORKING-STORAGE SECTION. >> Error: Invalid syntax -run_misc.at-3603-prog2.cob:9.41: +run_misc.at-3608-prog2.cob:9.41: 6 OBJECT-COMPUTER. 7 x86 PROGRAM COLLATING SEQUENCE IS EBCDIC-CODE. 8 SPECIAL-NAMES. @@ -606,8 +586,8 @@ run_misc.at-3603-prog2.cob:9.41: 11 WORKING-STORAGE SECTION. >> Hint: Missing IS -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3626:0 -run_misc.at-3626-prog.cob:11.11-11.17: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3631:0 +run_misc.at-3631-prog.cob:11.11-11.17: 8 IF "a" NOT < "1" 9 >>END-IF 10 DISPLAY "ERROR" END-DISPLAY @@ -616,23 +596,23 @@ run_misc.at-3626-prog.cob:11.11-11.17: 12 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3663:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3919:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3961:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4002:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4037:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4078:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4079:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4104:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4105:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4172:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4170:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4171:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4217:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4242:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4243:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4269:0 -run_misc.at-4269-prog.cob:14.16-14.23: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3670:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3926:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:3963:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4007:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4043:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4084:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4085:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4110:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4111:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4178:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4176:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4177:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4223:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4248:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4249:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4275:0 +run_misc.at-4275-prog.cob:14.16-14.23: 11 IF MYFLD NOT = "ABCDEF" 12 DISPLAY MYFLD 13 END-IF @@ -641,8 +621,8 @@ run_misc.at-4269-prog.cob:14.16-14.23: 15 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4310:0 -run_misc.at-4310-prog.cob:26.16-26.23: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4316:0 +run_misc.at-4316-prog.cob:26.16-26.23: 23 DISPLAY MYFLD 24 END-IF 25 @@ -652,8 +632,8 @@ run_misc.at-4310-prog.cob:26.16-26.23: 28 DISPLAY "BASED ITEM WITH ADDRESS AFTER FREE" >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4360:0 -run_misc.at-4360-prog.cob:13.32-13.34: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4366:0 +run_misc.at-4366-prog.cob:13.32-13.34: 10 ASTART SECTION. 11 A01. 12 ALLOCATE 4 CHARACTERS @@ -663,7 +643,7 @@ run_misc.at-4360-prog.cob:13.32-13.34: 15 SET ADDRESS OF MYFLD TO MYPTR >> Error: Invalid syntax -run_misc.at-4360-prog.cob:21.32-21.34: +run_misc.at-4366-prog.cob:21.32-21.34: 18 END-IF 19 FREE MYPTR 20 ALLOCATE 4 CHARACTERS @@ -673,13 +653,13 @@ run_misc.at-4360-prog.cob:21.32-21.34: 23 SET ADDRESS OF MYFLD TO MYPTR >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4384:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4419:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4420:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4495:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4495:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4494:0 -run_misc.at-4494-caller.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4390:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4425:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4426:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4501:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4501:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4500:0 +run_misc.at-4500-caller.c:5.6-5.7: 2 #include 3 #include 4 @@ -689,7 +669,7 @@ run_misc.at-4494-caller.c:5.6-5.7: 7 #endif >> Error: Unexpected indicator: `f' -run_misc.at-4494-caller.c:5.8-5.12: +run_misc.at-4500-caller.c:5.8-5.12: 2 #include 3 #include 4 @@ -699,7 +679,7 @@ run_misc.at-4494-caller.c:5.8-5.12: 7 #endif >> Error: Invalid syntax -run_misc.at-4494-caller.c:6.6-6.7: +run_misc.at-4500-caller.c:6.6-6.7: 3 #include 4 5 #ifndef NULL @@ -709,7 +689,7 @@ run_misc.at-4494-caller.c:6.6-6.7: 8 >> Error: Unexpected indicator: `e' -run_misc.at-4494-caller.c:10.6-10.7: +run_misc.at-4500-caller.c:10.6-10.7: 7 #endif 8 9 int @@ -719,7 +699,7 @@ run_misc.at-4494-caller.c:10.6-10.7: 12 /* for storing COBOL return code */ >> Error: Unexpected indicator: `i' -run_misc.at-4494-caller.c:12.6-12.7: +run_misc.at-4500-caller.c:12.6-12.7: 9 int 10 main (int argc, char **argv) 11 { @@ -729,7 +709,7 @@ run_misc.at-4494-caller.c:12.6-12.7: 14 >> Error: Unexpected indicator: `f' -run_misc.at-4494-caller.c:15.6-15.7: +run_misc.at-4500-caller.c:15.6-15.7: 12 /* for storing COBOL return code */ 13 int cob_ret; 14 @@ -739,7 +719,7 @@ run_misc.at-4494-caller.c:15.6-15.7: 17 >> Error: Unexpected indicator: `i' -run_misc.at-4494-caller.c:18.6-18.7: +run_misc.at-4500-caller.c:18.6-18.7: 15 /* initialize parameters */ 16 void *cob_argv[2]; 17 @@ -749,7 +729,7 @@ run_misc.at-4494-caller.c:18.6-18.7: 20 >> Error: Unexpected indicator: `_' -run_misc.at-4494-caller.c:19.6-19.7: +run_misc.at-4500-caller.c:19.6-19.7: 16 void *cob_argv[2]; 17 18 cob_argv[0] = argv[2]; @@ -759,7 +739,7 @@ run_misc.at-4494-caller.c:19.6-19.7: 21 /* initialize the COBOL run-time library */ >> Error: Unexpected indicator: `_' -run_misc.at-4494-caller.c:21.6-21.7: +run_misc.at-4500-caller.c:21.6-21.7: 18 cob_argv[0] = argv[2]; 19 cob_argv[1] = NULL; 20 @@ -769,7 +749,7 @@ run_misc.at-4494-caller.c:21.6-21.7: 23 >> Error: Unexpected indicator: `i' -run_misc.at-4494-caller.c:22.6-22.7: +run_misc.at-4500-caller.c:22.6-22.7: 19 cob_argv[1] = NULL; 20 21 /* initialize the COBOL run-time library */ @@ -779,7 +759,7 @@ run_misc.at-4494-caller.c:22.6-22.7: 24 /* call COBOL program */ >> Error: Unexpected indicator: `_' -run_misc.at-4494-caller.c:24.6-24.7: +run_misc.at-4500-caller.c:24.6-24.7: 21 /* initialize the COBOL run-time library */ 22 cob_init(argc, argv); 23 @@ -789,7 +769,7 @@ run_misc.at-4494-caller.c:24.6-24.7: 26 >> Error: Unexpected indicator: `c' -run_misc.at-4494-caller.c:25.6-25.7: +run_misc.at-4500-caller.c:25.6-25.7: 22 cob_init(argc, argv); 23 24 /* call COBOL program */ @@ -799,7 +779,7 @@ run_misc.at-4494-caller.c:25.6-25.7: 27 cob_runtime_hint("program exited normally, " >> Error: Unexpected indicator: `_' -run_misc.at-4494-caller.c:27.6-27.7: +run_misc.at-4500-caller.c:27.6-27.7: 24 /* call COBOL program */ 25 cob_ret = cob_call (argv[1], 2, cob_argv); 26 @@ -809,7 +789,7 @@ run_misc.at-4494-caller.c:27.6-27.7: 29 >> Error: Unexpected indicator: `_' -run_misc.at-4494-caller.c:30.6-30.7: +run_misc.at-4500-caller.c:30.6-30.7: 27 cob_runtime_hint("program exited normally, " 28 "without STOP RUN with status %d", cob_ret); 29 @@ -819,7 +799,7 @@ run_misc.at-4494-caller.c:30.6-30.7: 32 } >> Error: Unexpected indicator: `C' -run_misc.at-4494-caller.c:31.6-31.7: +run_misc.at-4500-caller.c:31.6-31.7: 28 "without STOP RUN with status %d", cob_ret); 29 30 /* Clean up and terminate - This does not return */ @@ -828,11 +808,11 @@ run_misc.at-4494-caller.c:31.6-31.7: 32 } >> Error: Unexpected indicator: `_' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4619:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4619:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4619:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4618:0 -run_misc.at-4618-caller.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4625:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4625:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4625:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4624:0 +run_misc.at-4624-caller.c:5.6-5.7: 2 #include 3 #include 4 @@ -842,7 +822,7 @@ run_misc.at-4618-caller.c:5.6-5.7: 7 #endif >> Error: Unexpected indicator: `f' -run_misc.at-4618-caller.c:5.8-5.12: +run_misc.at-4624-caller.c:5.8-5.12: 2 #include 3 #include 4 @@ -852,7 +832,7 @@ run_misc.at-4618-caller.c:5.8-5.12: 7 #endif >> Error: Invalid syntax -run_misc.at-4618-caller.c:6.6-6.7: +run_misc.at-4624-caller.c:6.6-6.7: 3 #include 4 5 #ifndef NULL @@ -862,7 +842,7 @@ run_misc.at-4618-caller.c:6.6-6.7: 8 >> Error: Unexpected indicator: `e' -run_misc.at-4618-caller.c:10.6-10.7: +run_misc.at-4624-caller.c:10.6-10.7: 7 #endif 8 9 int @@ -872,7 +852,7 @@ run_misc.at-4618-caller.c:10.6-10.7: 12 /* for storing libcob return state */ >> Error: Unexpected indicator: `i' -run_misc.at-4618-caller.c:12.6-12.7: +run_misc.at-4624-caller.c:12.6-12.7: 9 int 10 main (int argc, char **argv) 11 { @@ -882,7 +862,7 @@ run_misc.at-4618-caller.c:12.6-12.7: 14 >> Error: Unexpected indicator: `f' -run_misc.at-4618-caller.c:15.6-15.7: +run_misc.at-4624-caller.c:15.6-15.7: 12 /* for storing libcob return state */ 13 int cob_ret; 14 @@ -892,7 +872,7 @@ run_misc.at-4618-caller.c:15.6-15.7: 17 >> Error: Unexpected indicator: `i' -run_misc.at-4618-caller.c:18.6-18.7: +run_misc.at-4624-caller.c:18.6-18.7: 15 /* initialize parameters */ 16 void *cob_argv[3]; 17 @@ -902,7 +882,7 @@ run_misc.at-4618-caller.c:18.6-18.7: 20 cob_argv[1] = argv[2]; >> Error: Unexpected indicator: `r' -run_misc.at-4618-caller.c:19.6-19.7: +run_misc.at-4624-caller.c:19.6-19.7: 16 void *cob_argv[3]; 17 18 char *p1 = "A"; @@ -912,7 +892,7 @@ run_misc.at-4618-caller.c:19.6-19.7: 21 cob_argv[2] = NULL; >> Error: Unexpected indicator: `_' -run_misc.at-4618-caller.c:20.6-20.7: +run_misc.at-4624-caller.c:20.6-20.7: 17 18 char *p1 = "A"; 19 cob_argv[0] = p1; @@ -922,7 +902,7 @@ run_misc.at-4618-caller.c:20.6-20.7: 22 >> Error: Unexpected indicator: `_' -run_misc.at-4618-caller.c:21.6-21.7: +run_misc.at-4624-caller.c:21.6-21.7: 18 char *p1 = "A"; 19 cob_argv[0] = p1; 20 cob_argv[1] = argv[2]; @@ -932,7 +912,7 @@ run_misc.at-4618-caller.c:21.6-21.7: 23 /* initialize the COBOL run-time library */ >> Error: Unexpected indicator: `_' -run_misc.at-4618-caller.c:23.6-23.7: +run_misc.at-4624-caller.c:23.6-23.7: 20 cob_argv[1] = argv[2]; 21 cob_argv[2] = NULL; 22 @@ -942,7 +922,7 @@ run_misc.at-4618-caller.c:23.6-23.7: 25 >> Error: Unexpected indicator: `i' -run_misc.at-4618-caller.c:24.6-24.7: +run_misc.at-4624-caller.c:24.6-24.7: 21 cob_argv[2] = NULL; 22 23 /* initialize the COBOL run-time library */ @@ -952,7 +932,7 @@ run_misc.at-4618-caller.c:24.6-24.7: 26 /* call COBOL program */ >> Error: Unexpected indicator: `_' -run_misc.at-4618-caller.c:26.6-26.7: +run_misc.at-4624-caller.c:26.6-26.7: 23 /* initialize the COBOL run-time library */ 24 cob_init (argc, argv); 25 @@ -962,7 +942,7 @@ run_misc.at-4618-caller.c:26.6-26.7: 28 >> Error: Unexpected indicator: `c' -run_misc.at-4618-caller.c:27.6-27.7: +run_misc.at-4624-caller.c:27.6-27.7: 24 cob_init (argc, argv); 25 26 /* call COBOL program */ @@ -972,7 +952,7 @@ run_misc.at-4618-caller.c:27.6-27.7: 29 switch (cob_ret) { >> Error: Unexpected indicator: `_' -run_misc.at-4618-caller.c:29.6-29.7: +run_misc.at-4624-caller.c:29.6-29.7: 26 /* call COBOL program */ 27 cob_ret = cob_call_with_exception_check (argv[1], 2, cob_argv); 28 @@ -982,7 +962,7 @@ run_misc.at-4618-caller.c:29.6-29.7: 31 >> Error: Unexpected indicator: `t' -run_misc.at-4618-caller.c:30.6-30.7: +run_misc.at-4624-caller.c:30.6-30.7: 27 cob_ret = cob_call_with_exception_check (argv[1], 2, cob_argv); 28 29 switch (cob_ret) { @@ -992,7 +972,7 @@ run_misc.at-4618-caller.c:30.6-30.7: 32 /* Clean up and terminate runtime */ >> Error: Unexpected indicator: `e' -run_misc.at-4618-caller.c:33.6-33.7: +run_misc.at-4624-caller.c:33.6-33.7: 30 case 0: /* program coming back */ 31 32 /* Clean up and terminate runtime */ @@ -1002,7 +982,7 @@ run_misc.at-4618-caller.c:33.6-33.7: 35 cob_tidy (); >> Error: Unexpected indicator: `c' -run_misc.at-4618-caller.c:35.6-35.7: +run_misc.at-4624-caller.c:35.6-35.7: 32 /* Clean up and terminate runtime */ 33 cob_runtime_hint ("program exited with return code %d", 34 cob_last_exit_code ()); @@ -1012,7 +992,7 @@ run_misc.at-4618-caller.c:35.6-35.7: 37 >> Error: Unexpected indicator: `c' -run_misc.at-4618-caller.c:36.6-36.7: +run_misc.at-4624-caller.c:36.6-36.7: 33 cob_runtime_hint ("program exited with return code %d", 34 cob_last_exit_code ()); 35 cob_tidy (); @@ -1022,7 +1002,7 @@ run_misc.at-4618-caller.c:36.6-36.7: 38 case 1: /* normal exit */ >> Error: Unexpected indicator: `b' -run_misc.at-4618-caller.c:38.6-38.7: +run_misc.at-4624-caller.c:38.6-38.7: 35 cob_tidy (); 36 break; 37 @@ -1032,7 +1012,7 @@ run_misc.at-4618-caller.c:38.6-38.7: 40 cob_last_exit_code ()); >> Error: Unexpected indicator: `e' -run_misc.at-4618-caller.c:39.6-39.7: +run_misc.at-4624-caller.c:39.6-39.7: 36 break; 37 38 case 1: /* normal exit */ @@ -1042,7 +1022,7 @@ run_misc.at-4618-caller.c:39.6-39.7: 41 break; >> Error: Unexpected indicator: `c' -run_misc.at-4618-caller.c:41.6-41.7: +run_misc.at-4624-caller.c:41.6-41.7: 38 case 1: /* normal exit */ 39 cob_runtime_hint ("STOP RUN with return code %d", 40 cob_last_exit_code ()); @@ -1052,7 +1032,7 @@ run_misc.at-4618-caller.c:41.6-41.7: 43 case -1: /* error exit */ >> Error: Unexpected indicator: `b' -run_misc.at-4618-caller.c:43.6-43.7: +run_misc.at-4624-caller.c:43.6-43.7: 40 cob_last_exit_code ()); 41 break; 42 @@ -1062,7 +1042,7 @@ run_misc.at-4618-caller.c:43.6-43.7: 45 cob_last_exit_code (), cob_last_runtime_error ()); >> Error: Unexpected indicator: `e' -run_misc.at-4618-caller.c:44.6-44.7: +run_misc.at-4624-caller.c:44.6-44.7: 41 break; 42 43 case -1: /* error exit */ @@ -1072,7 +1052,7 @@ run_misc.at-4618-caller.c:44.6-44.7: 46 break; >> Error: Unexpected indicator: `c' -run_misc.at-4618-caller.c:44.71-44.72: +run_misc.at-4624-caller.c:44.71-44.72: 41 break; 42 43 case -1: /* error exit */ @@ -1082,7 +1062,7 @@ run_misc.at-4618-caller.c:44.71-44.72: 46 break; >> Error: Missing continuation of `' -run_misc.at-4618-caller.c:46.6-46.7: +run_misc.at-4624-caller.c:46.6-46.7: 43 case -1: /* error exit */ 44 cob_runtime_hint ("error exit with return code %d and error \"%s\"", 45 cob_last_exit_code (), cob_last_runtime_error ()); @@ -1092,7 +1072,7 @@ run_misc.at-4618-caller.c:46.6-46.7: 48 case -2: /* hard error exit */ >> Error: Unexpected indicator: `b' -run_misc.at-4618-caller.c:48.6-48.7: +run_misc.at-4624-caller.c:48.6-48.7: 45 cob_last_exit_code (), cob_last_runtime_error ()); 46 break; 47 @@ -1102,7 +1082,7 @@ run_misc.at-4618-caller.c:48.6-48.7: 50 cob_last_exit_code (), cob_last_runtime_error ()); >> Error: Unexpected indicator: `e' -run_misc.at-4618-caller.c:49.6-49.7: +run_misc.at-4624-caller.c:49.6-49.7: 46 break; 47 48 case -2: /* hard error exit */ @@ -1112,7 +1092,7 @@ run_misc.at-4618-caller.c:49.6-49.7: 51 break; >> Error: Unexpected indicator: `c' -run_misc.at-4618-caller.c:49.24-49.72: +run_misc.at-4624-caller.c:49.24-49.72: 46 break; 47 48 case -2: /* hard error exit */ @@ -1122,7 +1102,7 @@ run_misc.at-4618-caller.c:49.24-49.72: 51 break; >> Error: Missing continuation of `hard error exit with return code %d and error \' -run_misc.at-4618-caller.c:51.6-51.7: +run_misc.at-4624-caller.c:51.6-51.7: 48 case -2: /* hard error exit */ 49 cob_runtime_hint ("hard error exit with return code %d and error \"%s\"", 50 cob_last_exit_code (), cob_last_runtime_error ()); @@ -1132,7 +1112,7 @@ run_misc.at-4618-caller.c:51.6-51.7: 53 case -3: /* signal handler exit */ >> Error: Unexpected indicator: `b' -run_misc.at-4618-caller.c:53.6-53.7: +run_misc.at-4624-caller.c:53.6-53.7: 50 cob_last_exit_code (), cob_last_runtime_error ()); 51 break; 52 @@ -1142,7 +1122,7 @@ run_misc.at-4618-caller.c:53.6-53.7: 55 cob_last_exit_code (), cob_last_runtime_error ()); >> Error: Unexpected indicator: `e' -run_misc.at-4618-caller.c:54.6-54.7: +run_misc.at-4624-caller.c:54.6-54.7: 51 break; 52 53 case -3: /* signal handler exit */ @@ -1152,7 +1132,7 @@ run_misc.at-4618-caller.c:54.6-54.7: 56 break; >> Error: Unexpected indicator: `c' -run_misc.at-4618-caller.c:56.6-56.7: +run_misc.at-4624-caller.c:56.6-56.7: 53 case -3: /* signal handler exit */ 54 cob_runtime_hint ("signal handler exit with signal %d and error \"%s\"", 55 cob_last_exit_code (), cob_last_runtime_error ()); @@ -1162,7 +1142,7 @@ run_misc.at-4618-caller.c:56.6-56.7: 58 default: >> Error: Unexpected indicator: `b' -run_misc.at-4618-caller.c:58.6-58.7: +run_misc.at-4624-caller.c:58.6-58.7: 55 cob_last_exit_code (), cob_last_runtime_error ()); 56 break; 57 @@ -1172,7 +1152,7 @@ run_misc.at-4618-caller.c:58.6-58.7: 60 "last exit code %d, last error \"%s\"", >> Error: Unexpected indicator: `a' -run_misc.at-4618-caller.c:59.6-59.7: +run_misc.at-4624-caller.c:59.6-59.7: 56 break; 57 58 default: @@ -1182,7 +1162,7 @@ run_misc.at-4618-caller.c:59.6-59.7: 61 cob_last_exit_code (), cob_last_runtime_error ()); >> Error: Unexpected indicator: `c' -run_misc.at-4618-caller.c:59.24-59.72: +run_misc.at-4624-caller.c:59.24-59.72: 56 break; 57 58 default: @@ -1192,7 +1172,7 @@ run_misc.at-4618-caller.c:59.24-59.72: 61 cob_last_exit_code (), cob_last_runtime_error ()); >> Error: Missing continuation of `unexpected return from cob_call_with_exception_' -run_misc.at-4618-caller.c:62.6-62.7: +run_misc.at-4624-caller.c:62.6-62.7: 59 cob_runtime_hint ("unexpected return from cob_call_with_exception_check, " 60 "last exit code %d, last error \"%s\"", 61 cob_last_exit_code (), cob_last_runtime_error ()); @@ -1202,7 +1182,7 @@ run_misc.at-4618-caller.c:62.6-62.7: 64 return 0; >> Error: Unexpected indicator: `b' -run_misc.at-4618-caller.c:64.6-64.7: +run_misc.at-4624-caller.c:64.6-64.7: 61 cob_last_exit_code (), cob_last_runtime_error ()); 62 break; 63 } @@ -1211,9 +1191,9 @@ run_misc.at-4618-caller.c:64.6-64.7: 65 } >> Error: Unexpected indicator: `u' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4694:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4694:0 -run_misc.at-4694-caller.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4700:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4700:0 +run_misc.at-4700-caller.c:5.6-5.7: 2 #include 3 #include 4 @@ -1223,7 +1203,7 @@ run_misc.at-4694-caller.c:5.6-5.7: 7 #ifndef NULL >> Error: Unexpected indicator: `l' -run_misc.at-4694-caller.c:5.7-5.10: +run_misc.at-4700-caller.c:5.7-5.10: 2 #include 3 #include 4 @@ -1233,7 +1213,7 @@ run_misc.at-4694-caller.c:5.7-5.10: 7 #ifndef NULL >> Error: Invalid syntax -run_misc.at-4694-caller.c:7.6-7.7: +run_misc.at-4700-caller.c:7.6-7.7: 4 5 int callee (char *, char *); 6 @@ -1243,7 +1223,7 @@ run_misc.at-4694-caller.c:7.6-7.7: 9 #endif >> Error: Unexpected indicator: `f' -run_misc.at-4694-caller.c:8.6-8.7: +run_misc.at-4700-caller.c:8.6-8.7: 5 int callee (char *, char *); 6 7 #ifndef NULL @@ -1253,7 +1233,7 @@ run_misc.at-4694-caller.c:8.6-8.7: 10 >> Error: Unexpected indicator: `e' -run_misc.at-4694-caller.c:12.6-12.7: +run_misc.at-4700-caller.c:12.6-12.7: 9 #endif 10 11 int @@ -1263,7 +1243,7 @@ run_misc.at-4694-caller.c:12.6-12.7: 14 cob_global *cobol_global; >> Error: Unexpected indicator: `i' -run_misc.at-4694-caller.c:14.6-14.7: +run_misc.at-4700-caller.c:14.6-14.7: 11 int 12 main (int argc, char **argv) 13 { @@ -1273,7 +1253,7 @@ run_misc.at-4694-caller.c:14.6-14.7: 16 int cob_ret; >> Error: Unexpected indicator: `_' -run_misc.at-4694-caller.c:15.6-15.7: +run_misc.at-4700-caller.c:15.6-15.7: 12 main (int argc, char **argv) 13 { 14 cob_global *cobol_global; @@ -1283,7 +1263,7 @@ run_misc.at-4694-caller.c:15.6-15.7: 17 >> Error: Unexpected indicator: `f' -run_misc.at-4694-caller.c:18.6-18.7: +run_misc.at-4700-caller.c:18.6-18.7: 15 /* for storing COBOL return code */ 16 int cob_ret; 17 @@ -1293,7 +1273,7 @@ run_misc.at-4694-caller.c:18.6-18.7: 20 >> Error: Unexpected indicator: `i' -run_misc.at-4694-caller.c:19.6-19.7: +run_misc.at-4700-caller.c:19.6-19.7: 16 int cob_ret; 17 18 /* initialize parameters */ @@ -1303,7 +1283,7 @@ run_misc.at-4694-caller.c:19.6-19.7: 21 /* initialize the COBOL run-time library */ >> Error: Unexpected indicator: `r' -run_misc.at-4694-caller.c:21.6-21.7: +run_misc.at-4700-caller.c:21.6-21.7: 18 /* initialize parameters */ 19 char *p1 = "A"; 20 @@ -1313,7 +1293,7 @@ run_misc.at-4694-caller.c:21.6-21.7: 23 >> Error: Unexpected indicator: `i' -run_misc.at-4694-caller.c:22.6-22.7: +run_misc.at-4700-caller.c:22.6-22.7: 19 char *p1 = "A"; 20 21 /* initialize the COBOL run-time library */ @@ -1323,7 +1303,7 @@ run_misc.at-4694-caller.c:22.6-22.7: 24 /* setup for COBOL parameter handling */ >> Error: Unexpected indicator: `_' -run_misc.at-4694-caller.c:24.6-24.7: +run_misc.at-4700-caller.c:24.6-24.7: 21 /* initialize the COBOL run-time library */ 22 cob_init(argc, argv); 23 @@ -1333,7 +1313,7 @@ run_misc.at-4694-caller.c:24.6-24.7: 26 cobol_global->cob_call_params = 1; >> Error: Unexpected indicator: `s' -run_misc.at-4694-caller.c:25.6-25.7: +run_misc.at-4700-caller.c:25.6-25.7: 22 cob_init(argc, argv); 23 24 /* setup for COBOL parameter handling */ @@ -1343,7 +1323,7 @@ run_misc.at-4694-caller.c:25.6-25.7: 27 >> Error: Unexpected indicator: `o' -run_misc.at-4694-caller.c:26.6-26.7: +run_misc.at-4700-caller.c:26.6-26.7: 23 24 /* setup for COBOL parameter handling */ 25 cobol_global = cob_get_global_ptr (); @@ -1353,7 +1333,7 @@ run_misc.at-4694-caller.c:26.6-26.7: 28 /* call COBOL program */ >> Error: Unexpected indicator: `o' -run_misc.at-4694-caller.c:28.6-28.7: +run_misc.at-4700-caller.c:28.6-28.7: 25 cobol_global = cob_get_global_ptr (); 26 cobol_global->cob_call_params = 1; 27 @@ -1363,7 +1343,7 @@ run_misc.at-4694-caller.c:28.6-28.7: 30 >> Error: Unexpected indicator: `c' -run_misc.at-4694-caller.c:29.6-29.7: +run_misc.at-4700-caller.c:29.6-29.7: 26 cobol_global->cob_call_params = 1; 27 28 /* call COBOL program */ @@ -1373,7 +1353,7 @@ run_misc.at-4694-caller.c:29.6-29.7: 31 /* Clean up and terminate - This does not return */ >> Error: Unexpected indicator: `_' -run_misc.at-4694-caller.c:31.6-31.7: +run_misc.at-4700-caller.c:31.6-31.7: 28 /* call COBOL program */ 29 cob_ret = callee (p1, NULL); 30 @@ -1383,7 +1363,7 @@ run_misc.at-4694-caller.c:31.6-31.7: 33 } >> Error: Unexpected indicator: `C' -run_misc.at-4694-caller.c:32.6-32.7: +run_misc.at-4700-caller.c:32.6-32.7: 29 cob_ret = callee (p1, NULL); 30 31 /* Clean up and terminate - This does not return */ @@ -1392,9 +1372,9 @@ run_misc.at-4694-caller.c:32.6-32.7: 33 } >> Error: Unexpected indicator: `_' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4747:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4747:0 -run_misc.at-4747-caller.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4753:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4753:0 +run_misc.at-4753-caller.c:5.6-5.7: 2 #include 3 #include 4 @@ -1404,7 +1384,7 @@ run_misc.at-4747-caller.c:5.6-5.7: 7 int >> Error: Unexpected indicator: `l' -run_misc.at-4747-caller.c:5.7-5.10: +run_misc.at-4753-caller.c:5.7-5.10: 2 #include 3 #include 4 @@ -1414,7 +1394,7 @@ run_misc.at-4747-caller.c:5.7-5.10: 7 int >> Error: Invalid syntax -run_misc.at-4747-caller.c:8.6-8.7: +run_misc.at-4753-caller.c:8.6-8.7: 5 int callee (char *, char *); 6 7 int @@ -1424,7 +1404,7 @@ run_misc.at-4747-caller.c:8.6-8.7: 10 /* for storing COBOL return code */ >> Error: Unexpected indicator: `i' -run_misc.at-4747-caller.c:10.6-10.7: +run_misc.at-4753-caller.c:10.6-10.7: 7 int 8 main (int argc, char **argv) 9 { @@ -1434,7 +1414,7 @@ run_misc.at-4747-caller.c:10.6-10.7: 12 >> Error: Unexpected indicator: `f' -run_misc.at-4747-caller.c:13.6-13.7: +run_misc.at-4753-caller.c:13.6-13.7: 10 /* for storing COBOL return code */ 11 int cob_ret; 12 @@ -1444,7 +1424,7 @@ run_misc.at-4747-caller.c:13.6-13.7: 15 char *p2 = "FROM C"; >> Error: Unexpected indicator: `i' -run_misc.at-4747-caller.c:14.6-14.7: +run_misc.at-4753-caller.c:14.6-14.7: 11 int cob_ret; 12 13 /* initialize parameters */ @@ -1454,7 +1434,7 @@ run_misc.at-4747-caller.c:14.6-14.7: 16 >> Error: Unexpected indicator: `r' -run_misc.at-4747-caller.c:15.6-15.7: +run_misc.at-4753-caller.c:15.6-15.7: 12 13 /* initialize parameters */ 14 char *p1 = "A"; @@ -1464,7 +1444,7 @@ run_misc.at-4747-caller.c:15.6-15.7: 17 /* initialize the COBOL run-time library */ >> Error: Unexpected indicator: `r' -run_misc.at-4747-caller.c:17.6-17.7: +run_misc.at-4753-caller.c:17.6-17.7: 14 char *p1 = "A"; 15 char *p2 = "FROM C"; 16 @@ -1474,7 +1454,7 @@ run_misc.at-4747-caller.c:17.6-17.7: 19 >> Error: Unexpected indicator: `i' -run_misc.at-4747-caller.c:18.6-18.7: +run_misc.at-4753-caller.c:18.6-18.7: 15 char *p2 = "FROM C"; 16 17 /* initialize the COBOL run-time library */ @@ -1484,7 +1464,7 @@ run_misc.at-4747-caller.c:18.6-18.7: 20 /* call COBOL program */ >> Error: Unexpected indicator: `_' -run_misc.at-4747-caller.c:20.6-20.7: +run_misc.at-4753-caller.c:20.6-20.7: 17 /* initialize the COBOL run-time library */ 18 cob_init (argc, argv); 19 @@ -1494,7 +1474,7 @@ run_misc.at-4747-caller.c:20.6-20.7: 22 >> Error: Unexpected indicator: `c' -run_misc.at-4747-caller.c:21.6-21.7: +run_misc.at-4753-caller.c:21.6-21.7: 18 cob_init (argc, argv); 19 20 /* call COBOL program */ @@ -1504,7 +1484,7 @@ run_misc.at-4747-caller.c:21.6-21.7: 23 /* Clean up and terminate - This does not return */ >> Error: Unexpected indicator: `_' -run_misc.at-4747-caller.c:23.6-23.7: +run_misc.at-4753-caller.c:23.6-23.7: 20 /* call COBOL program */ 21 cob_ret = callee (p1, p2); 22 @@ -1514,7 +1494,7 @@ run_misc.at-4747-caller.c:23.6-23.7: 25 } >> Error: Unexpected indicator: `C' -run_misc.at-4747-caller.c:24.6-24.7: +run_misc.at-4753-caller.c:24.6-24.7: 21 cob_ret = callee (p1, p2); 22 23 /* Clean up and terminate - This does not return */ @@ -1523,8 +1503,8 @@ run_misc.at-4747-caller.c:24.6-24.7: 25 } >> Error: Unexpected indicator: `_' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4808:0 -run_misc.at-4808-cprog.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4814:0 +run_misc.at-4814-cprog.c:5.6-5.7: 2 #include 3 #include 4 @@ -1534,7 +1514,7 @@ run_misc.at-4808-cprog.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -run_misc.at-4808-cprog.c:5.7-5.8: +run_misc.at-4814-cprog.c:5.7-5.8: 2 #include 3 #include 4 @@ -1544,7 +1524,7 @@ run_misc.at-4808-cprog.c:5.7-5.8: 7 { >> Error: Invalid syntax -run_misc.at-4808-cprog.c:6.6-6.7: +run_misc.at-4814-cprog.c:6.6-6.7: 3 #include 4 5 COB_EXT_EXPORT int @@ -1554,7 +1534,7 @@ run_misc.at-4808-cprog.c:6.6-6.7: 8 char *p1; >> Error: Unexpected indicator: `(' -run_misc.at-4808-cprog.c:8.6-8.7: +run_misc.at-4814-cprog.c:8.6-8.7: 5 COB_EXT_EXPORT int 6 cprog (void *cb) 7 { @@ -1564,7 +1544,7 @@ run_misc.at-4808-cprog.c:8.6-8.7: 10 char *p3 = "CALLBACK"; >> Error: Unexpected indicator: `r' -run_misc.at-4808-cprog.c:10.6-10.7: +run_misc.at-4814-cprog.c:10.6-10.7: 7 { 8 char *p1; 9 int p2 = 42; @@ -1574,7 +1554,7 @@ run_misc.at-4808-cprog.c:10.6-10.7: 12 p1 = p3; >> Error: Unexpected indicator: `r' -run_misc.at-4808-cprog.c:12.6-12.7: +run_misc.at-4814-cprog.c:12.6-12.7: 9 int p2 = 42; 10 char *p3 = "CALLBACK"; 11 @@ -1584,7 +1564,7 @@ run_misc.at-4808-cprog.c:12.6-12.7: 14 return 0; >> Error: Unexpected indicator: `=' -run_misc.at-4808-cprog.c:13.6-13.7: +run_misc.at-4814-cprog.c:13.6-13.7: 10 char *p3 = "CALLBACK"; 11 12 p1 = p3; @@ -1594,7 +1574,7 @@ run_misc.at-4808-cprog.c:13.6-13.7: 15 } >> Error: Unexpected indicator: `n' -run_misc.at-4808-cprog.c:14.6-14.7: +run_misc.at-4814-cprog.c:14.6-14.7: 11 12 p1 = p3; 13 ((int (*)(char *, int, char *))cb)(p1, p2, p3); @@ -1603,8 +1583,8 @@ run_misc.at-4808-cprog.c:14.6-14.7: 15 } >> Error: Unexpected indicator: `u' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4808:0 -run_misc.at-4808-prog.cob:19.27-19.28: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4814:0 +run_misc.at-4814-prog.cob:19.27-19.28: 16 ENVIRONMENT DIVISION. 17 CONFIGURATION SECTION. 18 SPECIAL-NAMES. @@ -1614,7 +1594,7 @@ run_misc.at-4808-prog.cob:19.27-19.28: 21 LINKAGE SECTION. >> Error: Invalid syntax -run_misc.at-4808-prog.cob:25.32: +run_misc.at-4814-prog.cob:25.32: 22 01 P1 USAGE POINTER. 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). @@ -1624,7 +1604,7 @@ run_misc.at-4808-prog.cob:25.32: 27 IF P1 NOT EQUAL ADDRESS OF P3 >> Hint: Missing . -run_misc.at-4808-prog.cob:25.33-25.39: +run_misc.at-4814-prog.cob:25.33-25.39: 22 01 P1 USAGE POINTER. 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). @@ -1634,7 +1614,7 @@ run_misc.at-4808-prog.cob:25.33-25.39: 27 IF P1 NOT EQUAL ADDRESS OF P3 >> Error: Invalid syntax -run_misc.at-4808-prog.cob:25.39: +run_misc.at-4814-prog.cob:25.39: 22 01 P1 USAGE POINTER. 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). @@ -1644,7 +1624,7 @@ run_misc.at-4808-prog.cob:25.39: 27 IF P1 NOT EQUAL ADDRESS OF P3 >> Hint: Missing . -run_misc.at-4808-prog.cob:25.40-25.45: +run_misc.at-4814-prog.cob:25.40-25.45: 22 01 P1 USAGE POINTER. 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). @@ -1654,7 +1634,7 @@ run_misc.at-4808-prog.cob:25.40-25.45: 27 IF P1 NOT EQUAL ADDRESS OF P3 >> Warning: Invalid syntax -run_misc.at-4808-prog.cob:26.35: +run_misc.at-4814-prog.cob:26.35: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN USING @@ -1664,7 +1644,7 @@ run_misc.at-4808-prog.cob:26.35: 28 DISPLAY "P1 != ADDRESS OF P3: " P1. >> Hint: Missing . -run_misc.at-4808-prog.cob:26.36-26.38: +run_misc.at-4814-prog.cob:26.36-26.38: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN USING @@ -1674,7 +1654,7 @@ run_misc.at-4808-prog.cob:26.36-26.38: 28 DISPLAY "P1 != ADDRESS OF P3: " P1. >> Warning: Invalid syntax -run_misc.at-4808-prog.cob:26.38: +run_misc.at-4814-prog.cob:26.38: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN USING @@ -1684,7 +1664,7 @@ run_misc.at-4808-prog.cob:26.38: 28 DISPLAY "P1 != ADDRESS OF P3: " P1. >> Hint: Missing . -run_misc.at-4808-prog.cob:26.39-26.41: +run_misc.at-4814-prog.cob:26.39-26.41: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN USING @@ -1694,8 +1674,8 @@ run_misc.at-4808-prog.cob:26.39-26.41: 28 DISPLAY "P1 != ADDRESS OF P3: " P1. >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4884:0 -run_misc.at-4884-cprog.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4890:0 +run_misc.at-4890-cprog.c:5.6-5.7: 2 #include 3 #include 4 @@ -1705,7 +1685,7 @@ run_misc.at-4884-cprog.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -run_misc.at-4884-cprog.c:5.7-5.8: +run_misc.at-4890-cprog.c:5.7-5.8: 2 #include 3 #include 4 @@ -1715,7 +1695,7 @@ run_misc.at-4884-cprog.c:5.7-5.8: 7 { >> Error: Invalid syntax -run_misc.at-4884-cprog.c:6.6-6.7: +run_misc.at-4890-cprog.c:6.6-6.7: 3 #include 4 5 COB_EXT_EXPORT int @@ -1725,7 +1705,7 @@ run_misc.at-4884-cprog.c:6.6-6.7: 8 char *p1; >> Error: Unexpected indicator: `(' -run_misc.at-4884-cprog.c:8.6-8.7: +run_misc.at-4890-cprog.c:8.6-8.7: 5 COB_EXT_EXPORT int 6 cprog (void *cb) 7 { @@ -1735,7 +1715,7 @@ run_misc.at-4884-cprog.c:8.6-8.7: 10 char *p3 = "CALLBACK"; >> Error: Unexpected indicator: `r' -run_misc.at-4884-cprog.c:10.6-10.7: +run_misc.at-4890-cprog.c:10.6-10.7: 7 { 8 char *p1; 9 int p2 = 42; @@ -1745,7 +1725,7 @@ run_misc.at-4884-cprog.c:10.6-10.7: 12 p1 = p3; >> Error: Unexpected indicator: `r' -run_misc.at-4884-cprog.c:12.6-12.7: +run_misc.at-4890-cprog.c:12.6-12.7: 9 int p2 = 42; 10 char *p3 = "CALLBACK"; 11 @@ -1755,7 +1735,7 @@ run_misc.at-4884-cprog.c:12.6-12.7: 14 return 0; >> Error: Unexpected indicator: `=' -run_misc.at-4884-cprog.c:13.6-13.7: +run_misc.at-4890-cprog.c:13.6-13.7: 10 char *p3 = "CALLBACK"; 11 12 p1 = p3; @@ -1765,7 +1745,7 @@ run_misc.at-4884-cprog.c:13.6-13.7: 15 } >> Error: Unexpected indicator: `n' -run_misc.at-4884-cprog.c:14.6-14.7: +run_misc.at-4890-cprog.c:14.6-14.7: 11 12 p1 = p3; 13 ((int (*)(char *, int, char *))cb)(p1, p2, p3); @@ -1774,8 +1754,8 @@ run_misc.at-4884-cprog.c:14.6-14.7: 15 } >> Error: Unexpected indicator: `u' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4884:0 -run_misc.at-4884-prog.cob:19.27: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4890:0 +run_misc.at-4890-prog.cob:19.27: 16 IDENTIFICATION DIVISION. 17 PROGRAM-ID. callback. 18 OPTIONS. @@ -1785,7 +1765,7 @@ run_misc.at-4884-prog.cob:19.27: 21 LINKAGE SECTION. >> Hint: Missing COBOL -run_misc.at-4884-prog.cob:19.28-19.34: +run_misc.at-4890-prog.cob:19.28-19.34: 16 IDENTIFICATION DIVISION. 17 PROGRAM-ID. callback. 18 OPTIONS. @@ -1795,8 +1775,8 @@ run_misc.at-4884-prog.cob:19.28-19.34: 21 LINKAGE SECTION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4965:0 -run_misc.at-4965-prog2.cob:21.32: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4971:0 +run_misc.at-4971-prog2.cob:21.32: 18 01 P1 USAGE POINTER. 19 01 P2 USAGE BINARY-LONG. 20 01 P3 PIC X(8). @@ -1806,7 +1786,7 @@ run_misc.at-4965-prog2.cob:21.32: 23 IF P1 NOT EQUAL ADDRESS OF P3 >> Hint: Missing . -run_misc.at-4965-prog2.cob:21.33-21.37: +run_misc.at-4971-prog2.cob:21.33-21.37: 18 01 P1 USAGE POINTER. 19 01 P2 USAGE BINARY-LONG. 20 01 P3 PIC X(8). @@ -1816,7 +1796,7 @@ run_misc.at-4965-prog2.cob:21.33-21.37: 23 IF P1 NOT EQUAL ADDRESS OF P3 >> Error: Invalid syntax -run_misc.at-4965-prog2.cob:21.39: +run_misc.at-4971-prog2.cob:21.39: 18 01 P1 USAGE POINTER. 19 01 P2 USAGE BINARY-LONG. 20 01 P3 PIC X(8). @@ -1826,7 +1806,7 @@ run_misc.at-4965-prog2.cob:21.39: 23 IF P1 NOT EQUAL ADDRESS OF P3 >> Hint: Missing . -run_misc.at-4965-prog2.cob:21.40-21.47: +run_misc.at-4971-prog2.cob:21.40-21.47: 18 01 P1 USAGE POINTER. 19 01 P2 USAGE BINARY-LONG. 20 01 P3 PIC X(8). @@ -1836,7 +1816,7 @@ run_misc.at-4965-prog2.cob:21.40-21.47: 23 IF P1 NOT EQUAL ADDRESS OF P3 >> Warning: Invalid syntax -run_misc.at-4965-prog2.cob:22.41: +run_misc.at-4971-prog2.cob:22.41: 19 01 P2 USAGE BINARY-LONG. 20 01 P3 PIC X(8). 21 PROCEDURE DIVISION WITH C LINKAGE @@ -1846,7 +1826,7 @@ run_misc.at-4965-prog2.cob:22.41: 24 DISPLAY P1 >> Hint: Missing . -run_misc.at-4965-prog2.cob:22.42-22.44: +run_misc.at-4971-prog2.cob:22.42-22.44: 19 01 P2 USAGE BINARY-LONG. 20 01 P3 PIC X(8). 21 PROCEDURE DIVISION WITH C LINKAGE @@ -1856,7 +1836,7 @@ run_misc.at-4965-prog2.cob:22.42-22.44: 24 DISPLAY P1 >> Warning: Invalid syntax -run_misc.at-4965-prog2.cob:22.44: +run_misc.at-4971-prog2.cob:22.44: 19 01 P2 USAGE BINARY-LONG. 20 01 P3 PIC X(8). 21 PROCEDURE DIVISION WITH C LINKAGE @@ -1866,7 +1846,7 @@ run_misc.at-4965-prog2.cob:22.44: 24 DISPLAY P1 >> Hint: Missing . -run_misc.at-4965-prog2.cob:22.45-22.47: +run_misc.at-4971-prog2.cob:22.45-22.47: 19 01 P2 USAGE BINARY-LONG. 20 01 P3 PIC X(8). 21 PROCEDURE DIVISION WITH C LINKAGE @@ -1876,8 +1856,8 @@ run_misc.at-4965-prog2.cob:22.45-22.47: 24 DISPLAY P1 >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4968:0 -run_misc.at-4968-prog3.cob:19.27-19.28: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:4974:0 +run_misc.at-4974-prog3.cob:19.27-19.28: 16 ENVIRONMENT DIVISION. 17 CONFIGURATION SECTION. 18 SPECIAL-NAMES. @@ -1887,7 +1867,7 @@ run_misc.at-4968-prog3.cob:19.27-19.28: 21 LINKAGE SECTION. >> Error: Invalid syntax -run_misc.at-4968-prog3.cob:25.32: +run_misc.at-4974-prog3.cob:25.32: 22 01 P1 USAGE POINTER. 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). @@ -1897,7 +1877,7 @@ run_misc.at-4968-prog3.cob:25.32: 27 IF P1 NOT EQUAL ADDRESS OF P3 >> Hint: Missing . -run_misc.at-4968-prog3.cob:25.33-25.39: +run_misc.at-4974-prog3.cob:25.33-25.39: 22 01 P1 USAGE POINTER. 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). @@ -1907,7 +1887,7 @@ run_misc.at-4968-prog3.cob:25.33-25.39: 27 IF P1 NOT EQUAL ADDRESS OF P3 >> Error: Invalid syntax -run_misc.at-4968-prog3.cob:25.39: +run_misc.at-4974-prog3.cob:25.39: 22 01 P1 USAGE POINTER. 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). @@ -1917,7 +1897,7 @@ run_misc.at-4968-prog3.cob:25.39: 27 IF P1 NOT EQUAL ADDRESS OF P3 >> Hint: Missing . -run_misc.at-4968-prog3.cob:26.24-26.29: +run_misc.at-4974-prog3.cob:26.24-26.29: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN @@ -1927,7 +1907,7 @@ run_misc.at-4968-prog3.cob:26.24-26.29: 28 DISPLAY P1 >> Warning: Invalid syntax -run_misc.at-4968-prog3.cob:26.41: +run_misc.at-4974-prog3.cob:26.41: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN @@ -1937,7 +1917,7 @@ run_misc.at-4968-prog3.cob:26.41: 28 DISPLAY P1 >> Hint: Missing . -run_misc.at-4968-prog3.cob:26.42-26.44: +run_misc.at-4974-prog3.cob:26.42-26.44: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN @@ -1947,7 +1927,7 @@ run_misc.at-4968-prog3.cob:26.42-26.44: 28 DISPLAY P1 >> Warning: Invalid syntax -run_misc.at-4968-prog3.cob:26.44: +run_misc.at-4974-prog3.cob:26.44: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN @@ -1957,7 +1937,7 @@ run_misc.at-4968-prog3.cob:26.44: 28 DISPLAY P1 >> Hint: Missing . -run_misc.at-4968-prog3.cob:26.45-26.47: +run_misc.at-4974-prog3.cob:26.45-26.47: 23 01 P2 USAGE BINARY-LONG. 24 01 P3 PIC X(8). 25 PROCEDURE DIVISION EXTERN @@ -1967,9 +1947,9 @@ run_misc.at-4968-prog3.cob:26.45-26.47: 28 DISPLAY P1 >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5011:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5011:0 -run_misc.at-5011-caller.c:2.6-2.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5017:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5017:0 +run_misc.at-5017-caller.c:2.6-2.7: 1 2 > int callee (char *, char *); ---- ^ @@ -1977,7 +1957,7 @@ run_misc.at-5011-caller.c:2.6-2.7: 4 int >> Error: Unexpected indicator: `l' -run_misc.at-5011-caller.c:2.7-2.10: +run_misc.at-5017-caller.c:2.7-2.10: 1 2 > int callee (char *, char *); ---- ^^^ @@ -1985,7 +1965,7 @@ run_misc.at-5011-caller.c:2.7-2.10: 4 int >> Error: Invalid syntax -run_misc.at-5011-caller.c:5.6-5.7: +run_misc.at-5017-caller.c:5.6-5.7: 2 int callee (char *, char *); 3 4 int @@ -1995,7 +1975,7 @@ run_misc.at-5011-caller.c:5.6-5.7: 7 /* initialize parameters */ >> Error: Unexpected indicator: `i' -run_misc.at-5011-caller.c:7.6-7.7: +run_misc.at-5017-caller.c:7.6-7.7: 4 int 5 main (int argc, char **argv) 6 { @@ -2005,7 +1985,7 @@ run_misc.at-5011-caller.c:7.6-7.7: 9 char *p2 = "FROM C"; >> Error: Unexpected indicator: `i' -run_misc.at-5011-caller.c:8.6-8.7: +run_misc.at-5017-caller.c:8.6-8.7: 5 main (int argc, char **argv) 6 { 7 /* initialize parameters */ @@ -2015,7 +1995,7 @@ run_misc.at-5011-caller.c:8.6-8.7: 10 >> Error: Unexpected indicator: `r' -run_misc.at-5011-caller.c:9.6-9.7: +run_misc.at-5017-caller.c:9.6-9.7: 6 { 7 /* initialize parameters */ 8 char *p1 = "A"; @@ -2025,7 +2005,7 @@ run_misc.at-5011-caller.c:9.6-9.7: 11 /* call COBOL program (initialization missing) >> Error: Unexpected indicator: `r' -run_misc.at-5011-caller.c:11.6-11.7: +run_misc.at-5017-caller.c:11.6-11.7: 8 char *p1 = "A"; 9 char *p2 = "FROM C"; 10 @@ -2035,7 +2015,7 @@ run_misc.at-5011-caller.c:11.6-11.7: 13 (void)callee (p1, p2); >> Error: Unexpected indicator: `c' -run_misc.at-5011-caller.c:12.6-12.7: +run_misc.at-5017-caller.c:12.6-12.7: 9 char *p2 = "FROM C"; 10 11 /* call COBOL program (initialization missing) @@ -2045,7 +2025,7 @@ run_misc.at-5011-caller.c:12.6-12.7: 14 } >> Error: Unexpected indicator: `n' -run_misc.at-5011-caller.c:13.6-13.7: +run_misc.at-5017-caller.c:13.6-13.7: 10 11 /* call COBOL program (initialization missing) 12 note: COBOL program terminates the program by STOP RUN */ @@ -2054,8 +2034,8 @@ run_misc.at-5011-caller.c:13.6-13.7: 14 } >> Error: Unexpected indicator: `i' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5072:0 -run_misc.at-5072-callee.c:5.7-5.8: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5078:0 +run_misc.at-5078-callee.c:5.7-5.8: 2 #include 3 4 int @@ -2065,7 +2045,7 @@ run_misc.at-5072-callee.c:5.7-5.8: 7 if (p1[0] == 'A') { >> Error: Invalid syntax -run_misc.at-5072-callee.c:7.6-7.7: +run_misc.at-5078-callee.c:7.6-7.7: 4 int 5 callee (char *p1, char *p2) 6 { @@ -2075,7 +2055,7 @@ run_misc.at-5072-callee.c:7.6-7.7: 9 } >> Error: Unexpected indicator: `(' -run_misc.at-5072-callee.c:8.6-8.7: +run_misc.at-5078-callee.c:8.6-8.7: 5 callee (char *p1, char *p2) 6 { 7 if (p1[0] == 'A') { @@ -2085,7 +2065,7 @@ run_misc.at-5072-callee.c:8.6-8.7: 10 memcpy (p2, "FROM C", 6); >> Error: Unexpected indicator: `p' -run_misc.at-5072-callee.c:10.6-10.7: +run_misc.at-5078-callee.c:10.6-10.7: 7 if (p1[0] == 'A') { 8 p1[0] = 'B'; 9 } @@ -2095,7 +2075,7 @@ run_misc.at-5072-callee.c:10.6-10.7: 12 return 3; >> Error: Unexpected indicator: `c' -run_misc.at-5072-callee.c:12.6-12.7: +run_misc.at-5078-callee.c:12.6-12.7: 9 } 10 memcpy (p2, "FROM C", 6); 11 @@ -2104,7 +2084,7 @@ run_misc.at-5072-callee.c:12.6-12.7: 13 } >> Error: Unexpected indicator: `u' -run_misc.at-5072-callee.c:7.13-14.0: +run_misc.at-5078-callee.c:7.13-14.0: 4 int 5 callee (char *p1, char *p2) 6 { @@ -2124,9 +2104,9 @@ run_misc.at-5072-callee.c:7.13-14.0: ---- ^^ >> Error: Unterminated pseudotext -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5072:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5110:0 -run_misc.at-5110-callee.cob:10.16-10.22: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5078:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5116:0 +run_misc.at-5116-callee.cob:10.16-10.22: 7 LINKAGE SECTION. 8 01 P1 PIC X ANY LENGTH. 9 PROCEDURE DIVISION USING P1. @@ -2136,21 +2116,21 @@ run_misc.at-5110-callee.cob:10.16-10.22: 12 DISPLAY P2. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5111:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5150:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5151:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5191:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5238:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5263:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5294:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5295:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5336:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5335:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5357:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5375:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5398:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5433:0 -run_misc.at-5433-prog.cob:7.29-7.35: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5117:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5156:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5157:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5197:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5244:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5269:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5300:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5301:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5342:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5341:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5363:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5381:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5404:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5439:0 +run_misc.at-5439-prog.cob:7.29-7.35: 4 ENVIRONMENT DIVISION. 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. @@ -2160,7 +2140,7 @@ run_misc.at-5433-prog.cob:7.29-7.35: 9 SYMBOLIC Z-EBC IS 241 IN A-EBC >> Error: Invalid syntax -run_misc.at-5433-prog.cob:7.35: +run_misc.at-5439-prog.cob:7.35: 4 ENVIRONMENT DIVISION. 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. @@ -2170,7 +2150,7 @@ run_misc.at-5433-prog.cob:7.35: 9 SYMBOLIC Z-EBC IS 241 IN A-EBC >> Hint: Missing IS -run_misc.at-5433-prog.cob:8.11-8.19: +run_misc.at-5439-prog.cob:8.11-8.19: 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. 7 ALPHABET A-EBC IS EBCDIC @@ -2180,7 +2160,7 @@ run_misc.at-5433-prog.cob:8.11-8.19: 10 SYMBOLIC Z-ASC IS 49 IN A-ASC >> Error: Invalid syntax -run_misc.at-5433-prog.cob:8.29-8.34: +run_misc.at-5439-prog.cob:8.29-8.34: 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. 7 ALPHABET A-EBC IS EBCDIC @@ -2190,7 +2170,7 @@ run_misc.at-5433-prog.cob:8.29-8.34: 10 SYMBOLIC Z-ASC IS 49 IN A-ASC >> Error: Invalid syntax -run_misc.at-5433-prog.cob:8.34: +run_misc.at-5439-prog.cob:8.34: 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. 7 ALPHABET A-EBC IS EBCDIC @@ -2200,7 +2180,7 @@ run_misc.at-5433-prog.cob:8.34: 10 SYMBOLIC Z-ASC IS 49 IN A-ASC >> Hint: Missing IS -run_misc.at-5433-prog.cob:9.11-9.19: +run_misc.at-5439-prog.cob:9.11-9.19: 6 SPECIAL-NAMES. 7 ALPHABET A-EBC IS EBCDIC 8 ALPHABET A-ASC IS ASCII @@ -2210,12 +2190,12 @@ run_misc.at-5433-prog.cob:9.11-9.19: 11 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5474:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5990:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6479:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6528:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6982:0 -run_misc.at-6982-callee.cob:11.11-11.17: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5480:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:5999:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6488:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6534:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6988:0 +run_misc.at-6988-callee.cob:11.11-11.17: 8 * var names MUST BE IN LOWER CASE (!) 9 * 10 77 const PIC X. @@ -2225,7 +2205,7 @@ run_misc.at-6982-callee.cob:11.11-11.17: 13 77 int PIC X. >> Error: Invalid syntax -run_misc.at-6982-callee.cob:12.11-12.16: +run_misc.at-6988-callee.cob:12.11-12.16: 9 * 10 77 const PIC X. 11 77 double PIC X. @@ -2235,7 +2215,7 @@ run_misc.at-6982-callee.cob:12.11-12.16: 14 77 short PIC X. >> Error: Invalid syntax -run_misc.at-6982-callee.cob:25.11-25.19: +run_misc.at-6988-callee.cob:25.11-25.19: 22 77 goto PIC X. 23 77 register PIC X. 24 77 sizeof PIC X. @@ -2245,7 +2225,7 @@ run_misc.at-6982-callee.cob:25.11-25.19: 27 77 do PIC X. >> Error: Invalid syntax -run_misc.at-6982-callee.cob:34.33-34.39: +run_misc.at-6988-callee.cob:34.33-34.39: 31 77 while PIC X. 32 PROCEDURE DIVISION USING 33 const @@ -2255,7 +2235,7 @@ run_misc.at-6982-callee.cob:34.33-34.39: 36 int >> Error: Invalid syntax -run_misc.at-6982-callee.cob:48.33-48.41: +run_misc.at-6988-callee.cob:48.33-48.41: 45 goto 46 register 47 sizeof @@ -2265,7 +2245,7 @@ run_misc.at-6982-callee.cob:48.33-48.41: 50 do >> Error: Invalid syntax -run_misc.at-6982-callee.cob:57.15-57.21: +run_misc.at-6988-callee.cob:57.15-57.21: 54 while 55 . 56 IF (const NOT = "A") OR @@ -2275,7 +2255,7 @@ run_misc.at-6982-callee.cob:57.15-57.21: 59 (int NOT = "D") OR >> Error: Invalid syntax -run_misc.at-6982-callee.cob:57.46: +run_misc.at-6988-callee.cob:57.46: 54 while 55 . 56 IF (const NOT = "A") OR @@ -2285,7 +2265,7 @@ run_misc.at-6982-callee.cob:57.46: 59 (int NOT = "D") OR >> Hint: Missing -run_misc.at-6982-callee.cob:57.47-57.48: +run_misc.at-6988-callee.cob:57.47-57.48: 54 while 55 . 56 IF (const NOT = "A") OR @@ -2295,7 +2275,7 @@ run_misc.at-6982-callee.cob:57.47-57.48: 59 (int NOT = "D") OR >> Error: Invalid syntax -run_misc.at-6982-callee.cob:58.15-58.20: +run_misc.at-6988-callee.cob:58.15-58.20: 55 . 56 IF (const NOT = "A") OR 57 (double NOT = "B") OR @@ -2305,7 +2285,7 @@ run_misc.at-6982-callee.cob:58.15-58.20: 60 (short NOT = "E") OR >> Error: Invalid syntax -run_misc.at-6982-callee.cob:58.46: +run_misc.at-6988-callee.cob:58.46: 55 . 56 IF (const NOT = "A") OR 57 (double NOT = "B") OR @@ -2315,7 +2295,7 @@ run_misc.at-6982-callee.cob:58.46: 60 (short NOT = "E") OR >> Hint: Missing -run_misc.at-6982-callee.cob:58.47-58.48: +run_misc.at-6988-callee.cob:58.47-58.48: 55 . 56 IF (const NOT = "A") OR 57 (double NOT = "B") OR @@ -2325,7 +2305,7 @@ run_misc.at-6982-callee.cob:58.47-58.48: 60 (short NOT = "E") OR >> Error: Invalid syntax -run_misc.at-6982-callee.cob:71.15-71.23: +run_misc.at-6988-callee.cob:71.15-71.23: 68 (goto NOT = "M") OR 69 (register NOT = "N") OR 70 (sizeof NOT = "O") OR @@ -2335,7 +2315,7 @@ run_misc.at-6982-callee.cob:71.15-71.23: 73 (do NOT = "R") OR >> Error: Invalid syntax -run_misc.at-6982-callee.cob:71.46: +run_misc.at-6988-callee.cob:71.46: 68 (goto NOT = "M") OR 69 (register NOT = "N") OR 70 (sizeof NOT = "O") OR @@ -2345,7 +2325,7 @@ run_misc.at-6982-callee.cob:71.46: 73 (do NOT = "R") OR >> Hint: Missing -run_misc.at-6982-callee.cob:71.47-71.48: +run_misc.at-6988-callee.cob:71.47-71.48: 68 (goto NOT = "M") OR 69 (register NOT = "N") OR 70 (sizeof NOT = "O") OR @@ -2355,7 +2335,7 @@ run_misc.at-6982-callee.cob:71.47-71.48: 73 (do NOT = "R") OR >> Error: Invalid syntax -run_misc.at-6982-callee.cob:80.33-80.39: +run_misc.at-6988-callee.cob:80.33-80.39: 77 (while NOT = "V") 78 DISPLAY "At least one var has wrong content!". 79 MOVE x'FF' TO const @@ -2365,7 +2345,7 @@ run_misc.at-6982-callee.cob:80.33-80.39: 82 int >> Error: Invalid syntax -run_misc.at-6982-callee.cob:94.33-94.41: +run_misc.at-6988-callee.cob:94.33-94.41: 91 goto 92 register 93 sizeof @@ -2375,8 +2355,8 @@ run_misc.at-6982-callee.cob:94.33-94.41: 96 do >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6983:0 -run_misc.at-6983-callee2.cob:17.11-17.14: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6989:0 +run_misc.at-6989-callee2.cob:17.11-17.14: 14 77 try PIC X. 15 77 bool PIC X. 16 77 explicit PIC X. @@ -2386,7 +2366,7 @@ run_misc.at-6983-callee2.cob:17.11-17.14: 19 77 typeid PIC X. >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:45.11-45.14: +run_misc.at-6989-callee2.cob:45.11-45.14: 42 77 xor_eq PIC X. 43 77 and_eq PIC X. 44 77 bitor PIC X. @@ -2396,7 +2376,7 @@ run_misc.at-6983-callee2.cob:45.11-45.14: 47 asm >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:54.33-54.36: +run_misc.at-6989-callee2.cob:54.33-54.36: 51 try 52 bool 53 explicit @@ -2406,7 +2386,7 @@ run_misc.at-6983-callee2.cob:54.33-54.36: 56 typeid >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:79.33-79.36: +run_misc.at-6989-callee2.cob:79.33-79.36: 76 xor_eq 77 and_eq 78 bitor @@ -2416,7 +2396,7 @@ run_misc.at-6983-callee2.cob:79.33-79.36: 81 IF (asm NOT = "W") OR >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:88.15-88.18: +run_misc.at-6989-callee2.cob:88.15-88.18: 85 (try NOT = "a") OR 86 (bool NOT = "b") OR 87 (explicit NOT = "c") OR @@ -2426,7 +2406,7 @@ run_misc.at-6983-callee2.cob:88.15-88.18: 90 (typeid NOT = "f") OR >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:88.46: +run_misc.at-6989-callee2.cob:88.46: 85 (try NOT = "a") OR 86 (bool NOT = "b") OR 87 (explicit NOT = "c") OR @@ -2436,7 +2416,7 @@ run_misc.at-6983-callee2.cob:88.46: 90 (typeid NOT = "f") OR >> Hint: Missing -run_misc.at-6983-callee2.cob:88.47-88.48: +run_misc.at-6989-callee2.cob:88.47-88.48: 85 (try NOT = "a") OR 86 (bool NOT = "b") OR 87 (explicit NOT = "c") OR @@ -2446,7 +2426,7 @@ run_misc.at-6983-callee2.cob:88.47-88.48: 90 (typeid NOT = "f") OR >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:113.15-113.18: +run_misc.at-6989-callee2.cob:113.15-113.18: 110 (xor_eq NOT = "z") OR 111 (and_eq NOT = "0") OR 112 (bitor NOT = "1") OR @@ -2456,7 +2436,7 @@ run_misc.at-6983-callee2.cob:113.15-113.18: 115 MOVE x'FF' TO asm >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:113.46: +run_misc.at-6989-callee2.cob:113.46: 110 (xor_eq NOT = "z") OR 111 (and_eq NOT = "0") OR 112 (bitor NOT = "1") OR @@ -2466,7 +2446,7 @@ run_misc.at-6983-callee2.cob:113.46: 115 MOVE x'FF' TO asm >> Hint: Missing -run_misc.at-6983-callee2.cob:113.47-113.48: +run_misc.at-6989-callee2.cob:113.47-113.48: 110 (xor_eq NOT = "z") OR 111 (and_eq NOT = "0") OR 112 (bitor NOT = "1") OR @@ -2476,7 +2456,7 @@ run_misc.at-6983-callee2.cob:113.47-113.48: 115 MOVE x'FF' TO asm >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:122.33-122.36: +run_misc.at-6989-callee2.cob:122.33-122.36: 119 try 120 bool 121 explicit @@ -2486,7 +2466,7 @@ run_misc.at-6983-callee2.cob:122.33-122.36: 124 typeid >> Error: Invalid syntax -run_misc.at-6983-callee2.cob:147.33-147.36: +run_misc.at-6989-callee2.cob:147.33-147.36: 144 xor_eq 145 and_eq 146 bitor @@ -2496,8 +2476,8 @@ run_misc.at-6983-callee2.cob:147.33-147.36: 149 EXIT PROGRAM. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6984:0 -run_misc.at-6984-caller.cob:11.11-11.17: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:6990:0 +run_misc.at-6990-caller.cob:11.11-11.17: 8 * var names MUST BE IN LOWER CASE (!) 9 * 10 77 const PIC X VALUE "A". @@ -2507,7 +2487,7 @@ run_misc.at-6984-caller.cob:11.11-11.17: 13 77 int PIC X VALUE "D". >> Error: Invalid syntax -run_misc.at-6984-caller.cob:12.11-12.16: +run_misc.at-6990-caller.cob:12.11-12.16: 9 * 10 77 const PIC X VALUE "A". 11 77 double PIC X VALUE "B". @@ -2517,7 +2497,7 @@ run_misc.at-6984-caller.cob:12.11-12.16: 14 77 short PIC X VALUE "E". >> Error: Invalid syntax -run_misc.at-6984-caller.cob:25.11-25.19: +run_misc.at-6990-caller.cob:25.11-25.19: 22 77 goto PIC X VALUE "M". 23 77 register PIC X VALUE "N". 24 77 sizeof PIC X VALUE "O". @@ -2527,7 +2507,7 @@ run_misc.at-6984-caller.cob:25.11-25.19: 27 77 do PIC X VALUE "R". >> Error: Invalid syntax -run_misc.at-6984-caller.cob:43.11-43.14: +run_misc.at-6990-caller.cob:43.11-43.14: 40 77 try PIC X VALUE "a". 41 77 bool PIC X VALUE "b". 42 77 explicit PIC X VALUE "c". @@ -2537,7 +2517,7 @@ run_misc.at-6984-caller.cob:43.11-43.14: 45 77 typeid PIC X VALUE "f". >> Error: Invalid syntax -run_misc.at-6984-caller.cob:72.11-72.14: +run_misc.at-6990-caller.cob:72.11-72.14: 69 77 xor_eq PIC X VALUE "z". 70 77 and_eq PIC X VALUE "0". 71 77 bitor PIC X VALUE "1". @@ -2547,7 +2527,7 @@ run_misc.at-6984-caller.cob:72.11-72.14: 74 PROCEDURE DIVISION. >> Error: Invalid syntax -run_misc.at-6984-caller.cob:76.33-76.39: +run_misc.at-6990-caller.cob:76.33-76.39: 73 * 74 PROCEDURE DIVISION. 75 CALL "callee" USING const @@ -2557,7 +2537,7 @@ run_misc.at-6984-caller.cob:76.33-76.39: 78 int >> Error: Invalid syntax -run_misc.at-6984-caller.cob:90.33-90.41: +run_misc.at-6990-caller.cob:90.33-90.41: 87 goto 88 register 89 sizeof @@ -2567,7 +2547,7 @@ run_misc.at-6984-caller.cob:90.33-90.41: 92 do >> Error: Invalid syntax -run_misc.at-6984-caller.cob:105.33-105.36: +run_misc.at-6990-caller.cob:105.33-105.36: 102 try 103 bool 104 explicit @@ -2577,7 +2557,7 @@ run_misc.at-6984-caller.cob:105.33-105.36: 107 typeid >> Error: Invalid syntax -run_misc.at-6984-caller.cob:130.33-130.36: +run_misc.at-6990-caller.cob:130.33-130.36: 127 xor_eq 128 and_eq 129 bitor @@ -2587,7 +2567,7 @@ run_misc.at-6984-caller.cob:130.33-130.36: 132 MOVE x'00' TO const >> Error: Invalid syntax -run_misc.at-6984-caller.cob:133.33-133.39: +run_misc.at-6990-caller.cob:133.33-133.39: 130 xor 131 END-CALL. 132 MOVE x'00' TO const @@ -2597,7 +2577,7 @@ run_misc.at-6984-caller.cob:133.33-133.39: 135 int >> Error: Invalid syntax -run_misc.at-6984-caller.cob:147.33-147.41: +run_misc.at-6990-caller.cob:147.33-147.41: 144 goto 145 register 146 sizeof @@ -2607,7 +2587,7 @@ run_misc.at-6984-caller.cob:147.33-147.41: 149 do >> Error: Invalid syntax -run_misc.at-6984-caller.cob:161.33-161.36: +run_misc.at-6990-caller.cob:161.33-161.36: 158 try 159 bool 160 explicit @@ -2617,7 +2597,7 @@ run_misc.at-6984-caller.cob:161.33-161.36: 163 typeid >> Error: Invalid syntax -run_misc.at-6984-caller.cob:186.33-186.36: +run_misc.at-6990-caller.cob:186.33-186.36: 183 xor_eq 184 and_eq 185 bitor @@ -2627,10 +2607,10 @@ run_misc.at-6984-caller.cob:186.33-186.36: 188 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7012:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7093:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7162:0 -run_misc.at-7162-calldyn.c:4.6-4.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7018:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7099:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7168:0 +run_misc.at-7168-calldyn.c:4.6-4.7: 1 2 #include 3 @@ -2640,7 +2620,7 @@ run_misc.at-7162-calldyn.c:4.6-4.7: 6 COB_EXT_EXPORT char * >> Error: Unexpected indicator: `p' -run_misc.at-7162-calldyn.c:4.7-4.10: +run_misc.at-7168-calldyn.c:4.7-4.10: 1 2 #include 3 @@ -2650,7 +2630,7 @@ run_misc.at-7162-calldyn.c:4.7-4.10: 6 COB_EXT_EXPORT char * >> Error: Invalid syntax -run_misc.at-7162-calldyn.c:5.6-5.7: +run_misc.at-7168-calldyn.c:5.6-5.7: 2 #include 3 4 /* wrapper function as C functions are not @@ -2660,7 +2640,7 @@ run_misc.at-7162-calldyn.c:5.6-5.7: 7 calldyn (unsigned char *env_name) >> Error: Unexpected indicator: `e' -run_misc.at-7162-calldyn.c:6.6-6.7: +run_misc.at-7168-calldyn.c:6.6-6.7: 3 4 /* wrapper function as C functions are not 5 accessible without explicit loading on all systems */ @@ -2670,7 +2650,7 @@ run_misc.at-7162-calldyn.c:6.6-6.7: 8 { >> Error: Unexpected indicator: `T' -run_misc.at-7162-calldyn.c:7.6-7.7: +run_misc.at-7168-calldyn.c:7.6-7.7: 4 /* wrapper function as C functions are not 5 accessible without explicit loading on all systems */ 6 COB_EXT_EXPORT char * @@ -2680,7 +2660,7 @@ run_misc.at-7162-calldyn.c:7.6-7.7: 9 return cob_getenv (env_name); >> Error: Unexpected indicator: `n' -run_misc.at-7162-calldyn.c:9.6-9.7: +run_misc.at-7168-calldyn.c:9.6-9.7: 6 COB_EXT_EXPORT char * 7 calldyn (unsigned char *env_name) 8 { @@ -2689,14 +2669,14 @@ run_misc.at-7162-calldyn.c:9.6-9.7: 10 } >> Error: Unexpected indicator: `r' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7160:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7163:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7188:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7229:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7267:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7296:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7331:0 -run_misc.at-7331-callee.cob:5.42: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7166:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7169:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7194:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7235:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7273:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7302:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7337:0 +run_misc.at-7337-callee.cob:5.42: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. callee. 4 DATA DIVISION. @@ -2706,7 +2686,7 @@ run_misc.at-7331-callee.cob:5.42: 7 EXIT PROGRAM. >> Hint: Missing -run_misc.at-7331-callee.cob:5.43-5.50: +run_misc.at-7337-callee.cob:5.43-5.50: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. callee. 4 DATA DIVISION. @@ -2716,8 +2696,8 @@ run_misc.at-7331-callee.cob:5.43-5.50: 7 EXIT PROGRAM. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7332:0 -run_misc.at-7332-caller.cob:5.34: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7338:0 +run_misc.at-7338-caller.cob:5.34: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. caller. 4 PROCEDURE DIVISION. @@ -2727,7 +2707,7 @@ run_misc.at-7332-caller.cob:5.34: 7 DISPLAY RETURN-CODE WITH NO ADVANCING >> Hint: Missing -run_misc.at-7332-caller.cob:5.35-5.42: +run_misc.at-7338-caller.cob:5.35-5.42: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. caller. 4 PROCEDURE DIVISION. @@ -2737,9 +2717,9 @@ run_misc.at-7332-caller.cob:5.35-5.42: 7 DISPLAY RETURN-CODE WITH NO ADVANCING >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7389:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7487:0 -run_misc.at-7487-cmod.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7381:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7494:0 +run_misc.at-7494-cmod.c:5.6-5.7: 2 #include 3 #include 4 @@ -2749,7 +2729,7 @@ run_misc.at-7487-cmod.c:5.6-5.7: 7 { >> Error: Unexpected indicator: `T' -run_misc.at-7487-cmod.c:5.7-5.8: +run_misc.at-7494-cmod.c:5.7-5.8: 2 #include 3 #include 4 @@ -2759,7 +2739,7 @@ run_misc.at-7487-cmod.c:5.7-5.8: 7 { >> Error: Invalid syntax -run_misc.at-7487-cmod.c:6.6-6.7: +run_misc.at-7494-cmod.c:6.6-6.7: 3 #include 4 5 COB_EXT_EXPORT int @@ -2769,7 +2749,7 @@ run_misc.at-7487-cmod.c:6.6-6.7: 8 int i; >> Error: Unexpected indicator: `u' -run_misc.at-7487-cmod.c:8.6-8.7: +run_misc.at-7494-cmod.c:8.6-8.7: 5 COB_EXT_EXPORT int 6 dump (unsigned char *data) 7 { @@ -2779,7 +2759,7 @@ run_misc.at-7487-cmod.c:8.6-8.7: 10 printf ("%02X", data[i]); >> Error: Unexpected indicator: `i' -run_misc.at-7487-cmod.c:9.6-9.7: +run_misc.at-7494-cmod.c:9.6-9.7: 6 dump (unsigned char *data) 7 { 8 int i; @@ -2789,30 +2769,40 @@ run_misc.at-7487-cmod.c:9.6-9.7: 11 puts (" ."); >> Error: Unexpected indicator: `(' -run_misc.at-7487-cmod.c:10.6-10.7: +run_misc.at-7494-cmod.c:10.6-10.7: 7 { 8 int i; 9 for (i = 0; i < 4; i++) 10 > printf ("%02X", data[i]); ---- ^ 11 puts (" ."); - 12 return 0; + 12 fflush(stdout); >> Error: Unexpected indicator: `i' -run_misc.at-7487-cmod.c:12.6-12.7: +run_misc.at-7494-cmod.c:12.6-12.7: 9 for (i = 0; i < 4; i++) 10 printf ("%02X", data[i]); 11 puts (" ."); - 12 > return 0; + 12 > fflush(stdout); ---- ^ - 13 } + 13 return 0; + 14 } +>> Error: Unexpected indicator: `s' + +run_misc.at-7494-cmod.c:13.6-13.7: + 10 printf ("%02X", data[i]); + 11 puts (" ."); + 12 fflush(stdout); + 13 > return 0; +---- ^ + 14 } >> Error: Unexpected indicator: `r' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7487:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7564:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7564:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7598:0 -run_misc.at-7598-callee.cob:5.42: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7494:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7570:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7570:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7604:0 +run_misc.at-7604-callee.cob:5.42: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. callee. 4 DATA DIVISION. @@ -2822,7 +2812,7 @@ run_misc.at-7598-callee.cob:5.42: 7 EXIT PROGRAM. >> Hint: Missing -run_misc.at-7598-callee.cob:5.43-5.50: +run_misc.at-7604-callee.cob:5.43-5.50: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. callee. 4 DATA DIVISION. @@ -2832,8 +2822,8 @@ run_misc.at-7598-callee.cob:5.43-5.50: 7 EXIT PROGRAM. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7598:0 -run_misc.at-7598-caller.cob:6.34: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7604:0 +run_misc.at-7604-caller.cob:6.34: 3 PROGRAM-ID. caller. 4 PROCEDURE DIVISION. 5 MOVE 42 TO RETURN-CODE @@ -2843,7 +2833,7 @@ run_misc.at-7598-caller.cob:6.34: 8 IF RETURN-CODE NOT = 42 >> Hint: Missing -run_misc.at-7598-caller.cob:6.35-6.42: +run_misc.at-7604-caller.cob:6.35-6.42: 3 PROGRAM-ID. caller. 4 PROCEDURE DIVISION. 5 MOVE 42 TO RETURN-CODE @@ -2853,11 +2843,11 @@ run_misc.at-7598-caller.cob:6.35-6.42: 8 IF RETURN-CODE NOT = 42 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7790:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7792:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7796:0 Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7798:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7800:0 -run_misc.at-7800-caller.cob:14.16: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7804:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7806:0 +run_misc.at-7806-caller.cob:14.16: 11 78 ZER VALUE ZERO. 12 *> 13 PROCEDURE DIVISION. @@ -2867,7 +2857,7 @@ run_misc.at-7800-caller.cob:14.16: 16 RESET TRACE >> Hint: Missing . -run_misc.at-7800-caller.cob:14.17-14.22: +run_misc.at-7806-caller.cob:14.17-14.22: 11 78 ZER VALUE ZERO. 12 *> 13 PROCEDURE DIVISION. @@ -2877,7 +2867,7 @@ run_misc.at-7800-caller.cob:14.17-14.22: 16 RESET TRACE >> Warning: Invalid syntax -run_misc.at-7800-caller.cob:14.22: +run_misc.at-7806-caller.cob:14.22: 11 78 ZER VALUE ZERO. 12 *> 13 PROCEDURE DIVISION. @@ -2887,7 +2877,7 @@ run_misc.at-7800-caller.cob:14.22: 16 RESET TRACE >> Hint: Missing . -run_misc.at-7800-caller.cob:15.11-15.15: +run_misc.at-7806-caller.cob:15.11-15.15: 12 *> 13 PROCEDURE DIVISION. 14 READY TRACE @@ -2897,7 +2887,7 @@ run_misc.at-7800-caller.cob:15.11-15.15: 17 CALL "callee1" >> Warning: Invalid syntax -run_misc.at-7800-caller.cob:16.11-16.16: +run_misc.at-7806-caller.cob:16.11-16.16: 13 PROCEDURE DIVISION. 14 READY TRACE 15 MOVE 1 TO RETURN-CODE @@ -2907,7 +2897,7 @@ run_misc.at-7800-caller.cob:16.11-16.16: 18 END-CALL >> Error: Invalid syntax -run_misc.at-7800-caller.cob:18.19: +run_misc.at-7806-caller.cob:18.19: 15 MOVE 1 TO RETURN-CODE 16 RESET TRACE 17 CALL "callee1" @@ -2917,7 +2907,7 @@ run_misc.at-7800-caller.cob:18.19: 20 MOVE 2 TO RETURN-CODE >> Hint: Missing . -run_misc.at-7800-caller.cob:19.11-19.16: +run_misc.at-7806-caller.cob:19.11-19.16: 16 RESET TRACE 17 CALL "callee1" 18 END-CALL @@ -2927,7 +2917,7 @@ run_misc.at-7800-caller.cob:19.11-19.16: 21 CALL "callee1" >> Warning: Invalid syntax -run_misc.at-7800-caller.cob:19.16: +run_misc.at-7806-caller.cob:19.16: 16 RESET TRACE 17 CALL "callee1" 18 END-CALL @@ -2937,7 +2927,7 @@ run_misc.at-7800-caller.cob:19.16: 21 CALL "callee1" >> Hint: Missing . -run_misc.at-7800-caller.cob:19.17-19.22: +run_misc.at-7806-caller.cob:19.17-19.22: 16 RESET TRACE 17 CALL "callee1" 18 END-CALL @@ -2947,7 +2937,7 @@ run_misc.at-7800-caller.cob:19.17-19.22: 21 CALL "callee1" >> Warning: Invalid syntax -run_misc.at-7800-caller.cob:19.22: +run_misc.at-7806-caller.cob:19.22: 16 RESET TRACE 17 CALL "callee1" 18 END-CALL @@ -2957,7 +2947,7 @@ run_misc.at-7800-caller.cob:19.22: 21 CALL "callee1" >> Hint: Missing . -run_misc.at-7800-caller.cob:20.11-20.15: +run_misc.at-7806-caller.cob:20.11-20.15: 17 CALL "callee1" 18 END-CALL 19 READY TRACE @@ -2967,11 +2957,11 @@ run_misc.at-7800-caller.cob:20.11-20.15: 22 END-CALL >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7794:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7796:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:8103:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:8708:0 -run_misc.at-8708-prog.cob:27.18-27.26: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7800:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:7802:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:8117:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:8722:0 +run_misc.at-8722-prog.cob:27.18-27.26: 24 FILE STATUS IS CUST-STAT. 25 26 SELECT FLATFILE @@ -2981,22 +2971,22 @@ run_misc.at-8708-prog.cob:27.18-27.26: 29 ACCESS IS RANDOM RELATIVE KEY IS REC-NUM >> Warning: Ignored EXTERNAL (implementation pending) -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10054:0 -run_misc.at-10054-reference:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10068:0 +run_misc.at-10068-reference:1.6-1.7: 1 > Source: 'prog.cob' ---- ^ 2 Program-Id: prog 3 Line: 292 Entry: prog >> Error: Unexpected indicator: `:' -run_misc.at-10054-reference:1.8-1.18: +run_misc.at-10068-reference:1.8-1.18: 1 > Source: 'prog.cob' ---- ^^^^^^^^^^ 2 Program-Id: prog 3 Line: 292 Entry: prog >> Error: Invalid syntax -run_misc.at-10054-reference:2.6-2.7: +run_misc.at-10068-reference:2.6-2.7: 1 Source: 'prog.cob' 2 > Program-Id: prog ---- ^ @@ -3004,7 +2994,7 @@ run_misc.at-10054-reference:2.6-2.7: 4 Line: 292 Paragraph: MAINFILE >> Error: Unexpected indicator: `m' -run_misc.at-10054-reference:2.10-2.11: +run_misc.at-10068-reference:2.10-2.11: 1 Source: 'prog.cob' 2 > Program-Id: prog ---- ^ @@ -3012,7 +3002,7 @@ run_misc.at-10054-reference:2.10-2.11: 4 Line: 292 Paragraph: MAINFILE >> Error: Invalid syntax -run_misc.at-10054-reference:2.10: +run_misc.at-10068-reference:2.10: 1 Source: 'prog.cob' 2 > Program-Id: prog ---- ^ @@ -3020,22 +3010,22 @@ run_misc.at-10054-reference:2.10: 4 Line: 292 Paragraph: MAINFILE >> Hint: Missing DIVISION . PROGRAM_ID . -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10194:0 -run_misc.at-10194-reference_append:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10208:0 +run_misc.at-10208-reference_append:1.6-1.7: 1 > Source: 'prog.cob' ---- ^ 2 Program-Id: prog 3 Entry: prog and now ... 292 >> Error: Unexpected indicator: `:' -run_misc.at-10194-reference_append:1.8-1.18: +run_misc.at-10208-reference_append:1.8-1.18: 1 > Source: 'prog.cob' ---- ^^^^^^^^^^ 2 Program-Id: prog 3 Entry: prog and now ... 292 >> Error: Invalid syntax -run_misc.at-10194-reference_append:2.6-2.7: +run_misc.at-10208-reference_append:2.6-2.7: 1 Source: 'prog.cob' 2 > Program-Id: prog ---- ^ @@ -3043,7 +3033,7 @@ run_misc.at-10194-reference_append:2.6-2.7: 4 Paragraph: MAINFILE and now ... 292 >> Error: Unexpected indicator: `m' -run_misc.at-10194-reference_append:2.10-2.11: +run_misc.at-10208-reference_append:2.10-2.11: 1 Source: 'prog.cob' 2 > Program-Id: prog ---- ^ @@ -3051,7 +3041,7 @@ run_misc.at-10194-reference_append:2.10-2.11: 4 Paragraph: MAINFILE and now ... 292 >> Error: Invalid syntax -run_misc.at-10194-reference_append:2.10: +run_misc.at-10208-reference_append:2.10: 1 Source: 'prog.cob' 2 > Program-Id: prog ---- ^ @@ -3059,7 +3049,7 @@ run_misc.at-10194-reference_append:2.10: 4 Paragraph: MAINFILE and now ... 292 >> Hint: Missing DIVISION -run_misc.at-10194-reference_append:3.6-3.7: +run_misc.at-10208-reference_append:3.6-3.7: 1 Source: 'prog.cob' 2 Program-Id: prog 3 > Entry: prog and now ... 292 @@ -3068,7 +3058,7 @@ run_misc.at-10194-reference_append:3.6-3.7: 5 Paragraph: LOADFILE and now ... 335 >> Error: Unexpected indicator: `t' -run_misc.at-10194-reference_append:3.52-3.53: +run_misc.at-10208-reference_append:3.52-3.53: 1 Source: 'prog.cob' 2 Program-Id: prog 3 > Entry: prog and now ... 292 @@ -3077,7 +3067,7 @@ run_misc.at-10194-reference_append:3.52-3.53: 5 Paragraph: LOADFILE and now ... 335 >> Error: Invalid syntax -run_misc.at-10194-reference_append:3.52: +run_misc.at-10208-reference_append:3.52: 1 Source: 'prog.cob' 2 Program-Id: prog 3 > Entry: prog and now ... 292 @@ -3086,7 +3076,7 @@ run_misc.at-10194-reference_append:3.52: 5 Paragraph: LOADFILE and now ... 335 >> Hint: Missing PROGRAM_ID . -run_misc.at-10194-reference_append:4.6-4.7: +run_misc.at-10208-reference_append:4.6-4.7: 1 Source: 'prog.cob' 2 Program-Id: prog 3 Entry: prog and now ... 292 @@ -3096,7 +3086,7 @@ run_misc.at-10194-reference_append:4.6-4.7: 6 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:5.6-5.7: +run_misc.at-10208-reference_append:5.6-5.7: 2 Program-Id: prog 3 Entry: prog and now ... 292 4 Paragraph: MAINFILE and now ... 292 @@ -3106,7 +3096,7 @@ run_misc.at-10194-reference_append:5.6-5.7: 7 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:6.6-6.7: +run_misc.at-10208-reference_append:6.6-6.7: 3 Entry: prog and now ... 292 4 Paragraph: MAINFILE and now ... 292 5 Paragraph: LOADFILE and now ... 335 @@ -3116,7 +3106,7 @@ run_misc.at-10194-reference_append:6.6-6.7: 8 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:7.6-7.7: +run_misc.at-10208-reference_append:7.6-7.7: 4 Paragraph: MAINFILE and now ... 292 5 Paragraph: LOADFILE and now ... 335 6 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3126,7 +3116,7 @@ run_misc.at-10194-reference_append:7.6-7.7: 9 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:8.6-8.7: +run_misc.at-10208-reference_append:8.6-8.7: 5 Paragraph: LOADFILE and now ... 335 6 Paragraph: 1000-LOAD-RECORD and now ... 358 7 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3136,7 +3126,7 @@ run_misc.at-10194-reference_append:8.6-8.7: 10 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:9.6-9.7: +run_misc.at-10208-reference_append:9.6-9.7: 6 Paragraph: 1000-LOAD-RECORD and now ... 358 7 Paragraph: 1000-LOAD-RECORD and now ... 358 8 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3146,7 +3136,7 @@ run_misc.at-10194-reference_append:9.6-9.7: 11 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:10.6-10.7: +run_misc.at-10208-reference_append:10.6-10.7: 7 Paragraph: 1000-LOAD-RECORD and now ... 358 8 Paragraph: 1000-LOAD-RECORD and now ... 358 9 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3156,7 +3146,7 @@ run_misc.at-10194-reference_append:10.6-10.7: 12 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:11.6-11.7: +run_misc.at-10208-reference_append:11.6-11.7: 8 Paragraph: 1000-LOAD-RECORD and now ... 358 9 Paragraph: 1000-LOAD-RECORD and now ... 358 10 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3166,7 +3156,7 @@ run_misc.at-10194-reference_append:11.6-11.7: 13 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:12.6-12.7: +run_misc.at-10208-reference_append:12.6-12.7: 9 Paragraph: 1000-LOAD-RECORD and now ... 358 10 Paragraph: 1000-LOAD-RECORD and now ... 358 11 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3176,7 +3166,7 @@ run_misc.at-10194-reference_append:12.6-12.7: 14 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:13.6-13.7: +run_misc.at-10208-reference_append:13.6-13.7: 10 Paragraph: 1000-LOAD-RECORD and now ... 358 11 Paragraph: 1000-LOAD-RECORD and now ... 358 12 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3186,7 +3176,7 @@ run_misc.at-10194-reference_append:13.6-13.7: 15 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:14.6-14.7: +run_misc.at-10208-reference_append:14.6-14.7: 11 Paragraph: 1000-LOAD-RECORD and now ... 358 12 Paragraph: 1000-LOAD-RECORD and now ... 358 13 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3196,7 +3186,7 @@ run_misc.at-10194-reference_append:14.6-14.7: 16 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:15.6-15.7: +run_misc.at-10208-reference_append:15.6-15.7: 12 Paragraph: 1000-LOAD-RECORD and now ... 358 13 Paragraph: 1000-LOAD-RECORD and now ... 358 14 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3206,7 +3196,7 @@ run_misc.at-10194-reference_append:15.6-15.7: 17 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:16.6-16.7: +run_misc.at-10208-reference_append:16.6-16.7: 13 Paragraph: 1000-LOAD-RECORD and now ... 358 14 Paragraph: 1000-LOAD-RECORD and now ... 358 15 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3216,7 +3206,7 @@ run_misc.at-10194-reference_append:16.6-16.7: 18 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:17.6-17.7: +run_misc.at-10208-reference_append:17.6-17.7: 14 Paragraph: 1000-LOAD-RECORD and now ... 358 15 Paragraph: 1000-LOAD-RECORD and now ... 358 16 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3226,7 +3216,7 @@ run_misc.at-10194-reference_append:17.6-17.7: 19 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:18.6-18.7: +run_misc.at-10208-reference_append:18.6-18.7: 15 Paragraph: 1000-LOAD-RECORD and now ... 358 16 Paragraph: 1000-LOAD-RECORD and now ... 358 17 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3236,7 +3226,7 @@ run_misc.at-10194-reference_append:18.6-18.7: 20 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:19.6-19.7: +run_misc.at-10208-reference_append:19.6-19.7: 16 Paragraph: 1000-LOAD-RECORD and now ... 358 17 Paragraph: 1000-LOAD-RECORD and now ... 358 18 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3246,7 +3236,7 @@ run_misc.at-10194-reference_append:19.6-19.7: 21 Paragraph: 1000-LOAD-RECORD and now ... 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:20.6-20.7: +run_misc.at-10208-reference_append:20.6-20.7: 17 Paragraph: 1000-LOAD-RECORD and now ... 358 18 Paragraph: 1000-LOAD-RECORD and now ... 358 19 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3256,7 +3246,7 @@ run_misc.at-10194-reference_append:20.6-20.7: 22 Paragraph: LISTFILE and now ... 387 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:21.6-21.7: +run_misc.at-10208-reference_append:21.6-21.7: 18 Paragraph: 1000-LOAD-RECORD and now ... 358 19 Paragraph: 1000-LOAD-RECORD and now ... 358 20 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3266,7 +3256,7 @@ run_misc.at-10194-reference_append:21.6-21.7: 23 Source: 'prog.cob' >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:22.6-22.7: +run_misc.at-10208-reference_append:22.6-22.7: 19 Paragraph: 1000-LOAD-RECORD and now ... 358 20 Paragraph: 1000-LOAD-RECORD and now ... 358 21 Paragraph: 1000-LOAD-RECORD and now ... 358 @@ -3276,7 +3266,7 @@ run_misc.at-10194-reference_append:22.6-22.7: 24 Program-Id: prog >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:23.6-23.7: +run_misc.at-10208-reference_append:23.6-23.7: 20 Paragraph: 1000-LOAD-RECORD and now ... 358 21 Paragraph: 1000-LOAD-RECORD and now ... 358 22 Paragraph: LISTFILE and now ... 387 @@ -3286,7 +3276,7 @@ run_misc.at-10194-reference_append:23.6-23.7: 25 Entry: prog - 292 >> Error: Unexpected indicator: `:' -run_misc.at-10194-reference_append:24.6-24.7: +run_misc.at-10208-reference_append:24.6-24.7: 21 Paragraph: 1000-LOAD-RECORD and now ... 358 22 Paragraph: LISTFILE and now ... 387 23 Source: 'prog.cob' @@ -3296,7 +3286,7 @@ run_misc.at-10194-reference_append:24.6-24.7: 26 Paragraph: MAINFILE - 292 >> Error: Unexpected indicator: `m' -run_misc.at-10194-reference_append:24.10-24.11: +run_misc.at-10208-reference_append:24.10-24.11: 21 Paragraph: 1000-LOAD-RECORD and now ... 358 22 Paragraph: LISTFILE and now ... 387 23 Source: 'prog.cob' @@ -3306,7 +3296,7 @@ run_misc.at-10194-reference_append:24.10-24.11: 26 Paragraph: MAINFILE - 292 >> Error: Invalid syntax -run_misc.at-10194-reference_append:24.10: +run_misc.at-10208-reference_append:24.10: 21 Paragraph: 1000-LOAD-RECORD and now ... 358 22 Paragraph: LISTFILE and now ... 387 23 Source: 'prog.cob' @@ -3316,7 +3306,7 @@ run_misc.at-10194-reference_append:24.10: 26 Paragraph: MAINFILE - 292 >> Hint: Missing DIVISION . PROGRAM_ID . END PROGRAM -run_misc.at-10194-reference_append:25.6-25.7: +run_misc.at-10208-reference_append:25.6-25.7: 22 Paragraph: LISTFILE and now ... 387 23 Source: 'prog.cob' 24 Program-Id: prog @@ -3326,7 +3316,7 @@ run_misc.at-10194-reference_append:25.6-25.7: 27 Paragraph: LOADFILE - 335 >> Error: Unexpected indicator: `t' -run_misc.at-10194-reference_append:25.51: +run_misc.at-10208-reference_append:25.51: 22 Paragraph: LISTFILE and now ... 387 23 Source: 'prog.cob' 24 Program-Id: prog @@ -3336,7 +3326,7 @@ run_misc.at-10194-reference_append:25.51: 27 Paragraph: LOADFILE - 335 >> Hint: Missing . END PROGRAM -run_misc.at-10194-reference_append:26.6-26.7: +run_misc.at-10208-reference_append:26.6-26.7: 23 Source: 'prog.cob' 24 Program-Id: prog 25 Entry: prog - 292 @@ -3346,7 +3336,7 @@ run_misc.at-10194-reference_append:26.6-26.7: 28 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:26.7-26.9: +run_misc.at-10208-reference_append:26.7-26.9: 23 Source: 'prog.cob' 24 Program-Id: prog 25 Entry: prog - 292 @@ -3356,7 +3346,7 @@ run_misc.at-10194-reference_append:26.7-26.9: 28 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Invalid syntax -run_misc.at-10194-reference_append:26.51: +run_misc.at-10208-reference_append:26.51: 23 Source: 'prog.cob' 24 Program-Id: prog 25 Entry: prog - 292 @@ -3366,7 +3356,7 @@ run_misc.at-10194-reference_append:26.51: 28 Paragraph: 1000-LOAD-RECORD - 358 >> Hint: Missing . -run_misc.at-10194-reference_append:27.6-27.7: +run_misc.at-10208-reference_append:27.6-27.7: 24 Program-Id: prog 25 Entry: prog - 292 26 Paragraph: MAINFILE - 292 @@ -3376,7 +3366,7 @@ run_misc.at-10194-reference_append:27.6-27.7: 29 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:27.7-27.9: +run_misc.at-10208-reference_append:27.7-27.9: 24 Program-Id: prog 25 Entry: prog - 292 26 Paragraph: MAINFILE - 292 @@ -3386,7 +3376,7 @@ run_misc.at-10194-reference_append:27.7-27.9: 29 Paragraph: 1000-LOAD-RECORD - 358 >> Warning: Invalid syntax -run_misc.at-10194-reference_append:28.6-28.7: +run_misc.at-10208-reference_append:28.6-28.7: 25 Entry: prog - 292 26 Paragraph: MAINFILE - 292 27 Paragraph: LOADFILE - 335 @@ -3396,7 +3386,7 @@ run_misc.at-10194-reference_append:28.6-28.7: 30 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:29.6-29.7: +run_misc.at-10208-reference_append:29.6-29.7: 26 Paragraph: MAINFILE - 292 27 Paragraph: LOADFILE - 335 28 Paragraph: 1000-LOAD-RECORD - 358 @@ -3406,7 +3396,7 @@ run_misc.at-10194-reference_append:29.6-29.7: 31 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:30.6-30.7: +run_misc.at-10208-reference_append:30.6-30.7: 27 Paragraph: LOADFILE - 335 28 Paragraph: 1000-LOAD-RECORD - 358 29 Paragraph: 1000-LOAD-RECORD - 358 @@ -3416,7 +3406,7 @@ run_misc.at-10194-reference_append:30.6-30.7: 32 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:31.6-31.7: +run_misc.at-10208-reference_append:31.6-31.7: 28 Paragraph: 1000-LOAD-RECORD - 358 29 Paragraph: 1000-LOAD-RECORD - 358 30 Paragraph: 1000-LOAD-RECORD - 358 @@ -3426,7 +3416,7 @@ run_misc.at-10194-reference_append:31.6-31.7: 33 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:32.6-32.7: +run_misc.at-10208-reference_append:32.6-32.7: 29 Paragraph: 1000-LOAD-RECORD - 358 30 Paragraph: 1000-LOAD-RECORD - 358 31 Paragraph: 1000-LOAD-RECORD - 358 @@ -3436,7 +3426,7 @@ run_misc.at-10194-reference_append:32.6-32.7: 34 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:33.6-33.7: +run_misc.at-10208-reference_append:33.6-33.7: 30 Paragraph: 1000-LOAD-RECORD - 358 31 Paragraph: 1000-LOAD-RECORD - 358 32 Paragraph: 1000-LOAD-RECORD - 358 @@ -3446,7 +3436,7 @@ run_misc.at-10194-reference_append:33.6-33.7: 35 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:34.6-34.7: +run_misc.at-10208-reference_append:34.6-34.7: 31 Paragraph: 1000-LOAD-RECORD - 358 32 Paragraph: 1000-LOAD-RECORD - 358 33 Paragraph: 1000-LOAD-RECORD - 358 @@ -3456,7 +3446,7 @@ run_misc.at-10194-reference_append:34.6-34.7: 36 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:35.6-35.7: +run_misc.at-10208-reference_append:35.6-35.7: 32 Paragraph: 1000-LOAD-RECORD - 358 33 Paragraph: 1000-LOAD-RECORD - 358 34 Paragraph: 1000-LOAD-RECORD - 358 @@ -3466,7 +3456,7 @@ run_misc.at-10194-reference_append:35.6-35.7: 37 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:36.6-36.7: +run_misc.at-10208-reference_append:36.6-36.7: 33 Paragraph: 1000-LOAD-RECORD - 358 34 Paragraph: 1000-LOAD-RECORD - 358 35 Paragraph: 1000-LOAD-RECORD - 358 @@ -3476,7 +3466,7 @@ run_misc.at-10194-reference_append:36.6-36.7: 38 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:37.6-37.7: +run_misc.at-10208-reference_append:37.6-37.7: 34 Paragraph: 1000-LOAD-RECORD - 358 35 Paragraph: 1000-LOAD-RECORD - 358 36 Paragraph: 1000-LOAD-RECORD - 358 @@ -3486,7 +3476,7 @@ run_misc.at-10194-reference_append:37.6-37.7: 39 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:38.6-38.7: +run_misc.at-10208-reference_append:38.6-38.7: 35 Paragraph: 1000-LOAD-RECORD - 358 36 Paragraph: 1000-LOAD-RECORD - 358 37 Paragraph: 1000-LOAD-RECORD - 358 @@ -3496,7 +3486,7 @@ run_misc.at-10194-reference_append:38.6-38.7: 40 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:39.6-39.7: +run_misc.at-10208-reference_append:39.6-39.7: 36 Paragraph: 1000-LOAD-RECORD - 358 37 Paragraph: 1000-LOAD-RECORD - 358 38 Paragraph: 1000-LOAD-RECORD - 358 @@ -3506,7 +3496,7 @@ run_misc.at-10194-reference_append:39.6-39.7: 41 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:40.6-40.7: +run_misc.at-10208-reference_append:40.6-40.7: 37 Paragraph: 1000-LOAD-RECORD - 358 38 Paragraph: 1000-LOAD-RECORD - 358 39 Paragraph: 1000-LOAD-RECORD - 358 @@ -3516,7 +3506,7 @@ run_misc.at-10194-reference_append:40.6-40.7: 42 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:41.6-41.7: +run_misc.at-10208-reference_append:41.6-41.7: 38 Paragraph: 1000-LOAD-RECORD - 358 39 Paragraph: 1000-LOAD-RECORD - 358 40 Paragraph: 1000-LOAD-RECORD - 358 @@ -3526,7 +3516,7 @@ run_misc.at-10194-reference_append:41.6-41.7: 43 Paragraph: 1000-LOAD-RECORD - 358 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:42.6-42.7: +run_misc.at-10208-reference_append:42.6-42.7: 39 Paragraph: 1000-LOAD-RECORD - 358 40 Paragraph: 1000-LOAD-RECORD - 358 41 Paragraph: 1000-LOAD-RECORD - 358 @@ -3536,7 +3526,7 @@ run_misc.at-10194-reference_append:42.6-42.7: 44 Paragraph: LISTFILE - 387 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:43.6-43.7: +run_misc.at-10208-reference_append:43.6-43.7: 40 Paragraph: 1000-LOAD-RECORD - 358 41 Paragraph: 1000-LOAD-RECORD - 358 42 Paragraph: 1000-LOAD-RECORD - 358 @@ -3545,7 +3535,7 @@ run_misc.at-10194-reference_append:43.6-43.7: 44 Paragraph: LISTFILE - 387 >> Error: Unexpected indicator: `a' -run_misc.at-10194-reference_append:44.6-44.7: +run_misc.at-10208-reference_append:44.6-44.7: 41 Paragraph: 1000-LOAD-RECORD - 358 42 Paragraph: 1000-LOAD-RECORD - 358 43 Paragraph: 1000-LOAD-RECORD - 358 @@ -3553,8 +3543,8 @@ run_misc.at-10194-reference_append:44.6-44.7: ---- ^ >> Error: Unexpected indicator: `a' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10503:0 -run_misc.at-10503-prog.cob:9.34-9.42: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10517:0 +run_misc.at-10517-prog.cob:9.34-9.42: 6 7 INPUT-OUTPUT SECTION. 8 FILE-CONTROL. @@ -3564,7 +3554,7 @@ run_misc.at-10503-prog.cob:9.34-9.42: 11 ACCESS IS SEQUENTIAL RELATIVE KEY IS REC-NUM >> Warning: Ignored EXTERNAL (implementation pending) -run_misc.at-10503-prog.cob:198.12-198.25: +run_misc.at-10517-prog.cob:198.12-198.25: 195 ADD 1 TO X. 196 DISPLAY "X is " X. 197 ALLOCATE TEST-ALLOCED INITIALIZED. @@ -3576,8 +3566,8 @@ run_misc.at-10503-prog.cob:198.12-198.25: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10923:0 -run_misc.at-10923-reference_fdls_tmpl:2.7-2.11: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10935:0 +run_misc.at-10935-reference_fdls_tmpl:2.7-2.11: 1 2 > Module dump due to LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller ---- ^^^^ @@ -3585,7 +3575,7 @@ run_misc.at-10923-reference_fdls_tmpl:2.7-2.11: 4 Last statement of "sub1" was MOVE >> Error: Invalid syntax -run_misc.at-10923-reference_fdls_tmpl:4.6-4.7: +run_misc.at-10935-reference_fdls_tmpl:4.6-4.7: 1 2 Module dump due to LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller 3 @@ -3595,7 +3585,7 @@ run_misc.at-10923-reference_fdls_tmpl:4.6-4.7: 6 MAIN-1 at prog.cob:177 >> Error: Unexpected indicator: `s' -run_misc.at-10923-reference_fdls_tmpl:8.6-8.7: +run_misc.at-10935-reference_fdls_tmpl:8.6-8.7: 5 MAIN-2 OF MAIN-1 at cpyabrt:4 6 MAIN-1 at prog.cob:177 7 ENTRY sub1 at prog.cob:159 @@ -3605,7 +3595,7 @@ run_misc.at-10923-reference_fdls_tmpl:8.6-8.7: 10 ENTRY sub2 at sub2.cob:39 >> Error: Unexpected indicator: `s' -run_misc.at-10923-reference_fdls_tmpl:11.6-11.7: +run_misc.at-10935-reference_fdls_tmpl:11.6-11.7: 8 Last statement of "sub2" was CALL 9 DO-CALL OF SubwaY at sub2.cob:48 10 ENTRY sub2 at sub2.cob:39 @@ -3615,7 +3605,7 @@ run_misc.at-10923-reference_fdls_tmpl:11.6-11.7: 13 MAIN-100 at prog.cob:85 >> Error: Unexpected indicator: `s' -run_misc.at-10923-reference_fdls_tmpl:15.6-15.7: +run_misc.at-10935-reference_fdls_tmpl:15.6-15.7: 12 CALL-IT-OMIT at prog.cob:118 13 MAIN-100 at prog.cob:85 14 ENTRY prog at prog.cob:77 @@ -3625,7 +3615,7 @@ run_misc.at-10923-reference_fdls_tmpl:15.6-15.7: 17 Dump Program-Id sub1 from prog.cob compiled MMM DD YYYY HH:MM:SS >> Error: Unexpected indicator: `e' -run_misc.at-10923-reference_fdls_tmpl:17.6-17.7: +run_misc.at-10935-reference_fdls_tmpl:17.6-17.7: 14 ENTRY prog at prog.cob:77 15 Started by ./prog_fdls 16 @@ -3635,7 +3625,7 @@ run_misc.at-10923-reference_fdls_tmpl:17.6-17.7: 19 LINKAGE >> Error: Unexpected indicator: `r' -run_misc.at-10923-reference_fdls_tmpl:19.6-19.7: +run_misc.at-10935-reference_fdls_tmpl:19.6-19.7: 16 17 Dump Program-Id sub1 from prog.cob compiled MMM DD YYYY HH:MM:SS 18 @@ -3645,7 +3635,7 @@ run_misc.at-10923-reference_fdls_tmpl:19.6-19.7: 21 01 X 000005441 >> Error: Unexpected indicator: `E' -run_misc.at-10923-reference_fdls_tmpl:27.6-27.7: +run_misc.at-10935-reference_fdls_tmpl:27.6-27.7: 24 END OF DUMP - sub1 25 ********************** 26 @@ -3655,7 +3645,7 @@ run_misc.at-10923-reference_fdls_tmpl:27.6-27.7: 29 LINKAGE >> Error: Unexpected indicator: `r' -run_misc.at-10923-reference_fdls_tmpl:29.6-29.7: +run_misc.at-10935-reference_fdls_tmpl:29.6-29.7: 26 27 Dump Program-Id sub2 from sub2.cob compiled MMM DD YYYY HH:MM:SS 28 @@ -3665,7 +3655,7 @@ run_misc.at-10923-reference_fdls_tmpl:29.6-29.7: 31 01 X 000005441 >> Error: Unexpected indicator: `E' -run_misc.at-10923-reference_fdls_tmpl:33.6-33.7: +run_misc.at-10935-reference_fdls_tmpl:33.6-33.7: 30 ********************** 31 01 X 000005441 32 01 TSPFL-RECORD. @@ -3675,7 +3665,7 @@ run_misc.at-10923-reference_fdls_tmpl:33.6-33.7: 35 10 CM-DISK '8417' >> Error: Unexpected indicator: `0' -run_misc.at-10923-reference_fdls_tmpl:34.6-34.7: +run_misc.at-10935-reference_fdls_tmpl:34.6-34.7: 31 01 X 000005441 32 01 TSPFL-RECORD. 33 10 CM-CUST-NUM 'ALP00000' @@ -3685,7 +3675,7 @@ run_misc.at-10923-reference_fdls_tmpl:34.6-34.7: 36 10 CM-NO-TERMINALS 0010 >> Error: Unexpected indicator: `0' -run_misc.at-10923-reference_fdls_tmpl:35.6-35.7: +run_misc.at-10935-reference_fdls_tmpl:35.6-35.7: 32 01 TSPFL-RECORD. 33 10 CM-CUST-NUM 'ALP00000' 34 10 CM-COMPANY 'ALPHA ELECTRICAL CO. LTD.' @@ -3695,7 +3685,7 @@ run_misc.at-10923-reference_fdls_tmpl:35.6-35.7: 37 77 DYNAMIC-NUM 0124 >> Error: Unexpected indicator: `0' -run_misc.at-10923-reference_fdls_tmpl:36.6-36.7: +run_misc.at-10935-reference_fdls_tmpl:36.6-36.7: 33 10 CM-CUST-NUM 'ALP00000' 34 10 CM-COMPANY 'ALPHA ELECTRICAL CO. LTD.' 35 10 CM-DISK '8417' @@ -3705,7 +3695,7 @@ run_misc.at-10923-reference_fdls_tmpl:36.6-36.7: 38 >> Error: Unexpected indicator: `0' -run_misc.at-10923-reference_fdls_tmpl:42.6-42.7: +run_misc.at-10935-reference_fdls_tmpl:42.6-42.7: 39 END OF DUMP - sub2 40 ********************** 41 @@ -3715,7 +3705,7 @@ run_misc.at-10923-reference_fdls_tmpl:42.6-42.7: 44 FD FLATFILE >> Error: Unexpected indicator: `r' -run_misc.at-10923-reference_fdls_tmpl:44.6-44.7: +run_misc.at-10935-reference_fdls_tmpl:44.6-44.7: 41 42 Dump Program-Id prog from prog.cob compiled MMM DD YYYY HH:MM:SS 43 @@ -3725,7 +3715,7 @@ run_misc.at-10923-reference_fdls_tmpl:44.6-44.7: 46 File is OPEN >> Error: Unexpected indicator: `T' -run_misc.at-10923-reference_fdls_tmpl:46.6-46.7: +run_misc.at-10935-reference_fdls_tmpl:46.6-46.7: 43 44 FD FLATFILE 45 ********************** @@ -3735,7 +3725,7 @@ run_misc.at-10923-reference_fdls_tmpl:46.6-46.7: 48 01 TSPFL-RECORD. >> Error: Unexpected indicator: `e' -run_misc.at-10923-reference_fdls_tmpl:47.6-47.7: +run_misc.at-10935-reference_fdls_tmpl:47.6-47.7: 44 FD FLATFILE 45 ********************** 46 File is OPEN @@ -3745,7 +3735,7 @@ run_misc.at-10923-reference_fdls_tmpl:47.6-47.7: 49 10 CM-CUST-NUM 'ALP00000' >> Error: Unexpected indicator: `E' -run_misc.at-10923-reference_fdls_tmpl:49.6-49.7: +run_misc.at-10935-reference_fdls_tmpl:49.6-49.7: 46 File is OPEN 47 FILE STATUS '00' 48 01 TSPFL-RECORD. @@ -3755,7 +3745,7 @@ run_misc.at-10923-reference_fdls_tmpl:49.6-49.7: 51 10 CM-DISK '8417' >> Error: Unexpected indicator: `0' -run_misc.at-10923-reference_fdls_tmpl:50.6-50.7: +run_misc.at-10935-reference_fdls_tmpl:50.6-50.7: 47 FILE STATUS '00' 48 01 TSPFL-RECORD. 49 10 CM-CUST-NUM 'ALP00000' @@ -3765,7 +3755,7 @@ run_misc.at-10923-reference_fdls_tmpl:50.6-50.7: 52 10 CM-NO-TERMINALS 0010 >> Error: Unexpected indicator: `0' -run_misc.at-10923-reference_fdls_tmpl:51.6-51.7: +run_misc.at-10935-reference_fdls_tmpl:51.6-51.7: 48 01 TSPFL-RECORD. 49 10 CM-CUST-NUM 'ALP00000' 50 10 CM-COMPANY 'ALPHA ELECTRICAL CO. LTD.' @@ -3775,7 +3765,7 @@ run_misc.at-10923-reference_fdls_tmpl:51.6-51.7: 53 >> Error: Unexpected indicator: `0' -run_misc.at-10923-reference_fdls_tmpl:52.6-52.7: +run_misc.at-10935-reference_fdls_tmpl:52.6-52.7: 49 10 CM-CUST-NUM 'ALP00000' 50 10 CM-COMPANY 'ALPHA ELECTRICAL CO. LTD.' 51 10 CM-DISK '8417' @@ -3785,8 +3775,76 @@ run_misc.at-10923-reference_fdls_tmpl:52.6-52.7: 54 END OF DUMP - prog >> Error: Unexpected indicator: `0' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10739:0 -run_misc.at-10739-reference_tmpl:2.7-2.11: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10844:0 +run_misc.at-10844-reference_stderr:1.6-1.7: + 1 > libcob: cpyabrt:4: error: LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller +---- ^ + 2 libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') + 3 +>> Error: Unexpected indicator: `:' + +run_misc.at-10844-reference_stderr:1.8-1.15: + 1 > libcob: cpyabrt:4: error: LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller +---- ^^^^^^^ + 2 libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') + 3 +>> Error: Invalid syntax + +run_misc.at-10844-reference_stderr:1.67-1.72: + 1 > libcob: cpyabrt:4: error: LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller +---- ^^^^^ + 2 libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') + 3 +>> Error: Missing continuation of `CM-C' + +run_misc.at-10844-reference_stderr:2.6-2.7: + 1 libcob: cpyabrt:4: error: LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller + 2 > libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') +---- ^ + 3 + 4 Last statement of "sub1" was MOVE +>> Error: Unexpected indicator: `:' + +run_misc.at-10844-reference_stderr:4.6-4.7: + 1 libcob: cpyabrt:4: error: LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller + 2 libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') + 3 + 4 > Last statement of "sub1" was MOVE +---- ^ + 5 MAIN-2 OF MAIN-1 at cpyabrt:4 + 6 MAIN-1 at prog.cob:177 +>> Error: Unexpected indicator: `s' + +run_misc.at-10844-reference_stderr:8.6-8.7: + 5 MAIN-2 OF MAIN-1 at cpyabrt:4 + 6 MAIN-1 at prog.cob:177 + 7 ENTRY sub1 at prog.cob:159 + 8 > Last statement of "sub2" was CALL +---- ^ + 9 DO-CALL OF SubwaY at sub2.cob:48 + 10 ENTRY sub2 at sub2.cob:39 +>> Error: Unexpected indicator: `s' + +run_misc.at-10844-reference_stderr:11.6-11.7: + 8 Last statement of "sub2" was CALL + 9 DO-CALL OF SubwaY at sub2.cob:48 + 10 ENTRY sub2 at sub2.cob:39 + 11 > Last statement of "prog" was CALL +---- ^ + 12 CALL-IT-OMIT at prog.cob:118 + 13 MAIN-100 at prog.cob:85 +>> Error: Unexpected indicator: `s' + +run_misc.at-10844-reference_stderr:15.6-15.7: + 12 CALL-IT-OMIT at prog.cob:118 + 13 MAIN-100 at prog.cob:85 + 14 ENTRY prog at prog.cob:77 + 15 > Started by ./prog +---- ^ +>> Error: Unexpected indicator: `e' + +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10753:0 +run_misc.at-10753-reference_tmpl:2.7-2.11: 1 2 > Module dump due to LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller ---- ^^^^ @@ -3794,7 +3852,7 @@ run_misc.at-10739-reference_tmpl:2.7-2.11: 4 Last statement of "sub1" was MOVE >> Error: Invalid syntax -run_misc.at-10739-reference_tmpl:4.6-4.7: +run_misc.at-10753-reference_tmpl:4.6-4.7: 1 2 Module dump due to LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller 3 @@ -3804,7 +3862,7 @@ run_misc.at-10739-reference_tmpl:4.6-4.7: 6 MAIN-1 at prog.cob:177 >> Error: Unexpected indicator: `s' -run_misc.at-10739-reference_tmpl:8.6-8.7: +run_misc.at-10753-reference_tmpl:8.6-8.7: 5 MAIN-2 OF MAIN-1 at cpyabrt:4 6 MAIN-1 at prog.cob:177 7 ENTRY sub1 at prog.cob:159 @@ -3814,7 +3872,7 @@ run_misc.at-10739-reference_tmpl:8.6-8.7: 10 ENTRY sub2 at sub2.cob:39 >> Error: Unexpected indicator: `s' -run_misc.at-10739-reference_tmpl:11.6-11.7: +run_misc.at-10753-reference_tmpl:11.6-11.7: 8 Last statement of "sub2" was CALL 9 DO-CALL OF SubwaY at sub2.cob:48 10 ENTRY sub2 at sub2.cob:39 @@ -3824,7 +3882,7 @@ run_misc.at-10739-reference_tmpl:11.6-11.7: 13 MAIN-100 at prog.cob:85 >> Error: Unexpected indicator: `s' -run_misc.at-10739-reference_tmpl:15.6-15.7: +run_misc.at-10753-reference_tmpl:15.6-15.7: 12 CALL-IT-OMIT at prog.cob:118 13 MAIN-100 at prog.cob:85 14 ENTRY prog at prog.cob:77 @@ -3834,7 +3892,7 @@ run_misc.at-10739-reference_tmpl:15.6-15.7: 17 Dump Program-Id sub1 from prog.cob compiled MMM DD YYYY HH:MM:SS >> Error: Unexpected indicator: `e' -run_misc.at-10739-reference_tmpl:17.6-17.7: +run_misc.at-10753-reference_tmpl:17.6-17.7: 14 ENTRY prog at prog.cob:77 15 Started by prog 16 @@ -3844,7 +3902,7 @@ run_misc.at-10739-reference_tmpl:17.6-17.7: 19 WORKING-STORAGE >> Error: Unexpected indicator: `r' -run_misc.at-10739-reference_tmpl:19.6-19.7: +run_misc.at-10753-reference_tmpl:19.6-19.7: 16 17 Dump Program-Id sub1 from prog.cob compiled MMM DD YYYY HH:MM:SS 18 @@ -3854,7 +3912,7 @@ run_misc.at-10739-reference_tmpl:19.6-19.7: 21 77 RETURN-CODE +000000000 >> Error: Unexpected indicator: `G' -run_misc.at-10739-reference_tmpl:56.41-56.72: +run_misc.at-10753-reference_tmpl:56.41-56.72: 53 05 TSTTAIL1 X _ 54 1 x 5811 55 05 TSTCOMP3 58585 @@ -3864,7 +3922,7 @@ run_misc.at-10739-reference_tmpl:56.41-56.72: 58 05 TSTHEX Q u i c k e r g r e y f o x j u m p e d _ >> Error: Missing continuation of `Quick brown fox jumped over th' -run_misc.at-10739-reference_tmpl:70.41-70.72: +run_misc.at-10753-reference_tmpl:70.41-70.72: 67 97 x 58585858 68 05 TSTHEX2 XXXXXXXXX\0XXXXXXXXXXXXXXXXXXXXX\\XXXXXX\0XXXXXXX\tXXXXXX 69 54 : AXXXX\rX @@ -3874,7 +3932,7 @@ run_misc.at-10739-reference_tmpl:70.41-70.72: 72 >> Error: Missing continuation of `Quick brown fox jumped over th' -run_misc.at-10739-reference_tmpl:73.6-73.7: +run_misc.at-10753-reference_tmpl:73.6-73.7: 70 05 TSTTAILX 'Quick brown fox jumped over the dog ' 71 trailing LOW-VALUES 72 @@ -3884,7 +3942,7 @@ run_misc.at-10739-reference_tmpl:73.6-73.7: 75 01 X 000005441 >> Error: Unexpected indicator: `E' -run_misc.at-10739-reference_tmpl:81.6-81.7: +run_misc.at-10753-reference_tmpl:81.6-81.7: 78 END OF DUMP - sub1 79 ********************** 80 @@ -3894,7 +3952,7 @@ run_misc.at-10739-reference_tmpl:81.6-81.7: 83 WORKING-STORAGE >> Error: Unexpected indicator: `r' -run_misc.at-10739-reference_tmpl:83.6-83.7: +run_misc.at-10753-reference_tmpl:83.6-83.7: 80 81 Dump Program-Id sub2 from sub2.cob compiled MMM DD YYYY HH:MM:SS 82 @@ -3904,7 +3962,7 @@ run_misc.at-10739-reference_tmpl:83.6-83.7: 85 77 RETURN-CODE +000000000 >> Error: Unexpected indicator: `G' -run_misc.at-10739-reference_tmpl:116.41-116.72: +run_misc.at-10753-reference_tmpl:116.41-116.72: 113 05 TSTTAIL1 X _ 114 1 x 5811 115 05 TSTCOMP3 58585 @@ -3914,7 +3972,7 @@ run_misc.at-10739-reference_tmpl:116.41-116.72: 118 05 TSTHEX Q u i c k e r g r e y f o x j u m p e d _ >> Error: Missing continuation of `Quick brown fox jumped over th' -run_misc.at-10739-reference_tmpl:133.6-133.7: +run_misc.at-10753-reference_tmpl:133.6-133.7: 130 05 TSTTAILX Quick brown fox jumped over the dog \0ALPHA ELECTRICA 131 57 : L CO.\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0 132 01 BASED-RECORD. @@ -3924,7 +3982,7 @@ run_misc.at-10739-reference_tmpl:133.6-133.7: 135 10 B-NO-TERMINALS 0000 >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:134.6-134.7: +run_misc.at-10753-reference_tmpl:134.6-134.7: 131 57 : L CO.\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0 132 01 BASED-RECORD. 133 10 B-NUM 0124 @@ -3934,7 +3992,7 @@ run_misc.at-10739-reference_tmpl:134.6-134.7: 136 77 BASED-NEVER-SET address >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:135.6-135.7: +run_misc.at-10753-reference_tmpl:135.6-135.7: 132 01 BASED-RECORD. 133 10 B-NUM 0124 134 10 B-DISK 'marvdisc' @@ -3944,7 +4002,7 @@ run_misc.at-10739-reference_tmpl:135.6-135.7: 137 >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:138.6-138.7: +run_misc.at-10753-reference_tmpl:138.6-138.7: 135 10 B-NO-TERMINALS 0000 136 77 BASED-NEVER-SET address 137 @@ -3954,7 +4012,7 @@ run_misc.at-10739-reference_tmpl:138.6-138.7: 140 01 X 000005441 >> Error: Unexpected indicator: `E' -run_misc.at-10739-reference_tmpl:142.6-142.7: +run_misc.at-10753-reference_tmpl:142.6-142.7: 139 ********************** 140 01 X 000005441 141 01 TSPFL-RECORD. @@ -3964,7 +4022,7 @@ run_misc.at-10739-reference_tmpl:142.6-142.7: 144 10 CM-DISK '8417' >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:143.6-143.7: +run_misc.at-10753-reference_tmpl:143.6-143.7: 140 01 X 000005441 141 01 TSPFL-RECORD. 142 10 CM-CUST-NUM 'ALP00000' @@ -3974,7 +4032,7 @@ run_misc.at-10739-reference_tmpl:143.6-143.7: 145 10 CM-NO-TERMINALS 0010 >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:144.6-144.7: +run_misc.at-10753-reference_tmpl:144.6-144.7: 141 01 TSPFL-RECORD. 142 10 CM-CUST-NUM 'ALP00000' 143 10 CM-COMPANY 'ALPHA ELECTRICAL CO. LTD.' @@ -3984,7 +4042,7 @@ run_misc.at-10739-reference_tmpl:144.6-144.7: 146 77 DYNAMIC-NUM 0124 >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:145.6-145.7: +run_misc.at-10753-reference_tmpl:145.6-145.7: 142 10 CM-CUST-NUM 'ALP00000' 143 10 CM-COMPANY 'ALPHA ELECTRICAL CO. LTD.' 144 10 CM-DISK '8417' @@ -3994,7 +4052,7 @@ run_misc.at-10739-reference_tmpl:145.6-145.7: 147 >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:151.6-151.7: +run_misc.at-10753-reference_tmpl:151.6-151.7: 148 END OF DUMP - sub2 149 ********************** 150 @@ -4004,7 +4062,7 @@ run_misc.at-10739-reference_tmpl:151.6-151.7: 153 FD FLATFILE >> Error: Unexpected indicator: `r' -run_misc.at-10739-reference_tmpl:153.6-153.7: +run_misc.at-10753-reference_tmpl:153.6-153.7: 150 151 Dump Program-Id prog from prog.cob compiled MMM DD YYYY HH:MM:SS 152 @@ -4014,7 +4072,7 @@ run_misc.at-10739-reference_tmpl:153.6-153.7: 155 File is OPEN >> Error: Unexpected indicator: `T' -run_misc.at-10739-reference_tmpl:155.6-155.7: +run_misc.at-10753-reference_tmpl:155.6-155.7: 152 153 FD FLATFILE 154 ********************** @@ -4024,7 +4082,7 @@ run_misc.at-10739-reference_tmpl:155.6-155.7: 157 01 TSPFL-RECORD. >> Error: Unexpected indicator: `e' -run_misc.at-10739-reference_tmpl:156.6-156.7: +run_misc.at-10753-reference_tmpl:156.6-156.7: 153 FD FLATFILE 154 ********************** 155 File is OPEN @@ -4034,7 +4092,7 @@ run_misc.at-10739-reference_tmpl:156.6-156.7: 158 10 CM-CUST-NUM 'ALP00000' >> Error: Unexpected indicator: `E' -run_misc.at-10739-reference_tmpl:158.6-158.7: +run_misc.at-10753-reference_tmpl:158.6-158.7: 155 File is OPEN 156 FILE STATUS '00' 157 01 TSPFL-RECORD. @@ -4044,7 +4102,7 @@ run_misc.at-10739-reference_tmpl:158.6-158.7: 160 10 CM-DISK '8417' >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:159.6-159.7: +run_misc.at-10753-reference_tmpl:159.6-159.7: 156 FILE STATUS '00' 157 01 TSPFL-RECORD. 158 10 CM-CUST-NUM 'ALP00000' @@ -4054,7 +4112,7 @@ run_misc.at-10739-reference_tmpl:159.6-159.7: 161 10 CM-NO-TERMINALS 0010 >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:160.6-160.7: +run_misc.at-10753-reference_tmpl:160.6-160.7: 157 01 TSPFL-RECORD. 158 10 CM-CUST-NUM 'ALP00000' 159 10 CM-COMPANY 'ALPHA ELECTRICAL CO. LTD.' @@ -4064,7 +4122,7 @@ run_misc.at-10739-reference_tmpl:160.6-160.7: 162 >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:161.6-161.7: +run_misc.at-10753-reference_tmpl:161.6-161.7: 158 10 CM-CUST-NUM 'ALP00000' 159 10 CM-COMPANY 'ALPHA ELECTRICAL CO. LTD.' 160 10 CM-DISK '8417' @@ -4074,7 +4132,7 @@ run_misc.at-10739-reference_tmpl:161.6-161.7: 163 WORKING-STORAGE >> Error: Unexpected indicator: `0' -run_misc.at-10739-reference_tmpl:163.6-163.7: +run_misc.at-10753-reference_tmpl:163.6-163.7: 160 10 CM-DISK '8417' 161 10 CM-NO-TERMINALS 0010 162 @@ -4084,8 +4142,8 @@ run_misc.at-10739-reference_tmpl:163.6-163.7: 165 77 RETURN-CODE +000000000 >> Error: Unexpected indicator: `G' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10503:0 -run_misc.at-10503-sub2.cob:84.11-84.24: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:10517:0 +run_misc.at-10517-sub2.cob:84.11-84.24: 81 MOVE 'A' TO TSTHEX2 (54:1). 82 MOVE LOW-VALUES TO TSTTAILX. 83 * @@ -4096,8 +4154,8 @@ run_misc.at-10503-sub2.cob:84.11-84.24: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11129:0 -run_misc.at-11129-prog.cob:69.35: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11143:0 +run_misc.at-11143-prog.cob:69.35: 66 03 prefix. 67 05 n PIC 9(03) VALUE 123. 68 03 table-data value all "ABCDE". @@ -4107,7 +4165,7 @@ run_misc.at-11129-prog.cob:69.35: 71 05 col1 PIC X. >> Hint: Missing -run_misc.at-11129-prog.cob:69.36-69.45: +run_misc.at-11143-prog.cob:69.36-69.45: 66 03 prefix. 67 05 n PIC 9(03) VALUE 123. 68 03 table-data value all "ABCDE". @@ -4117,20 +4175,20 @@ run_misc.at-11129-prog.cob:69.36-69.45: 71 05 col1 PIC X. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11365:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11339:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11409:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11445:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11467:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11532:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11595:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11647:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11696:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11695:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11745:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11747:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11928:0 -run_misc.at-11928-cmod.c:6.7-6.11: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11380:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11354:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11424:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11460:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11482:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11547:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11610:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11662:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11711:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11710:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11760:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11762:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11944:0 +run_misc.at-11944-cmod.c:6.7-6.11: 3 #include 4 #include 5 @@ -4140,7 +4198,7 @@ run_misc.at-11928-cmod.c:6.7-6.11: 8 { >> Error: Invalid syntax -run_misc.at-11928-cmod.c:7.6-7.7: +run_misc.at-11944-cmod.c:7.6-7.7: 4 #include 5 6 static char * @@ -4150,7 +4208,7 @@ run_misc.at-11928-cmod.c:7.6-7.7: 9 static char wrk[24]; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:9.6-9.7: +run_misc.at-11944-cmod.c:9.6-9.7: 6 static char * 7 getType (int type, int byvalue) 8 { @@ -4160,7 +4218,7 @@ run_misc.at-11928-cmod.c:9.6-9.7: 11 #if 1 >> Error: Unexpected indicator: `t' -run_misc.at-11928-cmod.c:10.6-10.7: +run_misc.at-11944-cmod.c:10.6-10.7: 7 getType (int type, int byvalue) 8 { 9 static char wrk[24]; @@ -4170,7 +4228,7 @@ run_misc.at-11928-cmod.c:10.6-10.7: 12 case COB_TYPE_GROUP: return "Group"; >> Error: Unexpected indicator: `t' -run_misc.at-11928-cmod.c:12.6-12.7: +run_misc.at-11944-cmod.c:12.6-12.7: 9 static char wrk[24]; 10 switch (type) { 11 #if 1 @@ -4180,7 +4238,7 @@ run_misc.at-11928-cmod.c:12.6-12.7: 14 /* fall through as the test will have different results >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:13.6-13.7: +run_misc.at-11944-cmod.c:13.6-13.7: 10 switch (type) { 11 #if 1 12 case COB_TYPE_GROUP: return "Group"; @@ -4190,7 +4248,7 @@ run_misc.at-11928-cmod.c:13.6-13.7: 15 on big endian systems otherwise >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:18.6-18.7: +run_misc.at-11944-cmod.c:18.6-18.7: 15 on big endian systems otherwise 16 return "COMP-5"; */ 17 COB_UNUSED (byvalue); @@ -4200,7 +4258,7 @@ run_misc.at-11928-cmod.c:18.6-18.7: 20 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:19.6-19.7: +run_misc.at-11944-cmod.c:19.6-19.7: 16 return "COMP-5"; */ 17 COB_UNUSED (byvalue); 18 case COB_TYPE_NUMERIC_BINARY: return "BINARY"; @@ -4210,7 +4268,7 @@ run_misc.at-11928-cmod.c:19.6-19.7: 21 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:20.6-20.7: +run_misc.at-11944-cmod.c:20.6-20.7: 17 COB_UNUSED (byvalue); 18 case COB_TYPE_NUMERIC_BINARY: return "BINARY"; 19 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; @@ -4220,7 +4278,7 @@ run_misc.at-11928-cmod.c:20.6-20.7: 22 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:21.6-21.7: +run_misc.at-11944-cmod.c:21.6-21.7: 18 case COB_TYPE_NUMERIC_BINARY: return "BINARY"; 19 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; 20 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; @@ -4230,7 +4288,7 @@ run_misc.at-11928-cmod.c:21.6-21.7: 23 case COB_TYPE_ALPHANUMERIC: return "X"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:22.6-22.7: +run_misc.at-11944-cmod.c:22.6-22.7: 19 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; 20 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; 21 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; @@ -4240,7 +4298,7 @@ run_misc.at-11928-cmod.c:22.6-22.7: 24 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:23.6-23.7: +run_misc.at-11944-cmod.c:23.6-23.7: 20 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; 21 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; 22 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; @@ -4250,7 +4308,7 @@ run_misc.at-11928-cmod.c:23.6-23.7: 25 case COB_TYPE_NATIONAL: return "N"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:24.6-24.7: +run_misc.at-11944-cmod.c:24.6-24.7: 21 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; 22 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; 23 case COB_TYPE_ALPHANUMERIC: return "X"; @@ -4260,7 +4318,7 @@ run_misc.at-11928-cmod.c:24.6-24.7: 26 #else >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:25.6-25.7: +run_misc.at-11944-cmod.c:25.6-25.7: 22 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; 23 case COB_TYPE_ALPHANUMERIC: return "X"; 24 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; @@ -4270,7 +4328,7 @@ run_misc.at-11928-cmod.c:25.6-25.7: 27 case COB_TYPE_GROUP: return "Group"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:27.6-27.7: +run_misc.at-11944-cmod.c:27.6-27.7: 24 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; 25 case COB_TYPE_NATIONAL: return "N"; 26 #else @@ -4280,7 +4338,7 @@ run_misc.at-11928-cmod.c:27.6-27.7: 29 return byvalue == 2 ? "COMP-4" : "COMP-5"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:28.6-28.7: +run_misc.at-11944-cmod.c:28.6-28.7: 25 case COB_TYPE_NATIONAL: return "N"; 26 #else 27 case COB_TYPE_GROUP: return "Group"; @@ -4290,7 +4348,7 @@ run_misc.at-11928-cmod.c:28.6-28.7: 30 case COB_TYPE_NUMERIC_BINARY: return "COMP-4"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:30.6-30.7: +run_misc.at-11944-cmod.c:30.6-30.7: 27 case COB_TYPE_GROUP: return "Group"; 28 case COB_TYPE_NUMERIC_COMP5: 29 return byvalue == 2 ? "COMP-4" : "COMP-5"; @@ -4300,7 +4358,7 @@ run_misc.at-11928-cmod.c:30.6-30.7: 32 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:31.6-31.7: +run_misc.at-11944-cmod.c:31.6-31.7: 28 case COB_TYPE_NUMERIC_COMP5: 29 return byvalue == 2 ? "COMP-4" : "COMP-5"; 30 case COB_TYPE_NUMERIC_BINARY: return "COMP-4"; @@ -4310,7 +4368,7 @@ run_misc.at-11928-cmod.c:31.6-31.7: 33 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:32.6-32.7: +run_misc.at-11944-cmod.c:32.6-32.7: 29 return byvalue == 2 ? "COMP-4" : "COMP-5"; 30 case COB_TYPE_NUMERIC_BINARY: return "COMP-4"; 31 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; @@ -4320,7 +4378,7 @@ run_misc.at-11928-cmod.c:32.6-32.7: 34 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:33.6-33.7: +run_misc.at-11944-cmod.c:33.6-33.7: 30 case COB_TYPE_NUMERIC_BINARY: return "COMP-4"; 31 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; 32 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; @@ -4330,7 +4388,7 @@ run_misc.at-11928-cmod.c:33.6-33.7: 35 case COB_TYPE_ALPHANUMERIC: return "X"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:34.6-34.7: +run_misc.at-11944-cmod.c:34.6-34.7: 31 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; 32 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; 33 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; @@ -4340,7 +4398,7 @@ run_misc.at-11928-cmod.c:34.6-34.7: 36 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:35.6-35.7: +run_misc.at-11944-cmod.c:35.6-35.7: 32 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; 33 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; 34 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; @@ -4350,7 +4408,7 @@ run_misc.at-11928-cmod.c:35.6-35.7: 37 case COB_TYPE_NATIONAL: return "N"; >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:36.6-36.7: +run_misc.at-11944-cmod.c:36.6-36.7: 33 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; 34 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; 35 case COB_TYPE_ALPHANUMERIC: return "X"; @@ -4360,7 +4418,7 @@ run_misc.at-11928-cmod.c:36.6-36.7: 38 #endif >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:37.6-37.7: +run_misc.at-11944-cmod.c:37.6-37.7: 34 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; 35 case COB_TYPE_ALPHANUMERIC: return "X"; 36 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; @@ -4370,7 +4428,7 @@ run_misc.at-11928-cmod.c:37.6-37.7: 39 } >> Error: Unexpected indicator: `e' -run_misc.at-11928-cmod.c:40.6-40.7: +run_misc.at-11944-cmod.c:40.6-40.7: 37 case COB_TYPE_NATIONAL: return "N"; 38 #endif 39 } @@ -4380,7 +4438,7 @@ run_misc.at-11928-cmod.c:40.6-40.7: 42 } >> Error: Unexpected indicator: `i' -run_misc.at-11928-cmod.c:41.6-41.7: +run_misc.at-11944-cmod.c:41.6-41.7: 38 #endif 39 } 40 sprintf (wrk,"Type %04X",type); @@ -4390,7 +4448,7 @@ run_misc.at-11928-cmod.c:41.6-41.7: 43 >> Error: Unexpected indicator: `u' -run_misc.at-11928-cmod.c:44.6-44.7: +run_misc.at-11944-cmod.c:44.6-44.7: 41 return wrk; 42 } 43 @@ -4400,7 +4458,7 @@ run_misc.at-11928-cmod.c:44.6-44.7: 46 { >> Error: Unexpected indicator: `T' -run_misc.at-11928-cmod.c:45.6-45.7: +run_misc.at-11944-cmod.c:45.6-45.7: 42 } 43 44 COB_EXT_EXPORT int @@ -4410,7 +4468,7 @@ run_misc.at-11928-cmod.c:45.6-45.7: 47 int k,nargs,type,digits,scale,size,sign,byvalue; >> Error: Unexpected indicator: `v' -run_misc.at-11928-cmod.c:48.6-48.7: +run_misc.at-11944-cmod.c:48.6-48.7: 45 CAPI (void *p1, ...) 46 { 47 int k,nargs,type,digits,scale,size,sign,byvalue; @@ -4420,7 +4478,7 @@ run_misc.at-11928-cmod.c:48.6-48.7: 50 char wrk[80],pic[30]; /* note: maximum _theoretical_ size */ >> Error: Unexpected indicator: `_' -run_misc.at-11928-cmod.c:49.6-49.7: +run_misc.at-11944-cmod.c:49.6-49.7: 46 { 47 int k,nargs,type,digits,scale,size,sign,byvalue; 48 cob_s64_t val = 0; @@ -4430,7 +4488,7 @@ run_misc.at-11928-cmod.c:49.6-49.7: 51 >> Error: Unexpected indicator: `r' -run_misc.at-11928-cmod.c:50.6-50.7: +run_misc.at-11944-cmod.c:50.6-50.7: 47 int k,nargs,type,digits,scale,size,sign,byvalue; 48 cob_s64_t val = 0; 49 char *str; @@ -4440,127 +4498,137 @@ run_misc.at-11928-cmod.c:50.6-50.7: 52 nargs = cob_get_num_params(); >> Error: Unexpected indicator: `r' -run_misc.at-11928-cmod.c:52.6-52.7: +run_misc.at-11944-cmod.c:52.6-52.7: 49 char *str; 50 char wrk[80],pic[30]; /* note: maximum _theoretical_ size */ 51 52 > nargs = cob_get_num_params(); ---- ^ 53 printf ("CAPI called with %d parameters\n",nargs); - 54 for (k=1; k <= nargs; k++) { + 54 fflush(stdout); >> Error: Unexpected indicator: `g' -run_misc.at-11928-cmod.c:53.6-53.7: +run_misc.at-11944-cmod.c:53.6-53.7: 50 char wrk[80],pic[30]; /* note: maximum _theoretical_ size */ 51 52 nargs = cob_get_num_params(); 53 > printf ("CAPI called with %d parameters\n",nargs); ---- ^ - 54 for (k=1; k <= nargs; k++) { - 55 type = cob_get_param_type (k); + 54 fflush(stdout); + 55 for (k=1; k <= nargs; k++) { >> Error: Unexpected indicator: `n' -run_misc.at-11928-cmod.c:55.6-55.7: +run_misc.at-11944-cmod.c:54.6-54.7: + 51 52 nargs = cob_get_num_params(); 53 printf ("CAPI called with %d parameters\n",nargs); - 54 for (k=1; k <= nargs; k++) { - 55 > type = cob_get_param_type (k); + 54 > fflush(stdout); ---- ^ - 56 digits = cob_get_param_digits (k); - 57 scale = cob_get_param_scale (k); + 55 for (k=1; k <= nargs; k++) { + 56 type = cob_get_param_type (k); +>> Error: Unexpected indicator: `u' + +run_misc.at-11944-cmod.c:56.6-56.7: + 53 printf ("CAPI called with %d parameters\n",nargs); + 54 fflush(stdout); + 55 for (k=1; k <= nargs; k++) { + 56 > type = cob_get_param_type (k); +---- ^ + 57 digits = cob_get_param_digits (k); + 58 scale = cob_get_param_scale (k); >> Error: Unexpected indicator: `t' -run_misc.at-11928-cmod.c:57.6-57.7: - 54 for (k=1; k <= nargs; k++) { - 55 type = cob_get_param_type (k); - 56 digits = cob_get_param_digits (k); - 57 > scale = cob_get_param_scale (k); +run_misc.at-11944-cmod.c:58.6-58.7: + 55 for (k=1; k <= nargs; k++) { + 56 type = cob_get_param_type (k); + 57 digits = cob_get_param_digits (k); + 58 > scale = cob_get_param_scale (k); ---- ^ - 58 size = cob_get_param_size (k); - 59 sign = cob_get_param_sign (k); + 59 size = cob_get_param_size (k); + 60 sign = cob_get_param_sign (k); >> Error: Unexpected indicator: `s' -run_misc.at-11928-cmod.c:58.6-58.7: - 55 type = cob_get_param_type (k); - 56 digits = cob_get_param_digits (k); - 57 scale = cob_get_param_scale (k); - 58 > size = cob_get_param_size (k); +run_misc.at-11944-cmod.c:59.6-59.7: + 56 type = cob_get_param_type (k); + 57 digits = cob_get_param_digits (k); + 58 scale = cob_get_param_scale (k); + 59 > size = cob_get_param_size (k); ---- ^ - 59 sign = cob_get_param_sign (k); - 60 byvalue = cob_get_param_constant(k); + 60 sign = cob_get_param_sign (k); + 61 byvalue = cob_get_param_constant(k); >> Error: Unexpected indicator: `s' -run_misc.at-11928-cmod.c:59.6-59.7: - 56 digits = cob_get_param_digits (k); - 57 scale = cob_get_param_scale (k); - 58 size = cob_get_param_size (k); - 59 > sign = cob_get_param_sign (k); +run_misc.at-11944-cmod.c:60.6-60.7: + 57 digits = cob_get_param_digits (k); + 58 scale = cob_get_param_scale (k); + 59 size = cob_get_param_size (k); + 60 > sign = cob_get_param_sign (k); ---- ^ - 60 byvalue = cob_get_param_constant(k); - 61 printf (" %d: %-8s ", k, getType (type, byvalue)); + 61 byvalue = cob_get_param_constant(k); + 62 printf (" %d: %-8s ", k, getType (type, byvalue)); >> Error: Unexpected indicator: `s' -run_misc.at-11928-cmod.c:60.6-60.7: - 57 scale = cob_get_param_scale (k); - 58 size = cob_get_param_size (k); - 59 sign = cob_get_param_sign (k); - 60 > byvalue = cob_get_param_constant(k); +run_misc.at-11944-cmod.c:61.6-61.7: + 58 scale = cob_get_param_scale (k); + 59 size = cob_get_param_size (k); + 60 sign = cob_get_param_sign (k); + 61 > byvalue = cob_get_param_constant(k); ---- ^ - 61 printf (" %d: %-8s ", k, getType (type, byvalue)); - 62 if (byvalue) { + 62 printf (" %d: %-8s ", k, getType (type, byvalue)); + 63 if (byvalue) { >> Error: Unexpected indicator: `b' -run_misc.at-11928-cmod.c:61.6-61.7: - 58 size = cob_get_param_size (k); - 59 sign = cob_get_param_sign (k); - 60 byvalue = cob_get_param_constant(k); - 61 > printf (" %d: %-8s ", k, getType (type, byvalue)); +run_misc.at-11944-cmod.c:62.6-62.7: + 59 size = cob_get_param_size (k); + 60 sign = cob_get_param_sign (k); + 61 byvalue = cob_get_param_constant(k); + 62 > printf (" %d: %-8s ", k, getType (type, byvalue)); ---- ^ - 62 if (byvalue) { - 63 printf ("BY VALUE "); + 63 if (byvalue) { + 64 printf ("BY VALUE "); >> Error: Unexpected indicator: `p' -run_misc.at-11928-cmod.c:62.6-62.7: - 59 sign = cob_get_param_sign (k); - 60 byvalue = cob_get_param_constant(k); - 61 printf (" %d: %-8s ", k, getType (type, byvalue)); - 62 > if (byvalue) { +run_misc.at-11944-cmod.c:63.6-63.7: + 60 sign = cob_get_param_sign (k); + 61 byvalue = cob_get_param_constant(k); + 62 printf (" %d: %-8s ", k, getType (type, byvalue)); + 63 > if (byvalue) { ---- ^ - 63 printf ("BY VALUE "); - 64 } else { + 64 printf ("BY VALUE "); + 65 } else { >> Error: Unexpected indicator: `i' -run_misc.at-11928-cmod.c:64.6-64.7: - 61 printf (" %d: %-8s ", k, getType (type, byvalue)); - 62 if (byvalue) { - 63 printf ("BY VALUE "); - 64 > } else { +run_misc.at-11944-cmod.c:65.6-65.7: + 62 printf (" %d: %-8s ", k, getType (type, byvalue)); + 63 if (byvalue) { + 64 printf ("BY VALUE "); + 65 > } else { ---- ^ - 65 printf ("BY REFERENCE "); - 66 } + 66 printf ("BY REFERENCE "); + 67 } >> Error: Unexpected indicator: `}' -run_misc.at-11928-cmod.c:66.6-66.7: - 63 printf ("BY VALUE "); - 64 } else { - 65 printf ("BY REFERENCE "); - 66 > } +run_misc.at-11944-cmod.c:67.6-67.7: + 64 printf ("BY VALUE "); + 65 } else { + 66 printf ("BY REFERENCE "); + 67 > } ---- ^ - 67 if (type == COB_TYPE_ALPHANUMERIC) { - 68 sprintf (pic, "X(%d)", size); + 68 if (type == COB_TYPE_ALPHANUMERIC) { + 69 sprintf (pic, "X(%d)", size); >> Error: Unexpected indicator: `}' -run_misc.at-11928-cmod.c:67.6-67.7: - 64 } else { - 65 printf ("BY REFERENCE "); - 66 } - 67 > if (type == COB_TYPE_ALPHANUMERIC) { +run_misc.at-11944-cmod.c:68.6-68.7: + 65 } else { + 66 printf ("BY REFERENCE "); + 67 } + 68 > if (type == COB_TYPE_ALPHANUMERIC) { ---- ^ - 68 sprintf (pic, "X(%d)", size); - 69 str = cob_get_picx_param (k, NULL, 0); + 69 sprintf (pic, "X(%d)", size); + 70 str = cob_get_picx_param (k, NULL, 0); >> Error: Unexpected indicator: `i' -run_misc.at-11928-cmod.c:29.23-67.17: +run_misc.at-11944-cmod.c:29.23-68.17: 26 #else 27 case COB_TYPE_GROUP: return "Group"; 28 case COB_TYPE_NUMERIC_COMP5: @@ -4614,224 +4682,226 @@ run_misc.at-11928-cmod.c:29.23-67.17: ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 53 > printf ("CAPI called with %d parameters\n",nargs); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 54 > for (k=1; k <= nargs; k++) { + 54 > fflush(stdout); +---- ^^^^^^^^^^^^^^^^^^^ + 55 > for (k=1; k <= nargs; k++) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 55 > type = cob_get_param_type (k); + 56 > type = cob_get_param_type (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 56 > digits = cob_get_param_digits (k); + 57 > digits = cob_get_param_digits (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 57 > scale = cob_get_param_scale (k); + 58 > scale = cob_get_param_scale (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 58 > size = cob_get_param_size (k); + 59 > size = cob_get_param_size (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 59 > sign = cob_get_param_sign (k); + 60 > sign = cob_get_param_sign (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 60 > byvalue = cob_get_param_constant(k); + 61 > byvalue = cob_get_param_constant(k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 61 > printf (" %d: %-8s ", k, getType (type, byvalue)); + 62 > printf (" %d: %-8s ", k, getType (type, byvalue)); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 62 > if (byvalue) { + 63 > if (byvalue) { ---- ^^^^^^^^^^^^^^^^^^^^^ - 63 > printf ("BY VALUE "); + 64 > printf ("BY VALUE "); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 64 > } else { + 65 > } else { ---- ^^^^^^^^^^^^^^^ - 65 > printf ("BY REFERENCE "); + 66 > printf ("BY REFERENCE "); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 66 > } + 67 > } ---- ^^^^^^^^ - 67 > if (type == COB_TYPE_ALPHANUMERIC) { + 68 > if (type == COB_TYPE_ALPHANUMERIC) { ---- ^^^^^^^^^^^^^^^^^^ - 68 sprintf (pic, "X(%d)", size); - 69 str = cob_get_picx_param (k, NULL, 0); + 69 sprintf (pic, "X(%d)", size); + 70 str = cob_get_picx_param (k, NULL, 0); >> Error: Unexpected pseudotext -run_misc.at-11928-cmod.c:73.6-73.7: - 70 printf ("%-11s '%s'", pic, str); - 71 cob_free ((void*)str); - 72 cob_put_picx_param (k, "Bye!"); - 73 > } else if (type == COB_TYPE_NATIONAL) { +run_misc.at-11944-cmod.c:74.6-74.7: + 71 printf ("%-11s '%s'", pic, str); + 72 cob_free ((void*)str); + 73 cob_put_picx_param (k, "Bye!"); + 74 > } else if (type == COB_TYPE_NATIONAL) { ---- ^ - 74 sprintf (pic, "N(%d)", size); /* FIXME */ - 75 printf ("exchange of national data is not supported yet"); + 75 sprintf (pic, "N(%d)", size); /* FIXME */ + 76 printf ("exchange of national data is not supported yet"); >> Error: Unexpected indicator: `}' -run_misc.at-11928-cmod.c:76.6-76.7: - 73 } else if (type == COB_TYPE_NATIONAL) { - 74 sprintf (pic, "N(%d)", size); /* FIXME */ - 75 printf ("exchange of national data is not supported yet"); - 76 > } else if (type == COB_TYPE_GROUP) { +run_misc.at-11944-cmod.c:77.6-77.7: + 74 } else if (type == COB_TYPE_NATIONAL) { + 75 sprintf (pic, "N(%d)", size); /* FIXME */ + 76 printf ("exchange of national data is not supported yet"); + 77 > } else if (type == COB_TYPE_GROUP) { ---- ^ - 77 sprintf (pic, "(%d)", size); - 78 str = cob_get_grp_param (k, NULL, 0); + 78 sprintf (pic, "(%d)", size); + 79 str = cob_get_grp_param (k, NULL, 0); >> Error: Unexpected indicator: `}' -run_misc.at-11928-cmod.c:73.22-76.24: - 70 printf ("%-11s '%s'", pic, str); - 71 cob_free ((void*)str); - 72 cob_put_picx_param (k, "Bye!"); - 73 > } else if (type == COB_TYPE_NATIONAL) { +run_misc.at-11944-cmod.c:74.22-77.24: + 71 printf ("%-11s '%s'", pic, str); + 72 cob_free ((void*)str); + 73 cob_put_picx_param (k, "Bye!"); + 74 > } else if (type == COB_TYPE_NATIONAL) { ---- ^^^^^^^^^^^^^^^^^^^^^^^ - 74 > sprintf (pic, "N(%d)", size); /* FIXME */ + 75 > sprintf (pic, "N(%d)", size); /* FIXME */ ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 75 > printf ("exchange of national data is not supported yet"); + 76 > printf ("exchange of national data is not supported yet"); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 76 > } else if (type == COB_TYPE_GROUP) { + 77 > } else if (type == COB_TYPE_GROUP) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^ - 77 sprintf (pic, "(%d)", size); - 78 str = cob_get_grp_param (k, NULL, 0); + 78 sprintf (pic, "(%d)", size); + 79 str = cob_get_grp_param (k, NULL, 0); >> Error: Unexpected pseudotext -run_misc.at-11928-cmod.c:84.6-84.7: - 81 memset (wrk,' ',sizeof(wrk)); - 82 memcpy (wrk,"Bye-Bye Birdie!",15); - 83 cob_put_grp_param (k, wrk, sizeof(wrk)); - 84 > } else if (type == COB_TYPE_NUMERIC_EDITED) { +run_misc.at-11944-cmod.c:85.6-85.7: + 82 memset (wrk,' ',sizeof(wrk)); + 83 memcpy (wrk,"Bye-Bye Birdie!",15); + 84 cob_put_grp_param (k, wrk, sizeof(wrk)); + 85 > } else if (type == COB_TYPE_NUMERIC_EDITED) { ---- ^ - 85 if (scale > 0) { - 86 sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); + 86 if (scale > 0) { + 87 sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); >> Error: Unexpected indicator: `}' -run_misc.at-11928-cmod.c:97.6-97.7: - 94 cob_put_s64_param (k, val); - 95 cob_get_grp_param (k, wrk, sizeof(wrk)); - 96 printf (" to %.*s",size,wrk); - 97 > } else { +run_misc.at-11944-cmod.c:98.6-98.7: + 95 cob_put_s64_param (k, val); + 96 cob_get_grp_param (k, wrk, sizeof(wrk)); + 97 printf (" to %.*s",size,wrk); + 98 > } else { ---- ^ - 98 if(scale > 0) { - 99 sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); + 99 if(scale > 0) { + 100 sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); >> Error: Unexpected indicator: `}' -run_misc.at-11928-cmod.c:106.6-106.7: - 103 val = cob_get_s64_param (k); - 104 printf ("%-11s %lld", pic, val); - 105 cob_put_s64_param (k, val + 3); - 106 > } +run_misc.at-11944-cmod.c:107.6-107.7: + 104 val = cob_get_s64_param (k); + 105 printf ("%-11s %lld", pic, val); + 106 cob_put_s64_param (k, val + 3); + 107 > } ---- ^ - 107 printf (";\n"); - 108 fflush (stdout); + 108 printf (";\n"); + 109 fflush (stdout); >> Error: Unexpected indicator: `}' -run_misc.at-11928-cmod.c:107.6-107.7: - 104 printf ("%-11s %lld", pic, val); - 105 cob_put_s64_param (k, val + 3); - 106 } - 107 > printf (";\n"); +run_misc.at-11944-cmod.c:108.6-108.7: + 105 printf ("%-11s %lld", pic, val); + 106 cob_put_s64_param (k, val + 3); + 107 } + 108 > printf (";\n"); ---- ^ - 108 fflush (stdout); - 109 } + 109 fflush (stdout); + 110 } >> Error: Unexpected indicator: `p' -run_misc.at-11928-cmod.c:108.6-108.7: - 105 cob_put_s64_param (k, val + 3); - 106 } - 107 printf (";\n"); - 108 > fflush (stdout); +run_misc.at-11944-cmod.c:109.6-109.7: + 106 cob_put_s64_param (k, val + 3); + 107 } + 108 printf (";\n"); + 109 > fflush (stdout); ---- ^ - 109 } - 110 if (nargs > 2) { + 110 } + 111 if (nargs > 2) { >> Error: Unexpected indicator: `f' -run_misc.at-11928-cmod.c:110.6-110.7: - 107 printf (";\n"); - 108 fflush (stdout); - 109 } - 110 > if (nargs > 2) { +run_misc.at-11944-cmod.c:111.6-111.7: + 108 printf (";\n"); + 109 fflush (stdout); + 110 } + 111 > if (nargs > 2) { ---- ^ - 111 cob_put_s64_param (7, val + 3); - 112 } + 112 cob_put_s64_param (7, val + 3); + 113 } >> Error: Unexpected indicator: `(' -run_misc.at-11928-cmod.c:111.6-111.7: - 108 fflush (stdout); - 109 } - 110 if (nargs > 2) { - 111 > cob_put_s64_param (7, val + 3); +run_misc.at-11944-cmod.c:112.6-112.7: + 109 fflush (stdout); + 110 } + 111 if (nargs > 2) { + 112 > cob_put_s64_param (7, val + 3); ---- ^ - 112 } - 113 return 0; + 113 } + 114 return 0; >> Error: Unexpected indicator: `c' -run_misc.at-11928-cmod.c:113.6-113.7: - 110 if (nargs > 2) { - 111 cob_put_s64_param (7, val + 3); - 112 } - 113 > return 0; +run_misc.at-11944-cmod.c:114.6-114.7: + 111 if (nargs > 2) { + 112 cob_put_s64_param (7, val + 3); + 113 } + 114 > return 0; ---- ^ - 114 } + 115 } >> Error: Unexpected indicator: `u' -run_misc.at-11928-cmod.c:84.22-115.0: - 81 memset (wrk,' ',sizeof(wrk)); - 82 memcpy (wrk,"Bye-Bye Birdie!",15); - 83 cob_put_grp_param (k, wrk, sizeof(wrk)); - 84 > } else if (type == COB_TYPE_NUMERIC_EDITED) { +run_misc.at-11944-cmod.c:85.22-116.0: + 82 memset (wrk,' ',sizeof(wrk)); + 83 memcpy (wrk,"Bye-Bye Birdie!",15); + 84 cob_put_grp_param (k, wrk, sizeof(wrk)); + 85 > } else if (type == COB_TYPE_NUMERIC_EDITED) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 85 > if (scale > 0) { + 86 > if (scale > 0) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^ - 86 > sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); + 87 > sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 87 > } else { + 88 > } else { ---- ^^^^^^^^^^^^^^^^^^ - 88 > sprintf (pic,"%s9(%d)",sign?"S":"",digits-scale); + 89 > sprintf (pic,"%s9(%d)",sign?"S":"",digits-scale); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 89 > } + 90 > } ---- ^^^^^^^^^^^ - 90 > val = cob_get_s64_param (k); + 91 > val = cob_get_s64_param (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 91 > printf ("%-11s %lld ",pic,val); + 92 > printf ("%-11s %lld ",pic,val); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 92 > val = val + 130; + 93 > val = val + 130; ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^ - 93 > val = -val; + 94 > val = -val; ---- ^^^^^^^^^^^^^^^^^^^^^ - 94 > cob_put_s64_param (k, val); + 95 > cob_put_s64_param (k, val); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 95 > cob_get_grp_param (k, wrk, sizeof(wrk)); + 96 > cob_get_grp_param (k, wrk, sizeof(wrk)); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 96 > printf (" to %.*s",size,wrk); + 97 > printf (" to %.*s",size,wrk); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 97 > } else { + 98 > } else { ---- ^^^^^^^^^^^^^^^ - 98 > if(scale > 0) { + 99 > if(scale > 0) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^ - 99 > sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); + 100 > sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 100 > } else { + 101 > } else { ---- ^^^^^^^^^^^^^^^^^^ - 101 > sprintf (pic,"%s9(%d)",sign?"S":"",digits-scale); + 102 > sprintf (pic,"%s9(%d)",sign?"S":"",digits-scale); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 102 > } + 103 > } ---- ^^^^^^^^^^^ - 103 > val = cob_get_s64_param (k); + 104 > val = cob_get_s64_param (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 104 > printf ("%-11s %lld", pic, val); + 105 > printf ("%-11s %lld", pic, val); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 105 > cob_put_s64_param (k, val + 3); + 106 > cob_put_s64_param (k, val + 3); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 106 > } + 107 > } ---- ^^^^^^^^ - 107 > printf (";\n"); + 108 > printf (";\n"); ---- ^^^^^^^^^^^^^^^^^^^^^^ - 108 > fflush (stdout); + 109 > fflush (stdout); ---- ^^^^^^^^^^^^^^^^^^^^^^^ - 109 > } + 110 > } ---- ^^^^^ - 110 > if (nargs > 2) { + 111 > if (nargs > 2) { ---- ^^^^^^^^^^^^^^^^^^^^ - 111 > cob_put_s64_param (7, val + 3); + 112 > cob_put_s64_param (7, val + 3); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 112 > } + 113 > } ---- ^^^^^ - 113 > return 0; + 114 > return 0; ---- ^^^^^^^^^^^^^ - 114 > } + 115 > } ---- ^^ >> Error: Unterminated pseudotext -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11928:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12158:0 -run_misc.at-12158-cmod.c:6.7-6.11: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:11944:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12175:0 +run_misc.at-12175-cmod.c:6.7-6.11: 3 #include 4 #include 5 @@ -4841,7 +4911,7 @@ run_misc.at-12158-cmod.c:6.7-6.11: 8 { >> Error: Invalid syntax -run_misc.at-12158-cmod.c:7.6-7.7: +run_misc.at-12175-cmod.c:7.6-7.7: 4 #include 5 6 static char * @@ -4851,7 +4921,7 @@ run_misc.at-12158-cmod.c:7.6-7.7: 9 static char wrk[24]; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:9.6-9.7: +run_misc.at-12175-cmod.c:9.6-9.7: 6 static char * 7 getType (int type, int byvalue) 8 { @@ -4861,7 +4931,7 @@ run_misc.at-12158-cmod.c:9.6-9.7: 11 #if 1 >> Error: Unexpected indicator: `t' -run_misc.at-12158-cmod.c:10.6-10.7: +run_misc.at-12175-cmod.c:10.6-10.7: 7 getType (int type, int byvalue) 8 { 9 static char wrk[24]; @@ -4871,7 +4941,7 @@ run_misc.at-12158-cmod.c:10.6-10.7: 12 case COB_TYPE_GROUP: return "Group"; >> Error: Unexpected indicator: `t' -run_misc.at-12158-cmod.c:12.6-12.7: +run_misc.at-12175-cmod.c:12.6-12.7: 9 static char wrk[24]; 10 switch (type) { 11 #if 1 @@ -4881,7 +4951,7 @@ run_misc.at-12158-cmod.c:12.6-12.7: 14 /* fall through as the test will have different results >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:13.6-13.7: +run_misc.at-12175-cmod.c:13.6-13.7: 10 switch (type) { 11 #if 1 12 case COB_TYPE_GROUP: return "Group"; @@ -4891,7 +4961,7 @@ run_misc.at-12158-cmod.c:13.6-13.7: 15 on big endian systems otherwise >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:18.6-18.7: +run_misc.at-12175-cmod.c:18.6-18.7: 15 on big endian systems otherwise 16 return "COMP-5"; */ 17 COB_UNUSED (byvalue); @@ -4901,7 +4971,7 @@ run_misc.at-12158-cmod.c:18.6-18.7: 20 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:19.6-19.7: +run_misc.at-12175-cmod.c:19.6-19.7: 16 return "COMP-5"; */ 17 COB_UNUSED (byvalue); 18 case COB_TYPE_NUMERIC_BINARY: return "BINARY"; @@ -4911,7 +4981,7 @@ run_misc.at-12158-cmod.c:19.6-19.7: 21 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:20.6-20.7: +run_misc.at-12175-cmod.c:20.6-20.7: 17 COB_UNUSED (byvalue); 18 case COB_TYPE_NUMERIC_BINARY: return "BINARY"; 19 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; @@ -4921,7 +4991,7 @@ run_misc.at-12158-cmod.c:20.6-20.7: 22 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:21.6-21.7: +run_misc.at-12175-cmod.c:21.6-21.7: 18 case COB_TYPE_NUMERIC_BINARY: return "BINARY"; 19 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; 20 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; @@ -4931,7 +5001,7 @@ run_misc.at-12158-cmod.c:21.6-21.7: 23 case COB_TYPE_ALPHANUMERIC: return "X"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:22.6-22.7: +run_misc.at-12175-cmod.c:22.6-22.7: 19 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; 20 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; 21 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; @@ -4941,7 +5011,7 @@ run_misc.at-12158-cmod.c:22.6-22.7: 24 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:23.6-23.7: +run_misc.at-12175-cmod.c:23.6-23.7: 20 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; 21 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; 22 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; @@ -4951,7 +5021,7 @@ run_misc.at-12158-cmod.c:23.6-23.7: 25 case COB_TYPE_NATIONAL: return "N"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:24.6-24.7: +run_misc.at-12175-cmod.c:24.6-24.7: 21 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; 22 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; 23 case COB_TYPE_ALPHANUMERIC: return "X"; @@ -4961,7 +5031,7 @@ run_misc.at-12158-cmod.c:24.6-24.7: 26 #else >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:25.6-25.7: +run_misc.at-12175-cmod.c:25.6-25.7: 22 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; 23 case COB_TYPE_ALPHANUMERIC: return "X"; 24 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; @@ -4971,7 +5041,7 @@ run_misc.at-12158-cmod.c:25.6-25.7: 27 case COB_TYPE_GROUP: return "Group"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:27.6-27.7: +run_misc.at-12175-cmod.c:27.6-27.7: 24 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; 25 case COB_TYPE_NATIONAL: return "N"; 26 #else @@ -4981,7 +5051,7 @@ run_misc.at-12158-cmod.c:27.6-27.7: 29 return byvalue == 2 ? "COMP-4" : "COMP-5"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:28.6-28.7: +run_misc.at-12175-cmod.c:28.6-28.7: 25 case COB_TYPE_NATIONAL: return "N"; 26 #else 27 case COB_TYPE_GROUP: return "Group"; @@ -4991,7 +5061,7 @@ run_misc.at-12158-cmod.c:28.6-28.7: 30 case COB_TYPE_NUMERIC_BINARY: return "COMP-4"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:30.6-30.7: +run_misc.at-12175-cmod.c:30.6-30.7: 27 case COB_TYPE_GROUP: return "Group"; 28 case COB_TYPE_NUMERIC_COMP5: 29 return byvalue == 2 ? "COMP-4" : "COMP-5"; @@ -5001,7 +5071,7 @@ run_misc.at-12158-cmod.c:30.6-30.7: 32 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:31.6-31.7: +run_misc.at-12175-cmod.c:31.6-31.7: 28 case COB_TYPE_NUMERIC_COMP5: 29 return byvalue == 2 ? "COMP-4" : "COMP-5"; 30 case COB_TYPE_NUMERIC_BINARY: return "COMP-4"; @@ -5011,7 +5081,7 @@ run_misc.at-12158-cmod.c:31.6-31.7: 33 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:32.6-32.7: +run_misc.at-12175-cmod.c:32.6-32.7: 29 return byvalue == 2 ? "COMP-4" : "COMP-5"; 30 case COB_TYPE_NUMERIC_BINARY: return "COMP-4"; 31 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; @@ -5021,7 +5091,7 @@ run_misc.at-12158-cmod.c:32.6-32.7: 34 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:33.6-33.7: +run_misc.at-12175-cmod.c:33.6-33.7: 30 case COB_TYPE_NUMERIC_BINARY: return "COMP-4"; 31 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; 32 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; @@ -5031,7 +5101,7 @@ run_misc.at-12158-cmod.c:33.6-33.7: 35 case COB_TYPE_ALPHANUMERIC: return "X"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:34.6-34.7: +run_misc.at-12175-cmod.c:34.6-34.7: 31 case COB_TYPE_NUMERIC_PACKED: return "COMP-3"; 32 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; 33 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; @@ -5041,7 +5111,7 @@ run_misc.at-12158-cmod.c:34.6-34.7: 36 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:35.6-35.7: +run_misc.at-12175-cmod.c:35.6-35.7: 32 case COB_TYPE_NUMERIC_FLOAT: return "COMP-1"; 33 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; 34 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; @@ -5051,7 +5121,7 @@ run_misc.at-12158-cmod.c:35.6-35.7: 37 case COB_TYPE_NATIONAL: return "N"; >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:36.6-36.7: +run_misc.at-12175-cmod.c:36.6-36.7: 33 case COB_TYPE_NUMERIC_DOUBLE: return "COMP-2"; 34 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; 35 case COB_TYPE_ALPHANUMERIC: return "X"; @@ -5061,7 +5131,7 @@ run_misc.at-12158-cmod.c:36.6-36.7: 38 #endif >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:37.6-37.7: +run_misc.at-12175-cmod.c:37.6-37.7: 34 case COB_TYPE_NUMERIC_DISPLAY: return "DISPLAY"; 35 case COB_TYPE_ALPHANUMERIC: return "X"; 36 case COB_TYPE_NUMERIC_EDITED: return "EDITED"; @@ -5071,7 +5141,7 @@ run_misc.at-12158-cmod.c:37.6-37.7: 39 } >> Error: Unexpected indicator: `e' -run_misc.at-12158-cmod.c:40.6-40.7: +run_misc.at-12175-cmod.c:40.6-40.7: 37 case COB_TYPE_NATIONAL: return "N"; 38 #endif 39 } @@ -5081,7 +5151,7 @@ run_misc.at-12158-cmod.c:40.6-40.7: 42 } >> Error: Unexpected indicator: `i' -run_misc.at-12158-cmod.c:41.6-41.7: +run_misc.at-12175-cmod.c:41.6-41.7: 38 #endif 39 } 40 sprintf (wrk,"Type %04X",type); @@ -5091,7 +5161,7 @@ run_misc.at-12158-cmod.c:41.6-41.7: 43 >> Error: Unexpected indicator: `u' -run_misc.at-12158-cmod.c:44.6-44.7: +run_misc.at-12175-cmod.c:44.6-44.7: 41 return wrk; 42 } 43 @@ -5101,7 +5171,7 @@ run_misc.at-12158-cmod.c:44.6-44.7: 46 { >> Error: Unexpected indicator: `T' -run_misc.at-12158-cmod.c:45.6-45.7: +run_misc.at-12175-cmod.c:45.6-45.7: 42 } 43 44 COB_EXT_EXPORT int @@ -5111,7 +5181,7 @@ run_misc.at-12158-cmod.c:45.6-45.7: 47 int k,nargs,type,digits,scale,size,sign,byvalue; >> Error: Unexpected indicator: `v' -run_misc.at-12158-cmod.c:48.6-48.7: +run_misc.at-12175-cmod.c:48.6-48.7: 45 CAPI (void *p1, ...) 46 { 47 int k,nargs,type,digits,scale,size,sign,byvalue; @@ -5121,7 +5191,7 @@ run_misc.at-12158-cmod.c:48.6-48.7: 50 char wrk[80],pic[30]; /* note: maximum _theoretical_ size */ >> Error: Unexpected indicator: `_' -run_misc.at-12158-cmod.c:49.6-49.7: +run_misc.at-12175-cmod.c:49.6-49.7: 46 { 47 int k,nargs,type,digits,scale,size,sign,byvalue; 48 cob_s64_t val; @@ -5131,7 +5201,7 @@ run_misc.at-12158-cmod.c:49.6-49.7: 51 >> Error: Unexpected indicator: `r' -run_misc.at-12158-cmod.c:50.6-50.7: +run_misc.at-12175-cmod.c:50.6-50.7: 47 int k,nargs,type,digits,scale,size,sign,byvalue; 48 cob_s64_t val; 49 char *str; @@ -5141,147 +5211,157 @@ run_misc.at-12158-cmod.c:50.6-50.7: 52 nargs = cob_get_num_params(); >> Error: Unexpected indicator: `r' -run_misc.at-12158-cmod.c:52.6-52.7: +run_misc.at-12175-cmod.c:52.6-52.7: 49 char *str; 50 char wrk[80],pic[30]; /* note: maximum _theoretical_ size */ 51 52 > nargs = cob_get_num_params(); ---- ^ 53 printf ("CAPI called with %d parameters\n",nargs); - 54 for (k=1; k <= nargs; k++) { + 54 fflush(stdout); >> Error: Unexpected indicator: `g' -run_misc.at-12158-cmod.c:53.6-53.7: +run_misc.at-12175-cmod.c:53.6-53.7: 50 char wrk[80],pic[30]; /* note: maximum _theoretical_ size */ 51 52 nargs = cob_get_num_params(); 53 > printf ("CAPI called with %d parameters\n",nargs); ---- ^ - 54 for (k=1; k <= nargs; k++) { - 55 cob_field *fld = cob_get_param_field (k, "CAPI"); + 54 fflush(stdout); + 55 for (k=1; k <= nargs; k++) { >> Error: Unexpected indicator: `n' -run_misc.at-12158-cmod.c:55.6-55.7: +run_misc.at-12175-cmod.c:54.6-54.7: + 51 52 nargs = cob_get_num_params(); 53 printf ("CAPI called with %d parameters\n",nargs); - 54 for (k=1; k <= nargs; k++) { - 55 > cob_field *fld = cob_get_param_field (k, "CAPI"); + 54 > fflush(stdout); ---- ^ - 56 type = cob_get_field_type (fld); - 57 digits = cob_get_field_digits (fld); ->> Error: Unexpected indicator: `c' + 55 for (k=1; k <= nargs; k++) { + 56 cob_field *fld = cob_get_param_field (k, "CAPI"); +>> Error: Unexpected indicator: `u' -run_misc.at-12158-cmod.c:56.6-56.7: +run_misc.at-12175-cmod.c:56.6-56.7: 53 printf ("CAPI called with %d parameters\n",nargs); - 54 for (k=1; k <= nargs; k++) { - 55 cob_field *fld = cob_get_param_field (k, "CAPI"); - 56 > type = cob_get_field_type (fld); + 54 fflush(stdout); + 55 for (k=1; k <= nargs; k++) { + 56 > cob_field *fld = cob_get_param_field (k, "CAPI"); ---- ^ - 57 digits = cob_get_field_digits (fld); - 58 scale = cob_get_field_scale (fld); + 57 type = cob_get_field_type (fld); + 58 digits = cob_get_field_digits (fld); +>> Error: Unexpected indicator: `c' + +run_misc.at-12175-cmod.c:57.6-57.7: + 54 fflush(stdout); + 55 for (k=1; k <= nargs; k++) { + 56 cob_field *fld = cob_get_param_field (k, "CAPI"); + 57 > type = cob_get_field_type (fld); +---- ^ + 58 digits = cob_get_field_digits (fld); + 59 scale = cob_get_field_scale (fld); >> Error: Unexpected indicator: `t' -run_misc.at-12158-cmod.c:58.6-58.7: - 55 cob_field *fld = cob_get_param_field (k, "CAPI"); - 56 type = cob_get_field_type (fld); - 57 digits = cob_get_field_digits (fld); - 58 > scale = cob_get_field_scale (fld); +run_misc.at-12175-cmod.c:59.6-59.7: + 56 cob_field *fld = cob_get_param_field (k, "CAPI"); + 57 type = cob_get_field_type (fld); + 58 digits = cob_get_field_digits (fld); + 59 > scale = cob_get_field_scale (fld); ---- ^ - 59 size = cob_get_field_size (fld); - 60 sign = cob_get_field_sign (fld); + 60 size = cob_get_field_size (fld); + 61 sign = cob_get_field_sign (fld); >> Error: Unexpected indicator: `s' -run_misc.at-12158-cmod.c:59.6-59.7: - 56 type = cob_get_field_type (fld); - 57 digits = cob_get_field_digits (fld); - 58 scale = cob_get_field_scale (fld); - 59 > size = cob_get_field_size (fld); +run_misc.at-12175-cmod.c:60.6-60.7: + 57 type = cob_get_field_type (fld); + 58 digits = cob_get_field_digits (fld); + 59 scale = cob_get_field_scale (fld); + 60 > size = cob_get_field_size (fld); ---- ^ - 60 sign = cob_get_field_sign (fld); - 61 byvalue = cob_get_field_constant (fld); + 61 sign = cob_get_field_sign (fld); + 62 byvalue = cob_get_field_constant (fld); >> Error: Unexpected indicator: `s' -run_misc.at-12158-cmod.c:60.6-60.7: - 57 digits = cob_get_field_digits (fld); - 58 scale = cob_get_field_scale (fld); - 59 size = cob_get_field_size (fld); - 60 > sign = cob_get_field_sign (fld); +run_misc.at-12175-cmod.c:61.6-61.7: + 58 digits = cob_get_field_digits (fld); + 59 scale = cob_get_field_scale (fld); + 60 size = cob_get_field_size (fld); + 61 > sign = cob_get_field_sign (fld); ---- ^ - 61 byvalue = cob_get_field_constant (fld); - 62 printf (" %d: %-8s ", k, getType (type, byvalue)); + 62 byvalue = cob_get_field_constant (fld); + 63 printf (" %d: %-8s ", k, getType (type, byvalue)); >> Error: Unexpected indicator: `s' -run_misc.at-12158-cmod.c:61.6-61.7: - 58 scale = cob_get_field_scale (fld); - 59 size = cob_get_field_size (fld); - 60 sign = cob_get_field_sign (fld); - 61 > byvalue = cob_get_field_constant (fld); +run_misc.at-12175-cmod.c:62.6-62.7: + 59 scale = cob_get_field_scale (fld); + 60 size = cob_get_field_size (fld); + 61 sign = cob_get_field_sign (fld); + 62 > byvalue = cob_get_field_constant (fld); ---- ^ - 62 printf (" %d: %-8s ", k, getType (type, byvalue)); - 63 if (byvalue) { + 63 printf (" %d: %-8s ", k, getType (type, byvalue)); + 64 if (byvalue) { >> Error: Unexpected indicator: `b' -run_misc.at-12158-cmod.c:62.6-62.7: - 59 size = cob_get_field_size (fld); - 60 sign = cob_get_field_sign (fld); - 61 byvalue = cob_get_field_constant (fld); - 62 > printf (" %d: %-8s ", k, getType (type, byvalue)); +run_misc.at-12175-cmod.c:63.6-63.7: + 60 size = cob_get_field_size (fld); + 61 sign = cob_get_field_sign (fld); + 62 byvalue = cob_get_field_constant (fld); + 63 > printf (" %d: %-8s ", k, getType (type, byvalue)); ---- ^ - 63 if (byvalue) { - 64 printf ("BY VALUE "); + 64 if (byvalue) { + 65 printf ("BY VALUE "); >> Error: Unexpected indicator: `p' -run_misc.at-12158-cmod.c:63.6-63.7: - 60 sign = cob_get_field_sign (fld); - 61 byvalue = cob_get_field_constant (fld); - 62 printf (" %d: %-8s ", k, getType (type, byvalue)); - 63 > if (byvalue) { +run_misc.at-12175-cmod.c:64.6-64.7: + 61 sign = cob_get_field_sign (fld); + 62 byvalue = cob_get_field_constant (fld); + 63 printf (" %d: %-8s ", k, getType (type, byvalue)); + 64 > if (byvalue) { ---- ^ - 64 printf ("BY VALUE "); - 65 } else { + 65 printf ("BY VALUE "); + 66 } else { >> Error: Unexpected indicator: `i' -run_misc.at-12158-cmod.c:65.6-65.7: - 62 printf (" %d: %-8s ", k, getType (type, byvalue)); - 63 if (byvalue) { - 64 printf ("BY VALUE "); - 65 > } else { +run_misc.at-12175-cmod.c:66.6-66.7: + 63 printf (" %d: %-8s ", k, getType (type, byvalue)); + 64 if (byvalue) { + 65 printf ("BY VALUE "); + 66 > } else { ---- ^ - 66 printf ("BY REFERENCE "); - 67 } + 67 printf ("BY REFERENCE "); + 68 } >> Error: Unexpected indicator: `}' -run_misc.at-12158-cmod.c:67.6-67.7: - 64 printf ("BY VALUE "); - 65 } else { - 66 printf ("BY REFERENCE "); - 67 > } +run_misc.at-12175-cmod.c:68.6-68.7: + 65 printf ("BY VALUE "); + 66 } else { + 67 printf ("BY REFERENCE "); + 68 > } ---- ^ - 68 str = (char *) cob_get_field_str_buffered (fld); - 69 if (type == COB_TYPE_ALPHANUMERIC) { + 69 str = (char *) cob_get_field_str_buffered (fld); + 70 if (type == COB_TYPE_ALPHANUMERIC) { >> Error: Unexpected indicator: `}' -run_misc.at-12158-cmod.c:68.6-68.7: - 65 } else { - 66 printf ("BY REFERENCE "); - 67 } - 68 > str = (char *) cob_get_field_str_buffered (fld); +run_misc.at-12175-cmod.c:69.6-69.7: + 66 } else { + 67 printf ("BY REFERENCE "); + 68 } + 69 > str = (char *) cob_get_field_str_buffered (fld); ---- ^ - 69 if (type == COB_TYPE_ALPHANUMERIC) { - 70 sprintf (pic, "X(%d)", size); + 70 if (type == COB_TYPE_ALPHANUMERIC) { + 71 sprintf (pic, "X(%d)", size); >> Error: Unexpected indicator: `s' -run_misc.at-12158-cmod.c:69.6-69.7: - 66 printf ("BY REFERENCE "); - 67 } - 68 str = (char *) cob_get_field_str_buffered (fld); - 69 > if (type == COB_TYPE_ALPHANUMERIC) { +run_misc.at-12175-cmod.c:70.6-70.7: + 67 printf ("BY REFERENCE "); + 68 } + 69 str = (char *) cob_get_field_str_buffered (fld); + 70 > if (type == COB_TYPE_ALPHANUMERIC) { ---- ^ - 70 sprintf (pic, "X(%d)", size); - 71 printf ("%-11s '%s'", pic, str); + 71 sprintf (pic, "X(%d)", size); + 72 printf ("%-11s '%s'", pic, str); >> Error: Unexpected indicator: `i' -run_misc.at-12158-cmod.c:29.23-69.17: +run_misc.at-12175-cmod.c:29.23-70.17: 26 #else 27 case COB_TYPE_GROUP: return "Group"; 28 case COB_TYPE_NUMERIC_COMP5: @@ -5335,205 +5415,207 @@ run_misc.at-12158-cmod.c:29.23-69.17: ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 53 > printf ("CAPI called with %d parameters\n",nargs); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 54 > for (k=1; k <= nargs; k++) { + 54 > fflush(stdout); +---- ^^^^^^^^^^^^^^^^^^^ + 55 > for (k=1; k <= nargs; k++) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 55 > cob_field *fld = cob_get_param_field (k, "CAPI"); + 56 > cob_field *fld = cob_get_param_field (k, "CAPI"); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 56 > type = cob_get_field_type (fld); + 57 > type = cob_get_field_type (fld); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 57 > digits = cob_get_field_digits (fld); + 58 > digits = cob_get_field_digits (fld); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 58 > scale = cob_get_field_scale (fld); + 59 > scale = cob_get_field_scale (fld); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 59 > size = cob_get_field_size (fld); + 60 > size = cob_get_field_size (fld); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 60 > sign = cob_get_field_sign (fld); + 61 > sign = cob_get_field_sign (fld); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 61 > byvalue = cob_get_field_constant (fld); + 62 > byvalue = cob_get_field_constant (fld); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 62 > printf (" %d: %-8s ", k, getType (type, byvalue)); + 63 > printf (" %d: %-8s ", k, getType (type, byvalue)); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 63 > if (byvalue) { + 64 > if (byvalue) { ---- ^^^^^^^^^^^^^^^^^^^^^ - 64 > printf ("BY VALUE "); + 65 > printf ("BY VALUE "); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 65 > } else { + 66 > } else { ---- ^^^^^^^^^^^^^^^ - 66 > printf ("BY REFERENCE "); + 67 > printf ("BY REFERENCE "); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 67 > } + 68 > } ---- ^^^^^^^^ - 68 > str = (char *) cob_get_field_str_buffered (fld); + 69 > str = (char *) cob_get_field_str_buffered (fld); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 69 > if (type == COB_TYPE_ALPHANUMERIC) { + 70 > if (type == COB_TYPE_ALPHANUMERIC) { ---- ^^^^^^^^^^^^^^^^^^ - 70 sprintf (pic, "X(%d)", size); - 71 printf ("%-11s '%s'", pic, str); + 71 sprintf (pic, "X(%d)", size); + 72 printf ("%-11s '%s'", pic, str); >> Error: Unexpected pseudotext -run_misc.at-12158-cmod.c:73.6-73.7: - 70 sprintf (pic, "X(%d)", size); - 71 printf ("%-11s '%s'", pic, str); - 72 cob_put_field_str (fld, "Bye!"); - 73 > } else if (type == COB_TYPE_NATIONAL) { +run_misc.at-12175-cmod.c:74.6-74.7: + 71 sprintf (pic, "X(%d)", size); + 72 printf ("%-11s '%s'", pic, str); + 73 cob_put_field_str (fld, "Bye!"); + 74 > } else if (type == COB_TYPE_NATIONAL) { ---- ^ - 74 sprintf (pic,"N(%d)",size); /* FIXME */ - 75 printf ("exchange of national data is not supported yet"); + 75 sprintf (pic,"N(%d)",size); /* FIXME */ + 76 printf ("exchange of national data is not supported yet"); >> Error: Unexpected indicator: `}' -run_misc.at-12158-cmod.c:76.6-76.7: - 73 } else if (type == COB_TYPE_NATIONAL) { - 74 sprintf (pic,"N(%d)",size); /* FIXME */ - 75 printf ("exchange of national data is not supported yet"); - 76 > } else if (type == COB_TYPE_GROUP) { +run_misc.at-12175-cmod.c:77.6-77.7: + 74 } else if (type == COB_TYPE_NATIONAL) { + 75 sprintf (pic,"N(%d)",size); /* FIXME */ + 76 printf ("exchange of national data is not supported yet"); + 77 > } else if (type == COB_TYPE_GROUP) { ---- ^ - 77 sprintf (pic,"(%d)",size); - 78 printf ("%-11s '%.*s'",pic,size,str); + 78 sprintf (pic,"(%d)",size); + 79 printf ("%-11s '%.*s'",pic,size,str); >> Error: Unexpected indicator: `}' -run_misc.at-12158-cmod.c:73.22-76.24: - 70 sprintf (pic, "X(%d)", size); - 71 printf ("%-11s '%s'", pic, str); - 72 cob_put_field_str (fld, "Bye!"); - 73 > } else if (type == COB_TYPE_NATIONAL) { +run_misc.at-12175-cmod.c:74.22-77.24: + 71 sprintf (pic, "X(%d)", size); + 72 printf ("%-11s '%s'", pic, str); + 73 cob_put_field_str (fld, "Bye!"); + 74 > } else if (type == COB_TYPE_NATIONAL) { ---- ^^^^^^^^^^^^^^^^^^^^^^^ - 74 > sprintf (pic,"N(%d)",size); /* FIXME */ + 75 > sprintf (pic,"N(%d)",size); /* FIXME */ ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 75 > printf ("exchange of national data is not supported yet"); + 76 > printf ("exchange of national data is not supported yet"); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 76 > } else if (type == COB_TYPE_GROUP) { + 77 > } else if (type == COB_TYPE_GROUP) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^ - 77 sprintf (pic,"(%d)",size); - 78 printf ("%-11s '%.*s'",pic,size,str); + 78 sprintf (pic,"(%d)",size); + 79 printf ("%-11s '%.*s'",pic,size,str); >> Error: Unexpected pseudotext -run_misc.at-12158-cmod.c:80.6-80.7: - 77 sprintf (pic,"(%d)",size); - 78 printf ("%-11s '%.*s'",pic,size,str); - 79 cob_put_field_str (fld, "Bye-Bye Birdie!"); - 80 > } else if (type == COB_TYPE_NUMERIC_EDITED) { +run_misc.at-12175-cmod.c:81.6-81.7: + 78 sprintf (pic,"(%d)",size); + 79 printf ("%-11s '%.*s'",pic,size,str); + 80 cob_put_field_str (fld, "Bye-Bye Birdie!"); + 81 > } else if (type == COB_TYPE_NUMERIC_EDITED) { ---- ^ - 81 if (scale > 0) { - 82 sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); + 82 if (scale > 0) { + 83 sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); >> Error: Unexpected indicator: `}' -run_misc.at-12158-cmod.c:93.6-93.7: - 90 cob_put_s64_param (k, val); - 91 str = (char *) cob_get_field_str (fld, wrk, 78); - 92 printf (" to %.*s",size,wrk); - 93 > } else { +run_misc.at-12175-cmod.c:94.6-94.7: + 91 cob_put_s64_param (k, val); + 92 str = (char *) cob_get_field_str (fld, wrk, 78); + 93 printf (" to %.*s",size,wrk); + 94 > } else { ---- ^ - 94 if(scale > 0) { - 95 sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); + 95 if(scale > 0) { + 96 sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); >> Error: Unexpected indicator: `}' -run_misc.at-12158-cmod.c:103.6-103.7: - 100 val = cob_get_s64_param (k); - 101 sprintf (wrk, "%lld", val + 3); - 102 cob_put_field_str (fld, wrk); - 103 > } +run_misc.at-12175-cmod.c:104.6-104.7: + 101 val = cob_get_s64_param (k); + 102 sprintf (wrk, "%lld", val + 3); + 103 cob_put_field_str (fld, wrk); + 104 > } ---- ^ - 104 printf (";\n"); - 105 fflush(stdout); + 105 printf (";\n"); + 106 fflush(stdout); >> Error: Unexpected indicator: `}' -run_misc.at-12158-cmod.c:104.6-104.7: - 101 sprintf (wrk, "%lld", val + 3); - 102 cob_put_field_str (fld, wrk); - 103 } - 104 > printf (";\n"); +run_misc.at-12175-cmod.c:105.6-105.7: + 102 sprintf (wrk, "%lld", val + 3); + 103 cob_put_field_str (fld, wrk); + 104 } + 105 > printf (";\n"); ---- ^ - 105 fflush(stdout); - 106 } + 106 fflush(stdout); + 107 } >> Error: Unexpected indicator: `p' -run_misc.at-12158-cmod.c:105.6-105.7: - 102 cob_put_field_str (fld, wrk); - 103 } - 104 printf (";\n"); - 105 > fflush(stdout); +run_misc.at-12175-cmod.c:106.6-106.7: + 103 cob_put_field_str (fld, wrk); + 104 } + 105 printf (";\n"); + 106 > fflush(stdout); ---- ^ - 106 } - 107 return 0; + 107 } + 108 return 0; >> Error: Unexpected indicator: `f' -run_misc.at-12158-cmod.c:107.6-107.7: - 104 printf (";\n"); - 105 fflush(stdout); - 106 } - 107 > return 0; +run_misc.at-12175-cmod.c:108.6-108.7: + 105 printf (";\n"); + 106 fflush(stdout); + 107 } + 108 > return 0; ---- ^ - 108 } + 109 } >> Error: Unexpected indicator: `u' -run_misc.at-12158-cmod.c:80.22-109.0: - 77 sprintf (pic,"(%d)",size); - 78 printf ("%-11s '%.*s'",pic,size,str); - 79 cob_put_field_str (fld, "Bye-Bye Birdie!"); - 80 > } else if (type == COB_TYPE_NUMERIC_EDITED) { +run_misc.at-12175-cmod.c:81.22-110.0: + 78 sprintf (pic,"(%d)",size); + 79 printf ("%-11s '%.*s'",pic,size,str); + 80 cob_put_field_str (fld, "Bye-Bye Birdie!"); + 81 > } else if (type == COB_TYPE_NUMERIC_EDITED) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 81 > if (scale > 0) { + 82 > if (scale > 0) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^ - 82 > sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); + 83 > sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 83 > } else { + 84 > } else { ---- ^^^^^^^^^^^^^^^^^^ - 84 > sprintf (pic,"%s9(%d)",sign?"S":"",digits-scale); + 85 > sprintf (pic,"%s9(%d)",sign?"S":"",digits-scale); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 85 > } + 86 > } ---- ^^^^^^^^^^^ - 86 > printf ("%-11s %s ",pic,str); + 87 > printf ("%-11s %s ",pic,str); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 87 > val = cob_get_s64_param (k); + 88 > val = cob_get_s64_param (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 88 > val = val + 130; + 89 > val = val + 130; ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^ - 89 > val = -val; + 90 > val = -val; ---- ^^^^^^^^^^^^^^^^^^^^^ - 90 > cob_put_s64_param (k, val); + 91 > cob_put_s64_param (k, val); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 91 > str = (char *) cob_get_field_str (fld, wrk, 78); + 92 > str = (char *) cob_get_field_str (fld, wrk, 78); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 92 > printf (" to %.*s",size,wrk); + 93 > printf (" to %.*s",size,wrk); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 93 > } else { + 94 > } else { ---- ^^^^^^^^^^^^^^^ - 94 > if(scale > 0) { + 95 > if(scale > 0) { ---- ^^^^^^^^^^^^^^^^^^^^^^^^^ - 95 > sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); + 96 > sprintf (pic,"%s9(%d)V9(%d)",sign?"S":"",digits-scale,scale); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 96 > } else { + 97 > } else { ---- ^^^^^^^^^^^^^^^^^^ - 97 > sprintf (pic,"%s9(%d)",sign?"S":"",digits-scale); + 98 > sprintf (pic,"%s9(%d)",sign?"S":"",digits-scale); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 98 > } + 99 > } ---- ^^^^^^^^^^^ - 99 > printf ("%-11s %s", pic, str); + 100 > printf ("%-11s %s", pic, str); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 100 > val = cob_get_s64_param (k); + 101 > val = cob_get_s64_param (k); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 101 > sprintf (wrk, "%lld", val + 3); + 102 > sprintf (wrk, "%lld", val + 3); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 102 > cob_put_field_str (fld, wrk); + 103 > cob_put_field_str (fld, wrk); ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - 103 > } + 104 > } ---- ^^^^^^^^ - 104 > printf (";\n"); + 105 > printf (";\n"); ---- ^^^^^^^^^^^^^^^^^^^^^^ - 105 > fflush(stdout); + 106 > fflush(stdout); ---- ^^^^^^^^^^^^^^^^^^^^^^ - 106 > } + 107 > } ---- ^^^^^ - 107 > return 0; + 108 > return 0; ---- ^^^^^^^^^^^^^ - 108 > } + 109 > } ---- ^^ >> Error: Unterminated pseudotext -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12158:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12247:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12343:0 -run_misc.at-12343-prog.cob:26.18-26.27: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12175:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12264:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12360:0 +run_misc.at-12360-prog.cob:26.18-26.27: 23 05 DBI-RECORD-NAMES 24 OCCURS 7 TIMES 25 INDEXED BY REC-NAME-IDX @@ -5543,13 +5625,13 @@ run_misc.at-12343-prog.cob:26.18-26.27: 28 10 DBI-RECORD-NAME PIC X(30). >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12411:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12510:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12574:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12666:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12742:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12832:0 -run_misc.at-12832-prog.cob:2.7-2.8: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12428:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12527:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12591:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12683:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12759:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12849:0 +run_misc.at-12849-prog.cob:2.7-2.8: 1 2 > $SET CONSTANT DOGGY "Barky" ---- ^ @@ -5557,7 +5639,7 @@ run_misc.at-12832-prog.cob:2.7-2.8: 4 IDENTIFICATION DIVISION. >> Error: Invalid syntax -run_misc.at-12832-prog.cob:8.35: +run_misc.at-12849-prog.cob:8.35: 5 PROGRAM-ID. prog. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -5567,7 +5649,7 @@ run_misc.at-12832-prog.cob:8.35: 10 $SET CONSTANT PONY "White" >> Hint: Missing -run_misc.at-12832-prog.cob:8.36-8.41: +run_misc.at-12849-prog.cob:8.36-8.41: 5 PROGRAM-ID. prog. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -5577,7 +5659,7 @@ run_misc.at-12832-prog.cob:8.36-8.41: 10 $SET CONSTANT PONY "White" >> Error: Invalid syntax -run_misc.at-12832-prog.cob:9.35: +run_misc.at-12849-prog.cob:9.35: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -5587,7 +5669,7 @@ run_misc.at-12832-prog.cob:9.35: 11 * >> Hint: Missing -run_misc.at-12832-prog.cob:9.36-9.40: +run_misc.at-12849-prog.cob:9.36-9.40: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -5597,7 +5679,7 @@ run_misc.at-12832-prog.cob:9.36-9.40: 11 * >> Error: Invalid syntax -run_misc.at-12832-prog.cob:10.7-10.8: +run_misc.at-12849-prog.cob:10.7-10.8: 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. 9 77 MYHORSE PIC X(7) VALUE PONY. @@ -5607,8 +5689,8 @@ run_misc.at-12832-prog.cob:10.7-10.8: 12 PROCEDURE DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12843:0 -run_misc.at-12843-prog2.cob:2.7-2.35: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12860:0 +run_misc.at-12860-prog2.cob:2.7-2.35: 1 2 > >>SET CONSTANT DOGGY "Barky" ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ @@ -5616,7 +5698,7 @@ run_misc.at-12843-prog2.cob:2.7-2.35: 4 IDENTIFICATION DIVISION. >> Error: Malformed compiler directive -run_misc.at-12843-prog2.cob:3.7-3.35: +run_misc.at-12860-prog2.cob:3.7-3.35: 1 2 >>SET CONSTANT DOGGY "Barky" 3 > >>SET CONSTANT PONY "Blacky" @@ -5625,7 +5707,7 @@ run_misc.at-12843-prog2.cob:3.7-3.35: 5 PROGRAM-ID. prog2. >> Error: Malformed compiler directive -run_misc.at-12843-prog2.cob:8.35: +run_misc.at-12860-prog2.cob:8.35: 5 PROGRAM-ID. prog2. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -5635,7 +5717,7 @@ run_misc.at-12843-prog2.cob:8.35: 10 >>SET CONSTANT PONY "White" >> Hint: Missing -run_misc.at-12843-prog2.cob:8.36-8.41: +run_misc.at-12860-prog2.cob:8.36-8.41: 5 PROGRAM-ID. prog2. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -5645,7 +5727,7 @@ run_misc.at-12843-prog2.cob:8.36-8.41: 10 >>SET CONSTANT PONY "White" >> Error: Invalid syntax -run_misc.at-12843-prog2.cob:9.35: +run_misc.at-12860-prog2.cob:9.35: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -5655,7 +5737,7 @@ run_misc.at-12843-prog2.cob:9.35: 11 * >> Hint: Missing -run_misc.at-12843-prog2.cob:9.36-9.40: +run_misc.at-12860-prog2.cob:9.36-9.40: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -5665,7 +5747,7 @@ run_misc.at-12843-prog2.cob:9.36-9.40: 11 * >> Error: Invalid syntax -run_misc.at-12843-prog2.cob:10.7-10.34: +run_misc.at-12860-prog2.cob:10.7-10.34: 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. 9 77 MYHORSE PIC X(7) VALUE PONY. @@ -5675,8 +5757,8 @@ run_misc.at-12843-prog2.cob:10.7-10.34: 12 PROCEDURE DIVISION. >> Error: Malformed compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12854:0 -run_misc.at-12854-prog3.cob:2.7-2.38: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12871:0 +run_misc.at-12871-prog3.cob:2.7-2.38: 1 2 > >>DEFINE CONSTANT DOGGY "Barky" ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ @@ -5684,7 +5766,7 @@ run_misc.at-12854-prog3.cob:2.7-2.38: 4 IDENTIFICATION DIVISION. >> Error: Malformed compiler directive -run_misc.at-12854-prog3.cob:3.7-3.38: +run_misc.at-12871-prog3.cob:3.7-3.38: 1 2 >>DEFINE CONSTANT DOGGY "Barky" 3 > >>DEFINE CONSTANT PONY "Blacky" @@ -5693,7 +5775,7 @@ run_misc.at-12854-prog3.cob:3.7-3.38: 5 PROGRAM-ID. prog3. >> Error: Malformed compiler directive -run_misc.at-12854-prog3.cob:8.35: +run_misc.at-12871-prog3.cob:8.35: 5 PROGRAM-ID. prog3. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -5703,7 +5785,7 @@ run_misc.at-12854-prog3.cob:8.35: 10 >>DEFINE CONSTANT PONY "White" OVERRIDE >> Hint: Missing -run_misc.at-12854-prog3.cob:8.36-8.41: +run_misc.at-12871-prog3.cob:8.36-8.41: 5 PROGRAM-ID. prog3. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -5713,7 +5795,7 @@ run_misc.at-12854-prog3.cob:8.36-8.41: 10 >>DEFINE CONSTANT PONY "White" OVERRIDE >> Error: Invalid syntax -run_misc.at-12854-prog3.cob:9.35: +run_misc.at-12871-prog3.cob:9.35: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -5723,7 +5805,7 @@ run_misc.at-12854-prog3.cob:9.35: 11 * >> Hint: Missing -run_misc.at-12854-prog3.cob:9.36-9.40: +run_misc.at-12871-prog3.cob:9.36-9.40: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -5733,7 +5815,7 @@ run_misc.at-12854-prog3.cob:9.36-9.40: 11 * >> Error: Invalid syntax -run_misc.at-12854-prog3.cob:10.7-10.46: +run_misc.at-12871-prog3.cob:10.7-10.46: 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. 9 77 MYHORSE PIC X(7) VALUE PONY. @@ -5743,8 +5825,8 @@ run_misc.at-12854-prog3.cob:10.7-10.46: 12 PROCEDURE DIVISION. >> Error: Malformed compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12917:0 -run_misc.at-12917-prog.cob:5.7-5.35: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12934:0 +run_misc.at-12934-prog.cob:5.7-5.35: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog. 4 DATA DIVISION. @@ -5754,7 +5836,7 @@ run_misc.at-12917-prog.cob:5.7-5.35: 7 WORKING-STORAGE SECTION. >> Error: Malformed compiler directive -run_misc.at-12917-prog.cob:6.7-6.34: +run_misc.at-12934-prog.cob:6.7-6.34: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 >>SET CONSTANT DOGGY "Pluto" @@ -5764,7 +5846,7 @@ run_misc.at-12917-prog.cob:6.7-6.34: 8 01 THEDOG PIC X(6) VALUE DOGGY. >> Error: Malformed compiler directive -run_misc.at-12917-prog.cob:8.35: +run_misc.at-12934-prog.cob:8.35: 5 >>SET CONSTANT DOGGY "Pluto" 6 >>SET CONSTANT PONY "Piper" 7 WORKING-STORAGE SECTION. @@ -5774,7 +5856,7 @@ run_misc.at-12917-prog.cob:8.35: 10 >>DEFINE DPONY AS PARAMETER OVERRIDE >> Hint: Missing -run_misc.at-12917-prog.cob:8.36-8.41: +run_misc.at-12934-prog.cob:8.36-8.41: 5 >>SET CONSTANT DOGGY "Pluto" 6 >>SET CONSTANT PONY "Piper" 7 WORKING-STORAGE SECTION. @@ -5784,7 +5866,7 @@ run_misc.at-12917-prog.cob:8.36-8.41: 10 >>DEFINE DPONY AS PARAMETER OVERRIDE >> Error: Invalid syntax -run_misc.at-12917-prog.cob:21.37: +run_misc.at-12934-prog.cob:21.37: 18 >>DEFINE ENVPONY AS "No EnvPony" 19 >>END-IF 20 01 HORSE CONSTANT FROM ENVPONY. @@ -5794,7 +5876,7 @@ run_misc.at-12917-prog.cob:21.37: 23 * >> Hint: Missing -run_misc.at-12917-prog.cob:21.38-21.43: +run_misc.at-12934-prog.cob:21.38-21.43: 18 >>DEFINE ENVPONY AS "No EnvPony" 19 >>END-IF 20 01 HORSE CONSTANT FROM ENVPONY. @@ -5804,7 +5886,7 @@ run_misc.at-12917-prog.cob:21.38-21.43: 23 * >> Error: Invalid syntax -run_misc.at-12917-prog.cob:38.7-38.55: +run_misc.at-12934-prog.cob:38.7-38.55: 35 >>END-IF 36 DISPLAY "DPONY set to " CNSPONY ";". 37 >>IF ENVPONY = "WHITE" @@ -5814,7 +5896,7 @@ run_misc.at-12917-prog.cob:38.7-38.55: 40 >>DEFINE CONSTANT PONY AS "default Dirty" OVERRIDE >> Error: Malformed compiler directive -run_misc.at-12917-prog.cob:40.7-40.57: +run_misc.at-12934-prog.cob:40.7-40.57: 37 >>IF ENVPONY = "WHITE" 38 >>DEFINE CONSTANT PONY AS "White Horse" OVERRIDE 39 >>ELSE @@ -5824,8 +5906,8 @@ run_misc.at-12917-prog.cob:40.7-40.57: 42 DISPLAY "My pony is " PONY ";". >> Error: Malformed compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:12983:0 -run_misc.at-12983-prog.cob:5.7-5.35: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13000:0 +run_misc.at-13000-prog.cob:5.7-5.35: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog. 4 DATA DIVISION. @@ -5835,7 +5917,7 @@ run_misc.at-12983-prog.cob:5.7-5.35: 7 WORKING-STORAGE SECTION. >> Error: Malformed compiler directive -run_misc.at-12983-prog.cob:6.7-6.34: +run_misc.at-13000-prog.cob:6.7-6.34: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 >>SET CONSTANT DOGGY "Pluto" @@ -5845,7 +5927,7 @@ run_misc.at-12983-prog.cob:6.7-6.34: 8 01 THEDOG PIC X(6) VALUE DOGGY. >> Error: Malformed compiler directive -run_misc.at-12983-prog.cob:8.35: +run_misc.at-13000-prog.cob:8.35: 5 >>SET CONSTANT DOGGY "Pluto" 6 >>SET CONSTANT PONY "Piper" 7 WORKING-STORAGE SECTION. @@ -5855,7 +5937,7 @@ run_misc.at-12983-prog.cob:8.35: 10 >>DEFINE DPONY AS PARAMETER OVERRIDE >> Hint: Missing -run_misc.at-12983-prog.cob:8.36-8.41: +run_misc.at-13000-prog.cob:8.36-8.41: 5 >>SET CONSTANT DOGGY "Pluto" 6 >>SET CONSTANT PONY "Piper" 7 WORKING-STORAGE SECTION. @@ -5865,7 +5947,7 @@ run_misc.at-12983-prog.cob:8.36-8.41: 10 >>DEFINE DPONY AS PARAMETER OVERRIDE >> Error: Invalid syntax -run_misc.at-12983-prog.cob:21.37: +run_misc.at-13000-prog.cob:21.37: 18 >>DEFINE ENVPONY AS "No EnvPony" 19 >>END-IF 20 01 HORSE CONSTANT FROM ENVPONY. @@ -5875,7 +5957,7 @@ run_misc.at-12983-prog.cob:21.37: 23 * >> Hint: Missing -run_misc.at-12983-prog.cob:21.38-21.43: +run_misc.at-13000-prog.cob:21.38-21.43: 18 >>DEFINE ENVPONY AS "No EnvPony" 19 >>END-IF 20 01 HORSE CONSTANT FROM ENVPONY. @@ -5885,7 +5967,7 @@ run_misc.at-12983-prog.cob:21.38-21.43: 23 * >> Error: Invalid syntax -run_misc.at-12983-prog.cob:38.7-38.55: +run_misc.at-13000-prog.cob:38.7-38.55: 35 >>END-IF 36 DISPLAY "DPONY set to " CNSPONY ";". 37 >>IF ENVPONY = "WHITE" @@ -5895,7 +5977,7 @@ run_misc.at-12983-prog.cob:38.7-38.55: 40 >>DEFINE CONSTANT PONY AS "default Dirty" OVERRIDE >> Error: Malformed compiler directive -run_misc.at-12983-prog.cob:40.7-40.57: +run_misc.at-13000-prog.cob:40.7-40.57: 37 >>IF ENVPONY = "WHITE" 38 >>DEFINE CONSTANT PONY AS "White Horse" OVERRIDE 39 >>ELSE @@ -5905,8 +5987,8 @@ run_misc.at-12983-prog.cob:40.7-40.57: 42 DISPLAY "My pony is " PONY ";". >> Error: Malformed compiler directive -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13049:0 -run_misc.at-13049-prog.cob:14.30-14.31: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13066:0 +run_misc.at-13066-prog.cob:14.30-14.31: 11 05 FLD4 PIC X(4). 12 05 FLD5 PIC X(4). 13 01 PICX PIC XXX VALUE 'Abc'. @@ -5916,7 +5998,7 @@ run_misc.at-13049-prog.cob:14.30-14.31: 16 01 THEDOG PIC X(6) VALUE DOGGY. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:14.36-14.37: +run_misc.at-13066-prog.cob:14.36-14.37: 11 05 FLD4 PIC X(4). 12 05 FLD5 PIC X(4). 13 01 PICX PIC XXX VALUE 'Abc'. @@ -5926,7 +6008,7 @@ run_misc.at-13049-prog.cob:14.36-14.37: 16 01 THEDOG PIC X(6) VALUE DOGGY. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:14.65-14.66: +run_misc.at-13066-prog.cob:14.65-14.66: 11 05 FLD4 PIC X(4). 12 05 FLD5 PIC X(4). 13 01 PICX PIC XXX VALUE 'Abc'. @@ -5936,7 +6018,7 @@ run_misc.at-13049-prog.cob:14.65-14.66: 16 01 THEDOG PIC X(6) VALUE DOGGY. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:14.65: +run_misc.at-13066-prog.cob:14.65: 11 05 FLD4 PIC X(4). 12 05 FLD5 PIC X(4). 13 01 PICX PIC XXX VALUE 'Abc'. @@ -5946,7 +6028,7 @@ run_misc.at-13049-prog.cob:14.65: 16 01 THEDOG PIC X(6) VALUE DOGGY. >> Hint: Missing FROM -run_misc.at-13049-prog.cob:15.27-15.30: +run_misc.at-13066-prog.cob:15.27-15.30: 12 05 FLD5 PIC X(4). 13 01 PICX PIC XXX VALUE 'Abc'. 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. @@ -5956,7 +6038,7 @@ run_misc.at-13049-prog.cob:15.27-15.30: 17 78 DIV1 VALUE 100 / 3. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:15.37-15.38: +run_misc.at-13066-prog.cob:15.37-15.38: 12 05 FLD5 PIC X(4). 13 01 PICX PIC XXX VALUE 'Abc'. 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. @@ -5966,7 +6048,7 @@ run_misc.at-13049-prog.cob:15.37-15.38: 17 78 DIV1 VALUE 100 / 3. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:15.57-15.58: +run_misc.at-13066-prog.cob:15.57-15.58: 12 05 FLD5 PIC X(4). 13 01 PICX PIC XXX VALUE 'Abc'. 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. @@ -5976,7 +6058,7 @@ run_misc.at-13049-prog.cob:15.57-15.58: 17 78 DIV1 VALUE 100 / 3. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:15.57: +run_misc.at-13066-prog.cob:15.57: 12 05 FLD5 PIC X(4). 13 01 PICX PIC XXX VALUE 'Abc'. 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. @@ -5986,7 +6068,7 @@ run_misc.at-13049-prog.cob:15.57: 17 78 DIV1 VALUE 100 / 3. >> Hint: Missing FROM -run_misc.at-13049-prog.cob:16.35: +run_misc.at-13066-prog.cob:16.35: 13 01 PICX PIC XXX VALUE 'Abc'. 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. @@ -5996,7 +6078,7 @@ run_misc.at-13049-prog.cob:16.35: 18 78 NUM2 VALUE 1 + 2 * 3. >> Hint: Missing -run_misc.at-13049-prog.cob:16.36-16.41: +run_misc.at-13066-prog.cob:16.36-16.41: 13 01 PICX PIC XXX VALUE 'Abc'. 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. @@ -6006,7 +6088,7 @@ run_misc.at-13049-prog.cob:16.36-16.41: 18 78 NUM2 VALUE 1 + 2 * 3. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:17.31-17.32: +run_misc.at-13066-prog.cob:17.31-17.32: 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 16 01 THEDOG PIC X(6) VALUE DOGGY. @@ -6016,7 +6098,7 @@ run_misc.at-13049-prog.cob:17.31-17.32: 19 LINKAGE SECTION. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:17.34-17.35: +run_misc.at-13066-prog.cob:17.34-17.35: 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 16 01 THEDOG PIC X(6) VALUE DOGGY. @@ -6026,7 +6108,7 @@ run_misc.at-13049-prog.cob:17.34-17.35: 19 LINKAGE SECTION. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:17.34: +run_misc.at-13066-prog.cob:17.34: 14 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 16 01 THEDOG PIC X(6) VALUE DOGGY. @@ -6036,7 +6118,7 @@ run_misc.at-13049-prog.cob:17.34: 19 LINKAGE SECTION. >> Hint: Missing FROM -run_misc.at-13049-prog.cob:18.29-18.30: +run_misc.at-13066-prog.cob:18.29-18.30: 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 16 01 THEDOG PIC X(6) VALUE DOGGY. 17 78 DIV1 VALUE 100 / 3. @@ -6046,7 +6128,7 @@ run_misc.at-13049-prog.cob:18.29-18.30: 20 01 XMYREC. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:18.33-18.34: +run_misc.at-13066-prog.cob:18.33-18.34: 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 16 01 THEDOG PIC X(6) VALUE DOGGY. 17 78 DIV1 VALUE 100 / 3. @@ -6056,7 +6138,7 @@ run_misc.at-13049-prog.cob:18.33-18.34: 20 01 XMYREC. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:18.36-18.37: +run_misc.at-13066-prog.cob:18.36-18.37: 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 16 01 THEDOG PIC X(6) VALUE DOGGY. 17 78 DIV1 VALUE 100 / 3. @@ -6066,7 +6148,7 @@ run_misc.at-13049-prog.cob:18.36-18.37: 20 01 XMYREC. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:18.36: +run_misc.at-13066-prog.cob:18.36: 15 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 16 01 THEDOG PIC X(6) VALUE DOGGY. 17 78 DIV1 VALUE 100 / 3. @@ -6076,7 +6158,7 @@ run_misc.at-13049-prog.cob:18.36: 20 01 XMYREC. >> Hint: Missing FROM -run_misc.at-13049-prog.cob:23.31: +run_misc.at-13066-prog.cob:23.31: 20 01 XMYREC. 21 05 XFLD1 PIC 9(2). 22 05 XFLD2 PIC X(7). @@ -6086,7 +6168,7 @@ run_misc.at-13049-prog.cob:23.31: 25 78 XPOS4 VALUE NEXT. >> Hint: Missing -run_misc.at-13049-prog.cob:23.32-23.36: +run_misc.at-13066-prog.cob:23.32-23.36: 20 01 XMYREC. 21 05 XFLD1 PIC 9(2). 22 05 XFLD2 PIC X(7). @@ -6096,7 +6178,7 @@ run_misc.at-13049-prog.cob:23.32-23.36: 25 78 XPOS4 VALUE NEXT. >> Error: Invalid syntax -run_misc.at-13049-prog.cob:25.31: +run_misc.at-13066-prog.cob:25.31: 22 05 XFLD2 PIC X(7). 23 78 XPOS3 VALUE NEXT. 24 05 XFLD3 PIC X(2) OCCURS 5 TIMES. @@ -6106,7 +6188,7 @@ run_misc.at-13049-prog.cob:25.31: 27 05 XFLD5 PIC X(4). >> Hint: Missing -run_misc.at-13049-prog.cob:25.32-25.36: +run_misc.at-13066-prog.cob:25.32-25.36: 22 05 XFLD2 PIC X(7). 23 78 XPOS3 VALUE NEXT. 24 05 XFLD3 PIC X(2) OCCURS 5 TIMES. @@ -6116,7 +6198,7 @@ run_misc.at-13049-prog.cob:25.32-25.36: 27 05 XFLD5 PIC X(4). >> Error: Invalid syntax -run_misc.at-13049-prog.cob:28.27: +run_misc.at-13066-prog.cob:28.27: 25 78 XPOS4 VALUE NEXT. 26 05 XFLD4 PIC X(4). 27 05 XFLD5 PIC X(4). @@ -6126,7 +6208,7 @@ run_misc.at-13049-prog.cob:28.27: 30 PROCEDURE DIVISION. >> Hint: Missing -run_misc.at-13049-prog.cob:28.28-28.33: +run_misc.at-13066-prog.cob:28.28-28.33: 25 78 XPOS4 VALUE NEXT. 26 05 XFLD4 PIC X(4). 27 05 XFLD5 PIC X(4). @@ -6136,8 +6218,8 @@ run_misc.at-13049-prog.cob:28.28-28.33: 30 PROCEDURE DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13127:0 -run_misc.at-13127-prog.cob:17.35-17.36: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13144:0 +run_misc.at-13144-prog.cob:17.35-17.36: 14 01 PICX PIC XXX VALUE 'Abc'. 15 01 CAT CONSTANT 'Cat '. 16 01 DOG CONSTANT 'Dog '. @@ -6147,7 +6229,7 @@ run_misc.at-13127-prog.cob:17.35-17.36: 19 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:18.30-18.31: +run_misc.at-13144-prog.cob:18.30-18.31: 15 01 CAT CONSTANT 'Cat '. 16 01 DOG CONSTANT 'Dog '. 17 01 YARD CONSTANT CAT & "& " & DOG. @@ -6157,7 +6239,7 @@ run_misc.at-13127-prog.cob:18.30-18.31: 20 78 DIV1 VALUE 100 / 3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:18.36-18.37: +run_misc.at-13144-prog.cob:18.36-18.37: 15 01 CAT CONSTANT 'Cat '. 16 01 DOG CONSTANT 'Dog '. 17 01 YARD CONSTANT CAT & "& " & DOG. @@ -6167,7 +6249,7 @@ run_misc.at-13127-prog.cob:18.36-18.37: 20 78 DIV1 VALUE 100 / 3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:18.65-18.66: +run_misc.at-13144-prog.cob:18.65-18.66: 15 01 CAT CONSTANT 'Cat '. 16 01 DOG CONSTANT 'Dog '. 17 01 YARD CONSTANT CAT & "& " & DOG. @@ -6177,7 +6259,7 @@ run_misc.at-13127-prog.cob:18.65-18.66: 20 78 DIV1 VALUE 100 / 3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:18.65: +run_misc.at-13144-prog.cob:18.65: 15 01 CAT CONSTANT 'Cat '. 16 01 DOG CONSTANT 'Dog '. 17 01 YARD CONSTANT CAT & "& " & DOG. @@ -6187,7 +6269,7 @@ run_misc.at-13127-prog.cob:18.65: 20 78 DIV1 VALUE 100 / 3. >> Hint: Missing FROM -run_misc.at-13127-prog.cob:19.27-19.30: +run_misc.at-13144-prog.cob:19.27-19.30: 16 01 DOG CONSTANT 'Dog '. 17 01 YARD CONSTANT CAT & "& " & DOG. 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. @@ -6197,7 +6279,7 @@ run_misc.at-13127-prog.cob:19.27-19.30: 21 78 NUM2 VALUE 1 + 2 * 3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:19.37-19.38: +run_misc.at-13144-prog.cob:19.37-19.38: 16 01 DOG CONSTANT 'Dog '. 17 01 YARD CONSTANT CAT & "& " & DOG. 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. @@ -6207,7 +6289,7 @@ run_misc.at-13127-prog.cob:19.37-19.38: 21 78 NUM2 VALUE 1 + 2 * 3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:19.57-19.58: +run_misc.at-13144-prog.cob:19.57-19.58: 16 01 DOG CONSTANT 'Dog '. 17 01 YARD CONSTANT CAT & "& " & DOG. 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. @@ -6217,7 +6299,7 @@ run_misc.at-13127-prog.cob:19.57-19.58: 21 78 NUM2 VALUE 1 + 2 * 3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:19.57: +run_misc.at-13144-prog.cob:19.57: 16 01 DOG CONSTANT 'Dog '. 17 01 YARD CONSTANT CAT & "& " & DOG. 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. @@ -6227,7 +6309,7 @@ run_misc.at-13127-prog.cob:19.57: 21 78 NUM2 VALUE 1 + 2 * 3. >> Hint: Missing FROM -run_misc.at-13127-prog.cob:20.31-20.32: +run_misc.at-13144-prog.cob:20.31-20.32: 17 01 YARD CONSTANT CAT & "& " & DOG. 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 19 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. @@ -6237,7 +6319,7 @@ run_misc.at-13127-prog.cob:20.31-20.32: 22 01 CON3 CONSTANT (((1 + 2) * NUM2) - 4). >> Error: Invalid syntax -run_misc.at-13127-prog.cob:20.34-20.35: +run_misc.at-13144-prog.cob:20.34-20.35: 17 01 YARD CONSTANT CAT & "& " & DOG. 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 19 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. @@ -6247,7 +6329,7 @@ run_misc.at-13127-prog.cob:20.34-20.35: 22 01 CON3 CONSTANT (((1 + 2) * NUM2) - 4). >> Error: Invalid syntax -run_misc.at-13127-prog.cob:20.34: +run_misc.at-13144-prog.cob:20.34: 17 01 YARD CONSTANT CAT & "& " & DOG. 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 19 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. @@ -6257,7 +6339,7 @@ run_misc.at-13127-prog.cob:20.34: 22 01 CON3 CONSTANT (((1 + 2) * NUM2) - 4). >> Hint: Missing FROM -run_misc.at-13127-prog.cob:21.29-21.30: +run_misc.at-13144-prog.cob:21.29-21.30: 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 19 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 20 78 DIV1 VALUE 100 / 3. @@ -6267,7 +6349,7 @@ run_misc.at-13127-prog.cob:21.29-21.30: 23 01 CON4 CONSTANT AS 3.1416 + CON3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:21.33-21.34: +run_misc.at-13144-prog.cob:21.33-21.34: 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 19 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 20 78 DIV1 VALUE 100 / 3. @@ -6277,7 +6359,7 @@ run_misc.at-13127-prog.cob:21.33-21.34: 23 01 CON4 CONSTANT AS 3.1416 + CON3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:21.36-21.37: +run_misc.at-13144-prog.cob:21.36-21.37: 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 19 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 20 78 DIV1 VALUE 100 / 3. @@ -6287,7 +6369,7 @@ run_misc.at-13127-prog.cob:21.36-21.37: 23 01 CON4 CONSTANT AS 3.1416 + CON3. >> Error: Invalid syntax -run_misc.at-13127-prog.cob:21.36: +run_misc.at-13144-prog.cob:21.36: 18 78 HUN VALUE 10 * (10 + LENGTH OF PICX) + 12.35-2+3. 19 78 HUN2 VALUE HUN * (10 + LENGTH OF PICX) -4. 20 78 DIV1 VALUE 100 / 3. @@ -6297,23 +6379,23 @@ run_misc.at-13127-prog.cob:21.36: 23 01 CON4 CONSTANT AS 3.1416 + CON3. >> Hint: Missing FROM -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13174:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13228:0 -run_misc.at-13228-reference:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13191:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13245:0 +run_misc.at-13245-reference:1.6-1.7: 1 > This is sent to PRINTER PIPE. ---- ^ 2 This is also sent to PRINTER PIPE. 3 This is sent to PRINTER PRINT >> Error: Unexpected indicator: `s' -run_misc.at-13228-reference:1.8-1.12: +run_misc.at-13245-reference:1.8-1.12: 1 > This is sent to PRINTER PIPE. ---- ^^^^ 2 This is also sent to PRINTER PIPE. 3 This is sent to PRINTER PRINT >> Error: Invalid syntax -run_misc.at-13228-reference:2.6-2.7: +run_misc.at-13245-reference:2.6-2.7: 1 This is sent to PRINTER PIPE. 2 > This is also sent to PRINTER PIPE. ---- ^ @@ -6321,7 +6403,7 @@ run_misc.at-13228-reference:2.6-2.7: 4 This is also sent to PRINTER PRINT >> Error: Unexpected indicator: `s' -run_misc.at-13228-reference:3.6-3.7: +run_misc.at-13245-reference:3.6-3.7: 1 This is sent to PRINTER PIPE. 2 This is also sent to PRINTER PIPE. 3 > This is sent to PRINTER PRINT @@ -6329,7 +6411,7 @@ run_misc.at-13228-reference:3.6-3.7: 4 This is also sent to PRINTER PRINT >> Error: Unexpected indicator: `s' -run_misc.at-13228-reference:4.6-4.7: +run_misc.at-13245-reference:4.6-4.7: 1 This is sent to PRINTER PIPE. 2 This is also sent to PRINTER PIPE. 3 This is sent to PRINTER PRINT @@ -6337,11 +6419,11 @@ run_misc.at-13228-reference:4.6-4.7: ---- ^ >> Error: Unexpected indicator: `s' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13389:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13590:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13663:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13722:0 -run_misc.at-13722-prog.cob:22.47: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13406:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13607:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13680:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13739:0 +run_misc.at-13739-prog.cob:22.47: 19 compute doubleValue = doubleValue * 2 20 ON SIZE ERROR 21 display 'SIZE ERROR raised' @@ -6351,7 +6433,7 @@ run_misc.at-13722-prog.cob:22.47: 24 display 'SIZE ERROR, last value = ' doubleValue >> Hint: Missing END_PERFORM . -run_misc.at-13722-prog.cob:22.48-22.52: +run_misc.at-13739-prog.cob:22.48-22.52: 19 compute doubleValue = doubleValue * 2 20 ON SIZE ERROR 21 display 'SIZE ERROR raised' @@ -6361,7 +6443,7 @@ run_misc.at-13722-prog.cob:22.48-22.52: 24 display 'SIZE ERROR, last value = ' doubleValue >> Error: Invalid syntax -run_misc.at-13722-prog.cob:22.59: +run_misc.at-13739-prog.cob:22.59: 19 compute doubleValue = doubleValue * 2 20 ON SIZE ERROR 21 display 'SIZE ERROR raised' @@ -6371,7 +6453,7 @@ run_misc.at-13722-prog.cob:22.59: 24 display 'SIZE ERROR, last value = ' doubleValue >> Hint: Missing . -run_misc.at-13722-prog.cob:23.22-23.33: +run_misc.at-13739-prog.cob:23.22-23.33: 20 ON SIZE ERROR 21 display 'SIZE ERROR raised' 22 with no advancing upon syserr @@ -6381,7 +6463,7 @@ run_misc.at-13722-prog.cob:23.22-23.33: 25 upon sysout >> Warning: Invalid syntax -run_misc.at-13722-prog.cob:28.15-28.32: +run_misc.at-13739-prog.cob:28.15-28.32: 25 upon sysout 26 end-display 27 exit perform @@ -6391,7 +6473,7 @@ run_misc.at-13722-prog.cob:28.15-28.32: 30 move doubleValue to lastdoubleValue >> Error: Invalid syntax -run_misc.at-13722-prog.cob:38.14-38.25: +run_misc.at-13739-prog.cob:38.14-38.25: 35 end-display 36 exit perform 37 end-if @@ -6401,18 +6483,18 @@ run_misc.at-13722-prog.cob:38.14-38.25: 40 if not (counter >= 1023 and <=1025) >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13768:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13799:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13880:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13943:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14022:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14053:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14089:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14174:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14173:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14278:0 -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14347:0 -run_misc.at-14347-prog.c:5.6-5.7: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13785:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13816:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13897:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:13960:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14039:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14070:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14104:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14191:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14190:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14295:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14358:0 +run_misc.at-14358-prog.c:5.6-5.7: 2 #include 3 #include 4 @@ -6422,7 +6504,7 @@ run_misc.at-14347-prog.c:5.6-5.7: 7 struct verify_t { >> Error: Unexpected indicator: `e' -run_misc.at-14347-prog.c:5.8-5.16: +run_misc.at-14358-prog.c:5.8-5.16: 2 #include 3 #include 4 @@ -6432,7 +6514,7 @@ run_misc.at-14347-prog.c:5.8-5.16: 7 struct verify_t { >> Error: Invalid syntax -run_misc.at-14347-prog.c:9.6-9.7: +run_misc.at-14358-prog.c:9.6-9.7: 6 7 struct verify_t { 8 char *prog, *packver_prog; @@ -6442,7 +6524,7 @@ run_misc.at-14347-prog.c:9.6-9.7: 11 #include "testdata.h" >> Error: Unexpected indicator: `p' -run_misc.at-14347-prog.c:10.6-10.7: +run_misc.at-14358-prog.c:10.6-10.7: 7 struct verify_t { 8 char *prog, *packver_prog; 9 int patchlev_prog; @@ -6452,7 +6534,7 @@ run_misc.at-14347-prog.c:10.6-10.7: 12 }; >> Error: Unexpected indicator: `f' -run_misc.at-14347-prog.c:15.6-15.7: +run_misc.at-14358-prog.c:15.6-15.7: 12 }; 13 14 int @@ -6462,7 +6544,7 @@ run_misc.at-14347-prog.c:15.6-15.7: 17 struct verify_t *p; >> Error: Unexpected indicator: `n' -run_misc.at-14347-prog.c:17.6-17.7: +run_misc.at-14358-prog.c:17.6-17.7: 14 int 15 main(int argc, char *argv[]) 16 { @@ -6472,7 +6554,7 @@ run_misc.at-14347-prog.c:17.6-17.7: 19 cob_check_version(p->prog, p->packver_prog, p->patchlev_prog); >> Error: Unexpected indicator: `c' -run_misc.at-14347-prog.c:19.6-19.7: +run_misc.at-14358-prog.c:19.6-19.7: 16 { 17 struct verify_t *p; 18 for( p=verify; p < verify + COUNT_OF(verify); p++ ) { @@ -6482,7 +6564,7 @@ run_misc.at-14347-prog.c:19.6-19.7: 21 return 0; >> Error: Unexpected indicator: `b' -run_misc.at-14347-prog.c:21.6-21.7: +run_misc.at-14358-prog.c:21.6-21.7: 18 for( p=verify; p < verify + COUNT_OF(verify); p++ ) { 19 cob_check_version(p->prog, p->packver_prog, p->patchlev_prog); 20 } @@ -6491,8 +6573,8 @@ run_misc.at-14347-prog.c:21.6-21.7: 22 } >> Error: Unexpected indicator: `r' -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14426:0 -run_misc.at-14426-prog.cob:8.24: +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14443:0 +run_misc.at-14443-prog.cob:8.24: 5 WORKING-STORAGE SECTION. 6 01 n pic 99 value 89. 7 01 m pic 99 value 0. @@ -6502,7 +6584,7 @@ run_misc.at-14426-prog.cob:8.24: 10 88 a-two value 2. >> Hint: Missing -run_misc.at-14426-prog.cob:8.25-8.35: +run_misc.at-14443-prog.cob:8.25-8.35: 5 WORKING-STORAGE SECTION. 6 01 n pic 99 value 89. 7 01 m pic 99 value 0. @@ -6512,4 +6594,169 @@ run_misc.at-14426-prog.cob:8.25-8.35: 10 88 a-two value 2. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14543:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14560:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14647:0 +run_misc.at-14647-prog.cob:22.7-23.58: + 19 IF X + Y + 42.1 <> 0 + 20 DISPLAY "OK" WITH NO ADVANCING. + 21 STOP RUN. + 22 > COPY prog REPLACING ==:PROG-NAME:== BY ==nested_init== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 23 > ==:PROG-KIND:== BY ==INITIAL==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 24 COPY prog REPLACING ==:PROG-NAME:== BY ==nested_noninit== + 25 ==:PROG-KIND:== BY ====. +>> Error: Library `prog' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +run_misc.at-14647-prog.cob:24.7-25.51: + 21 STOP RUN. + 22 COPY prog REPLACING ==:PROG-NAME:== BY ==nested_init== + 23 ==:PROG-KIND:== BY ==INITIAL==. + 24 > COPY prog REPLACING ==:PROG-NAME:== BY ==nested_noninit== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 25 > ==:PROG-KIND:== BY ====. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 26 END PROGRAM prog. + 27 COPY prog REPLACING ==:PROG-NAME:== BY ==nonnested_init== +>> Error: Library `prog' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +run_misc.at-14647-prog.cob:27.7-28.58: + 24 COPY prog REPLACING ==:PROG-NAME:== BY ==nested_noninit== + 25 ==:PROG-KIND:== BY ====. + 26 END PROGRAM prog. + 27 > COPY prog REPLACING ==:PROG-NAME:== BY ==nonnested_init== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 28 > ==:PROG-KIND:== BY ==INITIAL==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 29 COPY prog REPLACING ==:PROG-NAME:== BY ==nonnested_noninit== + 30 ==:PROG-KIND:== BY ====. +>> Error: Library `prog' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +run_misc.at-14647-prog.cob:29.7-30.51: + 26 END PROGRAM prog. + 27 COPY prog REPLACING ==:PROG-NAME:== BY ==nonnested_init== + 28 ==:PROG-KIND:== BY ==INITIAL==. + 29 > COPY prog REPLACING ==:PROG-NAME:== BY ==nonnested_noninit== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 30 > ==:PROG-KIND:== BY ====. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `prog' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14677:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14735:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14767:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14801:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14845:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14918:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:14939:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:15001:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:15002:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:15075:0 +Considering: import/gnucobol/tests/testsuite.src/run_misc.at:15074:0 +run_misc.at-15074-caller.c:5.6-5.7: + 2 #include + 3 #include + 4 + 5 > #ifndef NULL +---- ^ + 6 #define NULL (void*)0 + 7 #endif +>> Error: Unexpected indicator: `f' + +run_misc.at-15074-caller.c:5.8-5.12: + 2 #include + 3 #include + 4 + 5 > #ifndef NULL +---- ^^^^ + 6 #define NULL (void*)0 + 7 #endif +>> Error: Invalid syntax + +run_misc.at-15074-caller.c:6.6-6.7: + 3 #include + 4 + 5 #ifndef NULL + 6 > #define NULL (void*)0 +---- ^ + 7 #endif + 8 +>> Error: Unexpected indicator: `e' + +run_misc.at-15074-caller.c:10.6-10.7: + 7 #endif + 8 + 9 int + 10 > main (int argc, char **argv) +---- ^ + 11 { + 12 int i; +>> Error: Unexpected indicator: `i' + +run_misc.at-15074-caller.c:14.6-14.7: + 11 { + 12 int i; + 13 + 14 > /* portable version from libcob */ +---- ^ + 15 (void)cob_unsetenv("COB_IS_RUNNING_IN_TESTMODE"); + 16 +>> Error: Unexpected indicator: `p' + +run_misc.at-15074-caller.c:15.6-15.7: + 12 int i; + 13 + 14 /* portable version from libcob */ + 15 > (void)cob_unsetenv("COB_IS_RUNNING_IN_TESTMODE"); +---- ^ + 16 + 17 cob_init (argc, argv); +>> Error: Unexpected indicator: `i' + +run_misc.at-15074-caller.c:17.6-17.7: + 14 /* portable version from libcob */ + 15 (void)cob_unsetenv("COB_IS_RUNNING_IN_TESTMODE"); + 16 + 17 > cob_init (argc, argv); +---- ^ + 18 + 19 for (i = 0; i < 300; ++i) { +>> Error: Unexpected indicator: `_' + +run_misc.at-15074-caller.c:20.6-20.7: + 17 cob_init (argc, argv); + 18 + 19 for (i = 0; i < 300; ++i) { + 20 > cob_call ("callee", 0, NULL); +---- ^ + 21 } + 22 +>> Error: Unexpected indicator: `c' + +run_misc.at-15074-caller.c:23.6-23.7: + 20 cob_call ("callee", 0, NULL); + 21 } + 22 + 23 > cob_tidy (); +---- ^ + 24 + 25 return 0; +>> Error: Unexpected indicator: `_' + +run_misc.at-15074-caller.c:25.6-25.7: + 22 + 23 cob_tidy (); + 24 + 25 > return 0; +---- ^ + 26 } +>> Error: Unexpected indicator: `u' + diff --git a/test/output-tests/run_reportwriter.expected b/test/output-tests/run_reportwriter.expected index fc4c6c57d..5312f0ab5 100644 --- a/test/output-tests/run_reportwriter.expected +++ b/test/output-tests/run_reportwriter.expected @@ -7064,32 +7064,32 @@ run_reportwriter.at-3787-reference:62.6-62.7: 64 >> Error: Unexpected indicator: `J' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:3900:0 -run_reportwriter.at-3900-inp_data:1.7-1.17: - 1 > 01Data Processing 02000500012388 +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:3901:0 +run_reportwriter.at-3901-inp_data:1.7-1.17: + 1 > 01Data Processing 020005000123880 ---- ^^^^^^^^^^ - 2 02Cow Milking 02000600054398 - 3 03Grass Cutting 03000600054397 + 2 02Cow Milking 020006000543980 + 3 03Grass Cutting 030006000543970 >> Error: Invalid syntax -run_reportwriter.at-3900-inp_data:2.6-2.7: - 1 01Data Processing 02000500012388 - 2 > 02Cow Milking 02000600054398 +run_reportwriter.at-3901-inp_data:2.6-2.7: + 1 01Data Processing 020005000123880 + 2 > 02Cow Milking 020006000543980 ---- ^ - 3 03Grass Cutting 03000600054397 - 4 03Lawn mowing 03000600054397 + 3 03Grass Cutting 030006000543970 + 4 03Lawn mowing 030006000543970 >> Error: Unexpected indicator: `M' -run_reportwriter.at-3900-inp_data:3.6-3.7: - 1 01Data Processing 02000500012388 - 2 02Cow Milking 02000600054398 - 3 > 03Grass Cutting 03000600054397 +run_reportwriter.at-3901-inp_data:3.6-3.7: + 1 01Data Processing 020005000123880 + 2 02Cow Milking 020006000543980 + 3 > 03Grass Cutting 030006000543970 ---- ^ - 4 03Lawn mowing 03000600054397 + 4 03Lawn mowing 030006000543970 >> Error: Unexpected indicator: `s' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:3896:0 -run_reportwriter.at-3896-prog.cob:8.37-8.45: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:3897:0 +run_reportwriter.at-3897-prog.cob:8.37-8.45: 5 CONFIGURATION SECTION. 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. @@ -7099,7 +7099,7 @@ run_reportwriter.at-3896-prog.cob:8.37-8.45: 10 SELECT REPORT-FILE ASSIGN TO EXTERNAL >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-3896-prog.cob:10.40-10.48: +run_reportwriter.at-3897-prog.cob:10.40-10.48: 7 FILE-CONTROL. 8 SELECT INV-FILE ASSIGN TO EXTERNAL INVFILE 9 ORGANIZATION IS LINE SEQUENTIAL. @@ -7109,7 +7109,7 @@ run_reportwriter.at-3896-prog.cob:10.40-10.48: 12 >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-3896-prog.cob:11.30-11.34: +run_reportwriter.at-3897-prog.cob:11.30-11.34: 8 SELECT INV-FILE ASSIGN TO EXTERNAL INVFILE 9 ORGANIZATION IS LINE SEQUENTIAL. 10 SELECT REPORT-FILE ASSIGN TO EXTERNAL @@ -7119,7 +7119,7 @@ run_reportwriter.at-3896-prog.cob:11.30-11.34: 13 DATA DIVISION. >> Error: Invalid syntax -run_reportwriter.at-3896-prog.cob:11.34: +run_reportwriter.at-3897-prog.cob:11.34: 8 SELECT INV-FILE ASSIGN TO EXTERNAL INVFILE 9 ORGANIZATION IS LINE SEQUENTIAL. 10 SELECT REPORT-FILE ASSIGN TO EXTERNAL @@ -7129,7 +7129,7 @@ run_reportwriter.at-3896-prog.cob:11.34: 13 DATA DIVISION. >> Hint: Missing SEQUENTIAL -run_reportwriter.at-3896-prog.cob:11.35-11.44: +run_reportwriter.at-3897-prog.cob:11.35-11.44: 8 SELECT INV-FILE ASSIGN TO EXTERNAL INVFILE 9 ORGANIZATION IS LINE SEQUENTIAL. 10 SELECT REPORT-FILE ASSIGN TO EXTERNAL @@ -7139,8 +7139,8 @@ run_reportwriter.at-3896-prog.cob:11.35-11.44: 13 DATA DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:3980:0 -run_reportwriter.at-3980-reference:2.49-2.58: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:3981:0 +run_reportwriter.at-3981-reference:2.49-2.58: 1 2 > INVENTORY REPORT ---- ^^^^^^^^^ @@ -7148,7 +7148,7 @@ run_reportwriter.at-3980-reference:2.49-2.58: 4 >> Error: Invalid syntax -run_reportwriter.at-3980-reference:5.6-5.7: +run_reportwriter.at-3981-reference:5.6-5.7: 2 INVENTORY REPORT 3 4 @@ -7158,7 +7158,7 @@ run_reportwriter.at-3980-reference:5.6-5.7: 7 >> Error: Unexpected indicator: `T' -run_reportwriter.at-3980-reference:15.6-15.7: +run_reportwriter.at-3981-reference:15.6-15.7: 12 13 1,238.80 14 @@ -7168,7 +7168,7 @@ run_reportwriter.at-3980-reference:15.6-15.7: 17 >> Error: Unexpected indicator: `T' -run_reportwriter.at-3980-reference:35.6-35.7: +run_reportwriter.at-3981-reference:35.6-35.7: 32 33 5,439.80 34 @@ -7178,8 +7178,8 @@ run_reportwriter.at-3980-reference:35.6-35.7: 37 >> Error: Unexpected indicator: `T' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4054:0 -run_reportwriter.at-4054-prog.cob:10.21-10.29: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4055:0 +run_reportwriter.at-4055-prog.cob:10.21-10.29: 7 FILE-CONTROL. 8 SELECT REPORT-FILE 9 LINE SEQUENTIAL @@ -7189,22 +7189,22 @@ run_reportwriter.at-4054-prog.cob:10.21-10.29: 12 FILE SECTION. >> Warning: Ignored EXTERNAL (implementation pending) -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4108:0 -run_reportwriter.at-4108-reference:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4109:0 +run_reportwriter.at-4109-reference:1.6-1.7: 1 > HEADING SAVE-ITEM ---- ^ 2 A 1st Detail 3 FOOTING SAVE-ITEM >> Error: Unexpected indicator: `G' -run_reportwriter.at-4108-reference:1.8-1.17: +run_reportwriter.at-4109-reference:1.8-1.17: 1 > HEADING SAVE-ITEM ---- ^^^^^^^^^ 2 A 1st Detail 3 FOOTING SAVE-ITEM >> Error: Invalid syntax -run_reportwriter.at-4108-reference:3.6-3.7: +run_reportwriter.at-4109-reference:3.6-3.7: 1 HEADING SAVE-ITEM 2 A 1st Detail 3 > FOOTING SAVE-ITEM @@ -7213,7 +7213,7 @@ run_reportwriter.at-4108-reference:3.6-3.7: 5 >> Error: Unexpected indicator: `F' -run_reportwriter.at-4108-reference:16.6-16.7: +run_reportwriter.at-4109-reference:16.6-16.7: 13 14 15 @@ -7223,7 +7223,7 @@ run_reportwriter.at-4108-reference:16.6-16.7: 18 B 2nd Detail >> Error: Unexpected indicator: `G' -run_reportwriter.at-4108-reference:21.6-21.7: +run_reportwriter.at-4109-reference:21.6-21.7: 18 B 2nd Detail 19 B 3rd Detail 1 20 B 3rd Detail 2 @@ -7233,7 +7233,7 @@ run_reportwriter.at-4108-reference:21.6-21.7: 23 >> Error: Unexpected indicator: `F' -run_reportwriter.at-4108-reference:31.6-31.7: +run_reportwriter.at-4109-reference:31.6-31.7: 28 29 30 @@ -7243,7 +7243,7 @@ run_reportwriter.at-4108-reference:31.6-31.7: 33 C 3rd Detail 2 >> Error: Unexpected indicator: `G' -run_reportwriter.at-4108-reference:34.6-34.7: +run_reportwriter.at-4109-reference:34.6-34.7: 31 HEADING SAVE-ITEM 32 C 3rd Detail 1 33 C 3rd Detail 2 @@ -7253,8 +7253,8 @@ run_reportwriter.at-4108-reference:34.6-34.7: 36 >> Error: Unexpected indicator: `F' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4193:0 -run_reportwriter.at-4193-prog.cob:8.34-8.42: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4194:0 +run_reportwriter.at-4194-prog.cob:8.34-8.42: 5 ENVIRONMENT DIVISION. 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. @@ -7264,15 +7264,15 @@ run_reportwriter.at-4193-prog.cob:8.34-8.42: 10 >> Warning: Ignored EXTERNAL (implementation pending) -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4212:0 -run_reportwriter.at-4212-reference:1.9-1.10: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4213:0 +run_reportwriter.at-4213-reference:1.9-1.10: 1 > 1 2 3 4 5 ---- ^ 2 12345678901234567890123456789012345678901234567890 3 >> Error: Invalid syntax -run_reportwriter.at-4212-reference:2.6-2.7: +run_reportwriter.at-4213-reference:2.6-2.7: 1 1 2 3 4 5 2 > 12345678901234567890123456789012345678901234567890 ---- ^ @@ -7280,7 +7280,7 @@ run_reportwriter.at-4212-reference:2.6-2.7: 4 100 100 100 <1> >> Error: Unexpected indicator: `7' -run_reportwriter.at-4212-reference:5.6-5.7: +run_reportwriter.at-4213-reference:5.6-5.7: 2 12345678901234567890123456789012345678901234567890 3 4 100 100 100 <1> @@ -7290,8 +7290,8 @@ run_reportwriter.at-4212-reference:5.6-5.7: 7 400 401 402 403 <4> >> Error: Unexpected indicator: `T' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4405:0 -run_reportwriter.at-4405-progl.cob:8.34-8.42: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4406:0 +run_reportwriter.at-4406-progl.cob:8.34-8.42: 5 ENVIRONMENT DIVISION. 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. @@ -7301,7 +7301,7 @@ run_reportwriter.at-4405-progl.cob:8.34-8.42: 10 >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-4405-progl.cob:23.18: +run_reportwriter.at-4406-progl.cob:23.18: 20 21 REPORT SECTION. 22 RD RP @@ -7311,7 +7311,7 @@ run_reportwriter.at-4405-progl.cob:23.18: 25 50 COLUMNS *> literal >> Hint: Missing -run_reportwriter.at-4405-progl.cob:23.19-23.27: +run_reportwriter.at-4406-progl.cob:23.19-23.27: 20 21 REPORT SECTION. 22 RD RP @@ -7321,8 +7321,8 @@ run_reportwriter.at-4405-progl.cob:23.19-23.27: 25 50 COLUMNS *> literal >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4310:0 -run_reportwriter.at-4310-progv.cob:8.34-8.42: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4311:0 +run_reportwriter.at-4311-progv.cob:8.34-8.42: 5 ENVIRONMENT DIVISION. 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. @@ -7332,7 +7332,7 @@ run_reportwriter.at-4310-progv.cob:8.34-8.42: 10 >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-4310-progv.cob:27.22-27.28: +run_reportwriter.at-4311-progv.cob:27.22-27.28: 24 RD RP 25 CODE IS MYCODE *> variable 26 PAGE LIMIT 10 LINES @@ -7342,15 +7342,15 @@ run_reportwriter.at-4310-progv.cob:27.22-27.28: 29 FIRST DETAIL 4. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4429:0 -run_reportwriter.at-4429-reference:1.15-1.16: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4430:0 +run_reportwriter.at-4430-reference:1.15-1.16: 1 > Hi-Q: 1 2 3 4 5 ---- ^ 2 Hi-Q: 1 2 3 4 5 3 Hi-Q: >> Error: Invalid syntax -run_reportwriter.at-4429-reference:4.6-4.7: +run_reportwriter.at-4430-reference:4.6-4.7: 1 Hi-Q: 1 2 3 4 5 2 Hi-Q: 1 2 3 4 5 3 Hi-Q: @@ -7360,7 +7360,7 @@ run_reportwriter.at-4429-reference:4.6-4.7: 6 Hi-Q: 200 200 200 200 <3> >> Error: Unexpected indicator: `1' -run_reportwriter.at-4429-reference:5.6-5.7: +run_reportwriter.at-4430-reference:5.6-5.7: 2 Hi-Q: 1 2 3 4 5 3 Hi-Q: 4 Hi-Q: 100 100 100 <1> @@ -7370,7 +7370,7 @@ run_reportwriter.at-4429-reference:5.6-5.7: 7 Hi-Q: 400 401 402 403 <4> >> Error: Unexpected indicator: `T' -run_reportwriter.at-4429-reference:6.6-6.7: +run_reportwriter.at-4430-reference:6.6-6.7: 3 Hi-Q: 4 Hi-Q: 100 100 100 <1> 5 Hi-Q: Tag1 *Tag2 **Tag1 *Tag2 **Tag1 *Tag2 ** @@ -7380,7 +7380,7 @@ run_reportwriter.at-4429-reference:6.6-6.7: 8 Hi-Q: >> Error: Unexpected indicator: `2' -run_reportwriter.at-4429-reference:7.6-7.7: +run_reportwriter.at-4430-reference:7.6-7.7: 4 Hi-Q: 100 100 100 <1> 5 Hi-Q: Tag1 *Tag2 **Tag1 *Tag2 **Tag1 *Tag2 ** 6 Hi-Q: 200 200 200 200 <3> @@ -7390,8 +7390,8 @@ run_reportwriter.at-4429-reference:7.6-7.7: 9 Hi-Q: >> Error: Unexpected indicator: `4' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4553:0 -run_reportwriter.at-4553-prog.cob:8.34-8.42: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4554:0 +run_reportwriter.at-4554-prog.cob:8.34-8.42: 5 ENVIRONMENT DIVISION. 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. @@ -7401,7 +7401,7 @@ run_reportwriter.at-4553-prog.cob:8.34-8.42: 10 >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-4553-prog.cob:35.18: +run_reportwriter.at-4554-prog.cob:35.18: 32 33 REPORT SECTION. 34 RD RP @@ -7411,7 +7411,7 @@ run_reportwriter.at-4553-prog.cob:35.18: 37 50 COLUMNS >> Hint: Missing -run_reportwriter.at-4553-prog.cob:35.19-35.27: +run_reportwriter.at-4554-prog.cob:35.19-35.27: 32 33 REPORT SECTION. 34 RD RP @@ -7421,15 +7421,15 @@ run_reportwriter.at-4553-prog.cob:35.19-35.27: 37 50 COLUMNS >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4575:0 -run_reportwriter.at-4575-reference:1.15-1.16: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4576:0 +run_reportwriter.at-4576-reference:1.15-1.16: 1 > Hi-Q: 1 2 3 4 5 ---- ^ 2 Hi-Q: 12345678901234567890123456789012345678901234567890 3 Hi-Q: >> Error: Invalid syntax -run_reportwriter.at-4575-reference:2.6-2.7: +run_reportwriter.at-4576-reference:2.6-2.7: 1 Hi-Q: 1 2 3 4 5 2 > Hi-Q: 12345678901234567890123456789012345678901234567890 ---- ^ @@ -7437,7 +7437,7 @@ run_reportwriter.at-4575-reference:2.6-2.7: 4 Hi-Q: 100 100 100 <1> >> Error: Unexpected indicator: `1' -run_reportwriter.at-4575-reference:4.6-4.7: +run_reportwriter.at-4576-reference:4.6-4.7: 1 Hi-Q: 1 2 3 4 5 2 Hi-Q: 12345678901234567890123456789012345678901234567890 3 Hi-Q: @@ -7447,7 +7447,7 @@ run_reportwriter.at-4575-reference:4.6-4.7: 6 Hi-Q: 200 200 200 200 <3> >> Error: Unexpected indicator: `1' -run_reportwriter.at-4575-reference:5.6-5.7: +run_reportwriter.at-4576-reference:5.6-5.7: 2 Hi-Q: 12345678901234567890123456789012345678901234567890 3 Hi-Q: 4 Hi-Q: 100 100 100 <1> @@ -7457,7 +7457,7 @@ run_reportwriter.at-4575-reference:5.6-5.7: 7 Hi-Q: 400 401402403 <4> >> Error: Unexpected indicator: `T' -run_reportwriter.at-4575-reference:6.6-6.7: +run_reportwriter.at-4576-reference:6.6-6.7: 3 Hi-Q: 4 Hi-Q: 100 100 100 <1> 5 Hi-Q: Tag1 *Tag2 **Tag1 _Tag2 **Tag1 *Tag2 ** <2> @@ -7467,7 +7467,7 @@ run_reportwriter.at-4575-reference:6.6-6.7: 8 Hi-Q: >> Error: Unexpected indicator: `2' -run_reportwriter.at-4575-reference:7.6-7.7: +run_reportwriter.at-4576-reference:7.6-7.7: 4 Hi-Q: 100 100 100 <1> 5 Hi-Q: Tag1 *Tag2 **Tag1 _Tag2 **Tag1 *Tag2 ** <2> 6 Hi-Q: 200 200 200 200 <3> @@ -7477,8 +7477,8 @@ run_reportwriter.at-4575-reference:7.6-7.7: 9 Hi-Q: >> Error: Unexpected indicator: `4' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4626:0 -run_reportwriter.at-4626-prog.cob:8.33-8.41: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4627:0 +run_reportwriter.at-4627-prog.cob:8.33-8.41: 5 ENVIRONMENT DIVISION. 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. @@ -7488,23 +7488,23 @@ run_reportwriter.at-4626-prog.cob:8.33-8.41: 10 >> Warning: Ignored EXTERNAL (implementation pending) -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4641:0 -run_reportwriter.at-4641-reference:1.30-1.31: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4642:0 +run_reportwriter.at-4642-reference:1.30-1.31: 1 > hello <---> ---- ^ 2 goodbye <---> 3 >> Error: Invalid syntax -run_reportwriter.at-4641-reference:2.6-2.7: +run_reportwriter.at-4642-reference:2.6-2.7: 1 hello <---> 2 > goodbye <---> ---- ^ 3 >> Error: Unexpected indicator: `e' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4689:0 -run_reportwriter.at-4689-prog.cob:8.33-8.41: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4690:0 +run_reportwriter.at-4690-prog.cob:8.33-8.41: 5 ENVIRONMENT DIVISION. 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. @@ -7514,9 +7514,9 @@ run_reportwriter.at-4689-prog.cob:8.33-8.41: 10 >> Warning: Ignored EXTERNAL (implementation pending) -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4701:0 -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4743:0 -run_reportwriter.at-4743-prog.cob:8.33-8.41: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4702:0 +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4744:0 +run_reportwriter.at-4744-prog.cob:8.33-8.41: 5 ENVIRONMENT DIVISION. 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. @@ -7526,23 +7526,23 @@ run_reportwriter.at-4743-prog.cob:8.33-8.41: 10 >> Warning: Ignored EXTERNAL (implementation pending) -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4755:0 -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:5051:0 -run_reportwriter.at-5051-inp_data:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:4756:0 +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:5052:0 +run_reportwriter.at-5052-inp_data:1.6-1.7: 1 > MW1000051IN15021220150212OR150212043ITEM_NUMBER_22 0000002800002999 ---- ^ 2 MW1000051IN15022220150222OR150226020ITEM_NUMBER_06 0000004300000999 3 MW1000071IN15021420150214OR150212057ITEM_NUMBER_51 0000007000005999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:1.7-1.50: +run_reportwriter.at-5052-inp_data:1.7-1.50: 1 > MW1000051IN15021220150212OR150212043ITEM_NUMBER_22 0000002800002999 ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 2 MW1000051IN15022220150222OR150226020ITEM_NUMBER_06 0000004300000999 3 MW1000071IN15021420150214OR150212057ITEM_NUMBER_51 0000007000005999 >> Error: Invalid syntax -run_reportwriter.at-5051-inp_data:2.6-2.7: +run_reportwriter.at-5052-inp_data:2.6-2.7: 1 MW1000051IN15021220150212OR150212043ITEM_NUMBER_22 0000002800002999 2 > MW1000051IN15022220150222OR150226020ITEM_NUMBER_06 0000004300000999 ---- ^ @@ -7550,7 +7550,7 @@ run_reportwriter.at-5051-inp_data:2.6-2.7: 4 MW1000071IN15022820150228OR150225098ITEM_NUMBER_92 0000001400009999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:3.6-3.7: +run_reportwriter.at-5052-inp_data:3.6-3.7: 1 MW1000051IN15021220150212OR150212043ITEM_NUMBER_22 0000002800002999 2 MW1000051IN15022220150222OR150226020ITEM_NUMBER_06 0000004300000999 3 > MW1000071IN15021420150214OR150212057ITEM_NUMBER_51 0000007000005999 @@ -7559,7 +7559,7 @@ run_reportwriter.at-5051-inp_data:3.6-3.7: 5 MW1000201IN15020920150209OR150216083ITEM_NUMBER_77 0000007700007999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:4.6-4.7: +run_reportwriter.at-5052-inp_data:4.6-4.7: 1 MW1000051IN15021220150212OR150212043ITEM_NUMBER_22 0000002800002999 2 MW1000051IN15022220150222OR150226020ITEM_NUMBER_06 0000004300000999 3 MW1000071IN15021420150214OR150212057ITEM_NUMBER_51 0000007000005999 @@ -7569,7 +7569,7 @@ run_reportwriter.at-5051-inp_data:4.6-4.7: 6 MW1000201IN15022720150227OR150223079ITEM_NUMBER_20 0000009600002999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:5.6-5.7: +run_reportwriter.at-5052-inp_data:5.6-5.7: 2 MW1000051IN15022220150222OR150226020ITEM_NUMBER_06 0000004300000999 3 MW1000071IN15021420150214OR150212057ITEM_NUMBER_51 0000007000005999 4 MW1000071IN15022820150228OR150225098ITEM_NUMBER_92 0000001400009999 @@ -7579,7 +7579,7 @@ run_reportwriter.at-5051-inp_data:5.6-5.7: 7 MW1000291IN15021720150217OR150218088ITEM_NUMBER_86 0000001900008999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:6.6-6.7: +run_reportwriter.at-5052-inp_data:6.6-6.7: 3 MW1000071IN15021420150214OR150212057ITEM_NUMBER_51 0000007000005999 4 MW1000071IN15022820150228OR150225098ITEM_NUMBER_92 0000001400009999 5 MW1000201IN15020920150209OR150216083ITEM_NUMBER_77 0000007700007999 @@ -7589,7 +7589,7 @@ run_reportwriter.at-5051-inp_data:6.6-6.7: 8 MW1000411IN15022320150223OR150210063ITEM_NUMBER_66 0000008800006999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:7.6-7.7: +run_reportwriter.at-5052-inp_data:7.6-7.7: 4 MW1000071IN15022820150228OR150225098ITEM_NUMBER_92 0000001400009999 5 MW1000201IN15020920150209OR150216083ITEM_NUMBER_77 0000007700007999 6 MW1000201IN15022720150227OR150223079ITEM_NUMBER_20 0000009600002999 @@ -7599,7 +7599,7 @@ run_reportwriter.at-5051-inp_data:7.6-7.7: 9 MW1000451IN15021720150217OR150202053ITEM_NUMBER_60 0000005100006999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:8.6-8.7: +run_reportwriter.at-5052-inp_data:8.6-8.7: 5 MW1000201IN15020920150209OR150216083ITEM_NUMBER_77 0000007700007999 6 MW1000201IN15022720150227OR150223079ITEM_NUMBER_20 0000009600002999 7 MW1000291IN15021720150217OR150218088ITEM_NUMBER_86 0000001900008999 @@ -7609,7 +7609,7 @@ run_reportwriter.at-5051-inp_data:8.6-8.7: 10 MW1000471IN15022420150224OR150201036ITEM_NUMBER_45 0000003800004999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:9.6-9.7: +run_reportwriter.at-5052-inp_data:9.6-9.7: 6 MW1000201IN15022720150227OR150223079ITEM_NUMBER_20 0000009600002999 7 MW1000291IN15021720150217OR150218088ITEM_NUMBER_86 0000001900008999 8 MW1000411IN15022320150223OR150210063ITEM_NUMBER_66 0000008800006999 @@ -7619,7 +7619,7 @@ run_reportwriter.at-5051-inp_data:9.6-9.7: 11 MW1000831IN15021020150210OR150227042ITEM_NUMBER_70 0000007200007999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:10.6-10.7: +run_reportwriter.at-5052-inp_data:10.6-10.7: 7 MW1000291IN15021720150217OR150218088ITEM_NUMBER_86 0000001900008999 8 MW1000411IN15022320150223OR150210063ITEM_NUMBER_66 0000008800006999 9 MW1000451IN15021720150217OR150202053ITEM_NUMBER_60 0000005100006999 @@ -7629,7 +7629,7 @@ run_reportwriter.at-5051-inp_data:10.6-10.7: 12 MW1000831IN15021420150214OR150228090ITEM_NUMBER_07 0000002300000999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:11.6-11.7: +run_reportwriter.at-5052-inp_data:11.6-11.7: 8 MW1000411IN15022320150223OR150210063ITEM_NUMBER_66 0000008800006999 9 MW1000451IN15021720150217OR150202053ITEM_NUMBER_60 0000005100006999 10 MW1000471IN15022420150224OR150201036ITEM_NUMBER_45 0000003800004999 @@ -7639,7 +7639,7 @@ run_reportwriter.at-5051-inp_data:11.6-11.7: 13 MW1000831IN15022020150220OR150226048ITEM_NUMBER_61 0000005900006999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:12.6-12.7: +run_reportwriter.at-5052-inp_data:12.6-12.7: 9 MW1000451IN15021720150217OR150202053ITEM_NUMBER_60 0000005100006999 10 MW1000471IN15022420150224OR150201036ITEM_NUMBER_45 0000003800004999 11 MW1000831IN15021020150210OR150227042ITEM_NUMBER_70 0000007200007999 @@ -7649,7 +7649,7 @@ run_reportwriter.at-5051-inp_data:12.6-12.7: 14 MW1000891IN15022120150221OR150219018ITEM_NUMBER_72 0000007300007999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:13.6-13.7: +run_reportwriter.at-5052-inp_data:13.6-13.7: 10 MW1000471IN15022420150224OR150201036ITEM_NUMBER_45 0000003800004999 11 MW1000831IN15021020150210OR150227042ITEM_NUMBER_70 0000007200007999 12 MW1000831IN15021420150214OR150228090ITEM_NUMBER_07 0000002300000999 @@ -7659,7 +7659,7 @@ run_reportwriter.at-5051-inp_data:13.6-13.7: 15 MW1000891IN15022320150223OR150227069ITEM_NUMBER_73 0000007400007999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:14.6-14.7: +run_reportwriter.at-5052-inp_data:14.6-14.7: 11 MW1000831IN15021020150210OR150227042ITEM_NUMBER_70 0000007200007999 12 MW1000831IN15021420150214OR150228090ITEM_NUMBER_07 0000002300000999 13 MW1000831IN15022020150220OR150226048ITEM_NUMBER_61 0000005900006999 @@ -7669,7 +7669,7 @@ run_reportwriter.at-5051-inp_data:14.6-14.7: 16 NE1000001IN15021020150210OR150217060ITEM_NUMBER_38 0000009800003999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:15.6-15.7: +run_reportwriter.at-5052-inp_data:15.6-15.7: 12 MW1000831IN15021420150214OR150228090ITEM_NUMBER_07 0000002300000999 13 MW1000831IN15022020150220OR150226048ITEM_NUMBER_61 0000005900006999 14 MW1000891IN15022120150221OR150219018ITEM_NUMBER_72 0000007300007999 @@ -7679,7 +7679,7 @@ run_reportwriter.at-5051-inp_data:15.6-15.7: 17 NE1000201IN15021920150219OR150209035ITEM_NUMBER_94 0000009600009999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:16.6-16.7: +run_reportwriter.at-5052-inp_data:16.6-16.7: 13 MW1000831IN15022020150220OR150226048ITEM_NUMBER_61 0000005900006999 14 MW1000891IN15022120150221OR150219018ITEM_NUMBER_72 0000007300007999 15 MW1000891IN15022320150223OR150227069ITEM_NUMBER_73 0000007400007999 @@ -7689,7 +7689,7 @@ run_reportwriter.at-5051-inp_data:16.6-16.7: 18 NE1000431IN15021520150215OR150227047ITEM_NUMBER_64 0000008700006999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:17.6-17.7: +run_reportwriter.at-5052-inp_data:17.6-17.7: 14 MW1000891IN15022120150221OR150219018ITEM_NUMBER_72 0000007300007999 15 MW1000891IN15022320150223OR150227069ITEM_NUMBER_73 0000007400007999 16 NE1000001IN15021020150210OR150217060ITEM_NUMBER_38 0000009800003999 @@ -7699,7 +7699,7 @@ run_reportwriter.at-5051-inp_data:17.6-17.7: 19 NE1000431IN15022220150222OR150213062ITEM_NUMBER_97 0000007300009999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:18.6-18.7: +run_reportwriter.at-5052-inp_data:18.6-18.7: 15 MW1000891IN15022320150223OR150227069ITEM_NUMBER_73 0000007400007999 16 NE1000001IN15021020150210OR150217060ITEM_NUMBER_38 0000009800003999 17 NE1000201IN15021920150219OR150209035ITEM_NUMBER_94 0000009600009999 @@ -7709,7 +7709,7 @@ run_reportwriter.at-5051-inp_data:18.6-18.7: 20 NE1000451IN15020320150203OR150213087ITEM_NUMBER_85 0000005300008999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:19.6-19.7: +run_reportwriter.at-5052-inp_data:19.6-19.7: 16 NE1000001IN15021020150210OR150217060ITEM_NUMBER_38 0000009800003999 17 NE1000201IN15021920150219OR150209035ITEM_NUMBER_94 0000009600009999 18 NE1000431IN15021520150215OR150227047ITEM_NUMBER_64 0000008700006999 @@ -7719,7 +7719,7 @@ run_reportwriter.at-5051-inp_data:19.6-19.7: 21 NE1000471IN15022120150221OR150222034ITEM_NUMBER_74 0000008400007999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:20.6-20.7: +run_reportwriter.at-5052-inp_data:20.6-20.7: 17 NE1000201IN15021920150219OR150209035ITEM_NUMBER_94 0000009600009999 18 NE1000431IN15021520150215OR150227047ITEM_NUMBER_64 0000008700006999 19 NE1000431IN15022220150222OR150213062ITEM_NUMBER_97 0000007300009999 @@ -7729,7 +7729,7 @@ run_reportwriter.at-5051-inp_data:20.6-20.7: 22 NE1000471IN15022120150221OR150225077ITEM_NUMBER_78 0000002400007999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:21.6-21.7: +run_reportwriter.at-5052-inp_data:21.6-21.7: 18 NE1000431IN15021520150215OR150227047ITEM_NUMBER_64 0000008700006999 19 NE1000431IN15022220150222OR150213062ITEM_NUMBER_97 0000007300009999 20 NE1000451IN15020320150203OR150213087ITEM_NUMBER_85 0000005300008999 @@ -7739,7 +7739,7 @@ run_reportwriter.at-5051-inp_data:21.6-21.7: 23 NE1000491IN15021720150217OR150210037ITEM_NUMBER_17 0000000700001999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:22.6-22.7: +run_reportwriter.at-5052-inp_data:22.6-22.7: 19 NE1000431IN15022220150222OR150213062ITEM_NUMBER_97 0000007300009999 20 NE1000451IN15020320150203OR150213087ITEM_NUMBER_85 0000005300008999 21 NE1000471IN15022120150221OR150222034ITEM_NUMBER_74 0000008400007999 @@ -7749,7 +7749,7 @@ run_reportwriter.at-5051-inp_data:22.6-22.7: 24 NE1000601IN15021520150215OR150211070ITEM_NUMBER_06 0000004400000999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:23.6-23.7: +run_reportwriter.at-5052-inp_data:23.6-23.7: 20 NE1000451IN15020320150203OR150213087ITEM_NUMBER_85 0000005300008999 21 NE1000471IN15022120150221OR150222034ITEM_NUMBER_74 0000008400007999 22 NE1000471IN15022120150221OR150225077ITEM_NUMBER_78 0000002400007999 @@ -7759,7 +7759,7 @@ run_reportwriter.at-5051-inp_data:23.6-23.7: 25 NE1000631IN15022720150227OR150209051ITEM_NUMBER_09 0000005400000999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:24.6-24.7: +run_reportwriter.at-5052-inp_data:24.6-24.7: 21 NE1000471IN15022120150221OR150222034ITEM_NUMBER_74 0000008400007999 22 NE1000471IN15022120150221OR150225077ITEM_NUMBER_78 0000002400007999 23 NE1000491IN15021720150217OR150210037ITEM_NUMBER_17 0000000700001999 @@ -7769,7 +7769,7 @@ run_reportwriter.at-5051-inp_data:24.6-24.7: 26 NE1000671IN15020620150206OR150220045ITEM_NUMBER_56 0000006600005999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:25.6-25.7: +run_reportwriter.at-5052-inp_data:25.6-25.7: 22 NE1000471IN15022120150221OR150225077ITEM_NUMBER_78 0000002400007999 23 NE1000491IN15021720150217OR150210037ITEM_NUMBER_17 0000000700001999 24 NE1000601IN15021520150215OR150211070ITEM_NUMBER_06 0000004400000999 @@ -7779,7 +7779,7 @@ run_reportwriter.at-5051-inp_data:25.6-25.7: 27 NE1000811IN15022020150220OR150212086ITEM_NUMBER_27 0000001700002999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:26.6-26.7: +run_reportwriter.at-5052-inp_data:26.6-26.7: 23 NE1000491IN15021720150217OR150210037ITEM_NUMBER_17 0000000700001999 24 NE1000601IN15021520150215OR150211070ITEM_NUMBER_06 0000004400000999 25 NE1000631IN15022720150227OR150209051ITEM_NUMBER_09 0000005400000999 @@ -7789,7 +7789,7 @@ run_reportwriter.at-5051-inp_data:26.6-26.7: 28 NE1000811IN15022820150228OR150222075ITEM_NUMBER_66 0000008600006999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:27.6-27.7: +run_reportwriter.at-5052-inp_data:27.6-27.7: 24 NE1000601IN15021520150215OR150211070ITEM_NUMBER_06 0000004400000999 25 NE1000631IN15022720150227OR150209051ITEM_NUMBER_09 0000005400000999 26 NE1000671IN15020620150206OR150220045ITEM_NUMBER_56 0000006600005999 @@ -7799,7 +7799,7 @@ run_reportwriter.at-5051-inp_data:27.6-27.7: 29 NE1000831IN15021620150216OR150224004ITEM_NUMBER_52 0000004200005999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:28.6-28.7: +run_reportwriter.at-5052-inp_data:28.6-28.7: 25 NE1000631IN15022720150227OR150209051ITEM_NUMBER_09 0000005400000999 26 NE1000671IN15020620150206OR150220045ITEM_NUMBER_56 0000006600005999 27 NE1000811IN15022020150220OR150212086ITEM_NUMBER_27 0000001700002999 @@ -7809,7 +7809,7 @@ run_reportwriter.at-5051-inp_data:28.6-28.7: 30 NW1000001IN15022420150224OR150215029ITEM_NUMBER_79 0000003500007999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:29.6-29.7: +run_reportwriter.at-5052-inp_data:29.6-29.7: 26 NE1000671IN15020620150206OR150220045ITEM_NUMBER_56 0000006600005999 27 NE1000811IN15022020150220OR150212086ITEM_NUMBER_27 0000001700002999 28 NE1000811IN15022820150228OR150222075ITEM_NUMBER_66 0000008600006999 @@ -7819,7 +7819,7 @@ run_reportwriter.at-5051-inp_data:29.6-29.7: 31 NW1000011IN15022820150228OR150209023ITEM_NUMBER_62 0000009800006999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:30.6-30.7: +run_reportwriter.at-5052-inp_data:30.6-30.7: 27 NE1000811IN15022020150220OR150212086ITEM_NUMBER_27 0000001700002999 28 NE1000811IN15022820150228OR150222075ITEM_NUMBER_66 0000008600006999 29 NE1000831IN15021620150216OR150224004ITEM_NUMBER_52 0000004200005999 @@ -7829,7 +7829,7 @@ run_reportwriter.at-5051-inp_data:30.6-30.7: 32 NW1000051IN15021020150210OR150225076ITEM_NUMBER_50 0000003900005999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:31.6-31.7: +run_reportwriter.at-5052-inp_data:31.6-31.7: 28 NE1000811IN15022820150228OR150222075ITEM_NUMBER_66 0000008600006999 29 NE1000831IN15021620150216OR150224004ITEM_NUMBER_52 0000004200005999 30 NW1000001IN15022420150224OR150215029ITEM_NUMBER_79 0000003500007999 @@ -7839,7 +7839,7 @@ run_reportwriter.at-5051-inp_data:31.6-31.7: 33 NW1000051IN15021820150218OR150229093ITEM_NUMBER_94 0000003700009999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:32.6-32.7: +run_reportwriter.at-5052-inp_data:32.6-32.7: 29 NE1000831IN15021620150216OR150224004ITEM_NUMBER_52 0000004200005999 30 NW1000001IN15022420150224OR150215029ITEM_NUMBER_79 0000003500007999 31 NW1000011IN15022820150228OR150209023ITEM_NUMBER_62 0000009800006999 @@ -7849,7 +7849,7 @@ run_reportwriter.at-5051-inp_data:32.6-32.7: 34 NW1000051IN15022020150220OR150221050ITEM_NUMBER_89 0000003800008999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:33.6-33.7: +run_reportwriter.at-5052-inp_data:33.6-33.7: 30 NW1000001IN15022420150224OR150215029ITEM_NUMBER_79 0000003500007999 31 NW1000011IN15022820150228OR150209023ITEM_NUMBER_62 0000009800006999 32 NW1000051IN15021020150210OR150225076ITEM_NUMBER_50 0000003900005999 @@ -7859,7 +7859,7 @@ run_reportwriter.at-5051-inp_data:33.6-33.7: 35 NW1000071IN15020220150202OR150223014ITEM_NUMBER_54 0000004800005999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:34.6-34.7: +run_reportwriter.at-5052-inp_data:34.6-34.7: 31 NW1000011IN15022820150228OR150209023ITEM_NUMBER_62 0000009800006999 32 NW1000051IN15021020150210OR150225076ITEM_NUMBER_50 0000003900005999 33 NW1000051IN15021820150218OR150229093ITEM_NUMBER_94 0000003700009999 @@ -7869,7 +7869,7 @@ run_reportwriter.at-5051-inp_data:34.6-34.7: 36 NW1000091IN15020820150208OR150229094ITEM_NUMBER_17 0000007200001999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:35.6-35.7: +run_reportwriter.at-5052-inp_data:35.6-35.7: 32 NW1000051IN15021020150210OR150225076ITEM_NUMBER_50 0000003900005999 33 NW1000051IN15021820150218OR150229093ITEM_NUMBER_94 0000003700009999 34 NW1000051IN15022020150220OR150221050ITEM_NUMBER_89 0000003800008999 @@ -7879,7 +7879,7 @@ run_reportwriter.at-5051-inp_data:35.6-35.7: 37 NW1000091IN15021220150212OR150222096ITEM_NUMBER_89 0000004900008999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:36.6-36.7: +run_reportwriter.at-5052-inp_data:36.6-36.7: 33 NW1000051IN15021820150218OR150229093ITEM_NUMBER_94 0000003700009999 34 NW1000051IN15022020150220OR150221050ITEM_NUMBER_89 0000003800008999 35 NW1000071IN15020220150202OR150223014ITEM_NUMBER_54 0000004800005999 @@ -7889,7 +7889,7 @@ run_reportwriter.at-5051-inp_data:36.6-36.7: 38 NW1000091IN15022420150224OR150211074ITEM_NUMBER_90 0000004300009999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:37.6-37.7: +run_reportwriter.at-5052-inp_data:37.6-37.7: 34 NW1000051IN15022020150220OR150221050ITEM_NUMBER_89 0000003800008999 35 NW1000071IN15020220150202OR150223014ITEM_NUMBER_54 0000004800005999 36 NW1000091IN15020820150208OR150229094ITEM_NUMBER_17 0000007200001999 @@ -7899,7 +7899,7 @@ run_reportwriter.at-5051-inp_data:37.6-37.7: 39 NW1000091IN15022720150227OR150219030ITEM_NUMBER_12 0000001900001999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:38.6-38.7: +run_reportwriter.at-5052-inp_data:38.6-38.7: 35 NW1000071IN15020220150202OR150223014ITEM_NUMBER_54 0000004800005999 36 NW1000091IN15020820150208OR150229094ITEM_NUMBER_17 0000007200001999 37 NW1000091IN15021220150212OR150222096ITEM_NUMBER_89 0000004900008999 @@ -7909,7 +7909,7 @@ run_reportwriter.at-5051-inp_data:38.6-38.7: 40 NW1000201IN15020820150208OR150210061ITEM_NUMBER_34 0000001200003999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:39.6-39.7: +run_reportwriter.at-5052-inp_data:39.6-39.7: 36 NW1000091IN15020820150208OR150229094ITEM_NUMBER_17 0000007200001999 37 NW1000091IN15021220150212OR150222096ITEM_NUMBER_89 0000004900008999 38 NW1000091IN15022420150224OR150211074ITEM_NUMBER_90 0000004300009999 @@ -7919,7 +7919,7 @@ run_reportwriter.at-5051-inp_data:39.6-39.7: 41 NW1000231IN15021420150214OR150210044ITEM_NUMBER_89 0000005400008999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:40.6-40.7: +run_reportwriter.at-5052-inp_data:40.6-40.7: 37 NW1000091IN15021220150212OR150222096ITEM_NUMBER_89 0000004900008999 38 NW1000091IN15022420150224OR150211074ITEM_NUMBER_90 0000004300009999 39 NW1000091IN15022720150227OR150219030ITEM_NUMBER_12 0000001900001999 @@ -7929,7 +7929,7 @@ run_reportwriter.at-5051-inp_data:40.6-40.7: 42 NW1000251IN15021220150212OR150204059ITEM_NUMBER_39 0000006000003999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:41.6-41.7: +run_reportwriter.at-5052-inp_data:41.6-41.7: 38 NW1000091IN15022420150224OR150211074ITEM_NUMBER_90 0000004300009999 39 NW1000091IN15022720150227OR150219030ITEM_NUMBER_12 0000001900001999 40 NW1000201IN15020820150208OR150210061ITEM_NUMBER_34 0000001200003999 @@ -7939,7 +7939,7 @@ run_reportwriter.at-5051-inp_data:41.6-41.7: 43 NW1000401IN15021520150215OR150222049ITEM_NUMBER_40 0000008100004999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:42.6-42.7: +run_reportwriter.at-5052-inp_data:42.6-42.7: 39 NW1000091IN15022720150227OR150219030ITEM_NUMBER_12 0000001900001999 40 NW1000201IN15020820150208OR150210061ITEM_NUMBER_34 0000001200003999 41 NW1000231IN15021420150214OR150210044ITEM_NUMBER_89 0000005400008999 @@ -7949,7 +7949,7 @@ run_reportwriter.at-5051-inp_data:42.6-42.7: 44 NW1000401IN15021720150217OR150203085ITEM_NUMBER_77 0000003700007999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:43.6-43.7: +run_reportwriter.at-5052-inp_data:43.6-43.7: 40 NW1000201IN15020820150208OR150210061ITEM_NUMBER_34 0000001200003999 41 NW1000231IN15021420150214OR150210044ITEM_NUMBER_89 0000005400008999 42 NW1000251IN15021220150212OR150204059ITEM_NUMBER_39 0000006000003999 @@ -7959,7 +7959,7 @@ run_reportwriter.at-5051-inp_data:43.6-43.7: 45 NW1000411IN15020720150207OR150224056ITEM_NUMBER_99 0000005400009999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:44.6-44.7: +run_reportwriter.at-5052-inp_data:44.6-44.7: 41 NW1000231IN15021420150214OR150210044ITEM_NUMBER_89 0000005400008999 42 NW1000251IN15021220150212OR150204059ITEM_NUMBER_39 0000006000003999 43 NW1000401IN15021520150215OR150222049ITEM_NUMBER_40 0000008100004999 @@ -7969,7 +7969,7 @@ run_reportwriter.at-5051-inp_data:44.6-44.7: 46 NW1000411IN15022820150228OR150221008ITEM_NUMBER_68 0000009000006999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:45.6-45.7: +run_reportwriter.at-5052-inp_data:45.6-45.7: 42 NW1000251IN15021220150212OR150204059ITEM_NUMBER_39 0000006000003999 43 NW1000401IN15021520150215OR150222049ITEM_NUMBER_40 0000008100004999 44 NW1000401IN15021720150217OR150203085ITEM_NUMBER_77 0000003700007999 @@ -7979,7 +7979,7 @@ run_reportwriter.at-5051-inp_data:45.6-45.7: 47 NW1000491IN15022820150228OR150201002ITEM_NUMBER_47 0000008600004999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:46.6-46.7: +run_reportwriter.at-5052-inp_data:46.6-46.7: 43 NW1000401IN15021520150215OR150222049ITEM_NUMBER_40 0000008100004999 44 NW1000401IN15021720150217OR150203085ITEM_NUMBER_77 0000003700007999 45 NW1000411IN15020720150207OR150224056ITEM_NUMBER_99 0000005400009999 @@ -7989,7 +7989,7 @@ run_reportwriter.at-5051-inp_data:46.6-46.7: 48 NW1000611IN15022720150227OR150224097ITEM_NUMBER_11 0000008000001999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:47.6-47.7: +run_reportwriter.at-5052-inp_data:47.6-47.7: 44 NW1000401IN15021720150217OR150203085ITEM_NUMBER_77 0000003700007999 45 NW1000411IN15020720150207OR150224056ITEM_NUMBER_99 0000005400009999 46 NW1000411IN15022820150228OR150221008ITEM_NUMBER_68 0000009000006999 @@ -7999,7 +7999,7 @@ run_reportwriter.at-5051-inp_data:47.6-47.7: 49 NW1000631IN15020720150207OR150206031ITEM_NUMBER_49 0000001500004999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:48.6-48.7: +run_reportwriter.at-5052-inp_data:48.6-48.7: 45 NW1000411IN15020720150207OR150224056ITEM_NUMBER_99 0000005400009999 46 NW1000411IN15022820150228OR150221008ITEM_NUMBER_68 0000009000006999 47 NW1000491IN15022820150228OR150201002ITEM_NUMBER_47 0000008600004999 @@ -8009,7 +8009,7 @@ run_reportwriter.at-5051-inp_data:48.6-48.7: 50 NW1000631IN15021420150214OR150210054ITEM_NUMBER_40 0000004200004999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:49.6-49.7: +run_reportwriter.at-5052-inp_data:49.6-49.7: 46 NW1000411IN15022820150228OR150221008ITEM_NUMBER_68 0000009000006999 47 NW1000491IN15022820150228OR150201002ITEM_NUMBER_47 0000008600004999 48 NW1000611IN15022720150227OR150224097ITEM_NUMBER_11 0000008000001999 @@ -8019,7 +8019,7 @@ run_reportwriter.at-5051-inp_data:49.6-49.7: 51 NW1000631IN15022420150224OR150218024ITEM_NUMBER_84 0000003300008999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:50.6-50.7: +run_reportwriter.at-5052-inp_data:50.6-50.7: 47 NW1000491IN15022820150228OR150201002ITEM_NUMBER_47 0000008600004999 48 NW1000611IN15022720150227OR150224097ITEM_NUMBER_11 0000008000001999 49 NW1000631IN15020720150207OR150206031ITEM_NUMBER_49 0000001500004999 @@ -8029,7 +8029,7 @@ run_reportwriter.at-5051-inp_data:50.6-50.7: 52 NW1000651IN15020620150206OR150225099ITEM_NUMBER_57 0000004300005999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:51.6-51.7: +run_reportwriter.at-5052-inp_data:51.6-51.7: 48 NW1000611IN15022720150227OR150224097ITEM_NUMBER_11 0000008000001999 49 NW1000631IN15020720150207OR150206031ITEM_NUMBER_49 0000001500004999 50 NW1000631IN15021420150214OR150210054ITEM_NUMBER_40 0000004200004999 @@ -8039,7 +8039,7 @@ run_reportwriter.at-5051-inp_data:51.6-51.7: 53 NW1000671IN15021320150213OR150224041ITEM_NUMBER_22 0000000200002999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:52.6-52.7: +run_reportwriter.at-5052-inp_data:52.6-52.7: 49 NW1000631IN15020720150207OR150206031ITEM_NUMBER_49 0000001500004999 50 NW1000631IN15021420150214OR150210054ITEM_NUMBER_40 0000004200004999 51 NW1000631IN15022420150224OR150218024ITEM_NUMBER_84 0000003300008999 @@ -8049,7 +8049,7 @@ run_reportwriter.at-5051-inp_data:52.6-52.7: 54 NW1000691IN15020420150204OR150211092ITEM_NUMBER_13 0000009400001999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:53.6-53.7: +run_reportwriter.at-5052-inp_data:53.6-53.7: 50 NW1000631IN15021420150214OR150210054ITEM_NUMBER_40 0000004200004999 51 NW1000631IN15022420150224OR150218024ITEM_NUMBER_84 0000003300008999 52 NW1000651IN15020620150206OR150225099ITEM_NUMBER_57 0000004300005999 @@ -8059,7 +8059,7 @@ run_reportwriter.at-5051-inp_data:53.6-53.7: 55 NW1000811IN15022720150227OR150217081ITEM_NUMBER_45 0000001600004999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:54.6-54.7: +run_reportwriter.at-5052-inp_data:54.6-54.7: 51 NW1000631IN15022420150224OR150218024ITEM_NUMBER_84 0000003300008999 52 NW1000651IN15020620150206OR150225099ITEM_NUMBER_57 0000004300005999 53 NW1000671IN15021320150213OR150224041ITEM_NUMBER_22 0000000200002999 @@ -8069,7 +8069,7 @@ run_reportwriter.at-5051-inp_data:54.6-54.7: 56 NW1000851IN15020820150208OR150203091ITEM_NUMBER_63 0000006600006999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:55.6-55.7: +run_reportwriter.at-5052-inp_data:55.6-55.7: 52 NW1000651IN15020620150206OR150225099ITEM_NUMBER_57 0000004300005999 53 NW1000671IN15021320150213OR150224041ITEM_NUMBER_22 0000000200002999 54 NW1000691IN15020420150204OR150211092ITEM_NUMBER_13 0000009400001999 @@ -8079,7 +8079,7 @@ run_reportwriter.at-5051-inp_data:55.6-55.7: 57 NW1000871IN15021820150218OR150209082ITEM_NUMBER_30 0000005500003999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:56.6-56.7: +run_reportwriter.at-5052-inp_data:56.6-56.7: 53 NW1000671IN15021320150213OR150224041ITEM_NUMBER_22 0000000200002999 54 NW1000691IN15020420150204OR150211092ITEM_NUMBER_13 0000009400001999 55 NW1000811IN15022720150227OR150217081ITEM_NUMBER_45 0000001600004999 @@ -8089,7 +8089,7 @@ run_reportwriter.at-5051-inp_data:56.6-56.7: 58 NW1000871IN15022820150228OR150222015ITEM_NUMBER_73 0000005100007999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:57.6-57.7: +run_reportwriter.at-5052-inp_data:57.6-57.7: 54 NW1000691IN15020420150204OR150211092ITEM_NUMBER_13 0000009400001999 55 NW1000811IN15022720150227OR150217081ITEM_NUMBER_45 0000001600004999 56 NW1000851IN15020820150208OR150203091ITEM_NUMBER_63 0000006600006999 @@ -8099,7 +8099,7 @@ run_reportwriter.at-5051-inp_data:57.6-57.7: 59 NW1000891IN15022520150225OR150201026ITEM_NUMBER_80 0000004700008999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:58.6-58.7: +run_reportwriter.at-5052-inp_data:58.6-58.7: 55 NW1000811IN15022720150227OR150217081ITEM_NUMBER_45 0000001600004999 56 NW1000851IN15020820150208OR150203091ITEM_NUMBER_63 0000006600006999 57 NW1000871IN15021820150218OR150209082ITEM_NUMBER_30 0000005500003999 @@ -8109,7 +8109,7 @@ run_reportwriter.at-5051-inp_data:58.6-58.7: 60 SE1000001IN15022320150223OR150203064ITEM_NUMBER_03 0000007100000999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:59.6-59.7: +run_reportwriter.at-5052-inp_data:59.6-59.7: 56 NW1000851IN15020820150208OR150203091ITEM_NUMBER_63 0000006600006999 57 NW1000871IN15021820150218OR150209082ITEM_NUMBER_30 0000005500003999 58 NW1000871IN15022820150228OR150222015ITEM_NUMBER_73 0000005100007999 @@ -8119,7 +8119,7 @@ run_reportwriter.at-5051-inp_data:59.6-59.7: 61 SE1000011IN15020120150201OR150213017ITEM_NUMBER_09 0000000600000999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:60.6-60.7: +run_reportwriter.at-5052-inp_data:60.6-60.7: 57 NW1000871IN15021820150218OR150209082ITEM_NUMBER_30 0000005500003999 58 NW1000871IN15022820150228OR150222015ITEM_NUMBER_73 0000005100007999 59 NW1000891IN15022520150225OR150201026ITEM_NUMBER_80 0000004700008999 @@ -8129,7 +8129,7 @@ run_reportwriter.at-5051-inp_data:60.6-60.7: 62 SE1000011IN15021220150212OR150209066ITEM_NUMBER_06 0000004000000999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:61.6-61.7: +run_reportwriter.at-5052-inp_data:61.6-61.7: 58 NW1000871IN15022820150228OR150222015ITEM_NUMBER_73 0000005100007999 59 NW1000891IN15022520150225OR150201026ITEM_NUMBER_80 0000004700008999 60 SE1000001IN15022320150223OR150203064ITEM_NUMBER_03 0000007100000999 @@ -8139,7 +8139,7 @@ run_reportwriter.at-5051-inp_data:61.6-61.7: 63 SE1000091IN15020420150204OR150201001ITEM_NUMBER_68 0000001900006999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:62.6-62.7: +run_reportwriter.at-5052-inp_data:62.6-62.7: 59 NW1000891IN15022520150225OR150201026ITEM_NUMBER_80 0000004700008999 60 SE1000001IN15022320150223OR150203064ITEM_NUMBER_03 0000007100000999 61 SE1000011IN15020120150201OR150213017ITEM_NUMBER_09 0000000600000999 @@ -8149,7 +8149,7 @@ run_reportwriter.at-5051-inp_data:62.6-62.7: 64 SE1000091IN15021020150210OR150223084ITEM_NUMBER_11 0000009300001999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:63.6-63.7: +run_reportwriter.at-5052-inp_data:63.6-63.7: 60 SE1000001IN15022320150223OR150203064ITEM_NUMBER_03 0000007100000999 61 SE1000011IN15020120150201OR150213017ITEM_NUMBER_09 0000000600000999 62 SE1000011IN15021220150212OR150209066ITEM_NUMBER_06 0000004000000999 @@ -8159,7 +8159,7 @@ run_reportwriter.at-5051-inp_data:63.6-63.7: 65 SE1000091IN15022620150226OR150219038ITEM_NUMBER_97 0000003700009999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:64.6-64.7: +run_reportwriter.at-5052-inp_data:64.6-64.7: 61 SE1000011IN15020120150201OR150213017ITEM_NUMBER_09 0000000600000999 62 SE1000011IN15021220150212OR150209066ITEM_NUMBER_06 0000004000000999 63 SE1000091IN15020420150204OR150201001ITEM_NUMBER_68 0000001900006999 @@ -8169,7 +8169,7 @@ run_reportwriter.at-5051-inp_data:64.6-64.7: 66 SE1000211IN15020620150206OR150221089ITEM_NUMBER_05 0000004500000999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:65.6-65.7: +run_reportwriter.at-5052-inp_data:65.6-65.7: 62 SE1000011IN15021220150212OR150209066ITEM_NUMBER_06 0000004000000999 63 SE1000091IN15020420150204OR150201001ITEM_NUMBER_68 0000001900006999 64 SE1000091IN15021020150210OR150223084ITEM_NUMBER_11 0000009300001999 @@ -8179,7 +8179,7 @@ run_reportwriter.at-5051-inp_data:65.6-65.7: 67 SE1000411IN15021220150212OR150208012ITEM_NUMBER_46 0000002300004999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:66.6-66.7: +run_reportwriter.at-5052-inp_data:66.6-66.7: 63 SE1000091IN15020420150204OR150201001ITEM_NUMBER_68 0000001900006999 64 SE1000091IN15021020150210OR150223084ITEM_NUMBER_11 0000009300001999 65 SE1000091IN15022620150226OR150219038ITEM_NUMBER_97 0000003700009999 @@ -8189,7 +8189,7 @@ run_reportwriter.at-5051-inp_data:66.6-66.7: 68 SE1000431IN15020720150207OR150214072ITEM_NUMBER_25 0000004600002999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:67.6-67.7: +run_reportwriter.at-5052-inp_data:67.6-67.7: 64 SE1000091IN15021020150210OR150223084ITEM_NUMBER_11 0000009300001999 65 SE1000091IN15022620150226OR150219038ITEM_NUMBER_97 0000003700009999 66 SE1000211IN15020620150206OR150221089ITEM_NUMBER_05 0000004500000999 @@ -8199,7 +8199,7 @@ run_reportwriter.at-5051-inp_data:67.6-67.7: 69 SE1000431IN15022520150225OR150220040ITEM_NUMBER_01 0000006100000999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:68.6-68.7: +run_reportwriter.at-5052-inp_data:68.6-68.7: 65 SE1000091IN15022620150226OR150219038ITEM_NUMBER_97 0000003700009999 66 SE1000211IN15020620150206OR150221089ITEM_NUMBER_05 0000004500000999 67 SE1000411IN15021220150212OR150208012ITEM_NUMBER_46 0000002300004999 @@ -8209,7 +8209,7 @@ run_reportwriter.at-5051-inp_data:68.6-68.7: 70 SE1000451IN15021420150214OR150204022ITEM_NUMBER_34 0000004700003999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:69.6-69.7: +run_reportwriter.at-5052-inp_data:69.6-69.7: 66 SE1000211IN15020620150206OR150221089ITEM_NUMBER_05 0000004500000999 67 SE1000411IN15021220150212OR150208012ITEM_NUMBER_46 0000002300004999 68 SE1000431IN15020720150207OR150214072ITEM_NUMBER_25 0000004600002999 @@ -8219,7 +8219,7 @@ run_reportwriter.at-5051-inp_data:69.6-69.7: 71 SE1000471IN15020320150203OR150217010ITEM_NUMBER_25 0000003400002999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:70.6-70.7: +run_reportwriter.at-5052-inp_data:70.6-70.7: 67 SE1000411IN15021220150212OR150208012ITEM_NUMBER_46 0000002300004999 68 SE1000431IN15020720150207OR150214072ITEM_NUMBER_25 0000004600002999 69 SE1000431IN15022520150225OR150220040ITEM_NUMBER_01 0000006100000999 @@ -8229,7 +8229,7 @@ run_reportwriter.at-5051-inp_data:70.6-70.7: 72 SE1000471IN15021120150211OR150213025ITEM_NUMBER_54 0000009200005999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:71.6-71.7: +run_reportwriter.at-5052-inp_data:71.6-71.7: 68 SE1000431IN15020720150207OR150214072ITEM_NUMBER_25 0000004600002999 69 SE1000431IN15022520150225OR150220040ITEM_NUMBER_01 0000006100000999 70 SE1000451IN15021420150214OR150204022ITEM_NUMBER_34 0000004700003999 @@ -8239,7 +8239,7 @@ run_reportwriter.at-5051-inp_data:71.6-71.7: 73 SE1000491IN15020220150202OR150202013ITEM_NUMBER_19 0000007800001999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:72.6-72.7: +run_reportwriter.at-5052-inp_data:72.6-72.7: 69 SE1000431IN15022520150225OR150220040ITEM_NUMBER_01 0000006100000999 70 SE1000451IN15021420150214OR150204022ITEM_NUMBER_34 0000004700003999 71 SE1000471IN15020320150203OR150217010ITEM_NUMBER_25 0000003400002999 @@ -8249,7 +8249,7 @@ run_reportwriter.at-5051-inp_data:72.6-72.7: 74 SE1000601IN15022420150224OR150210039ITEM_NUMBER_19 0000005600001999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:73.6-73.7: +run_reportwriter.at-5052-inp_data:73.6-73.7: 70 SE1000451IN15021420150214OR150204022ITEM_NUMBER_34 0000004700003999 71 SE1000471IN15020320150203OR150217010ITEM_NUMBER_25 0000003400002999 72 SE1000471IN15021120150211OR150213025ITEM_NUMBER_54 0000009200005999 @@ -8259,7 +8259,7 @@ run_reportwriter.at-5051-inp_data:73.6-73.7: 75 SE1000631IN15020120150201OR150216003ITEM_NUMBER_65 0000001100006999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:74.6-74.7: +run_reportwriter.at-5052-inp_data:74.6-74.7: 71 SE1000471IN15020320150203OR150217010ITEM_NUMBER_25 0000003400002999 72 SE1000471IN15021120150211OR150213025ITEM_NUMBER_54 0000009200005999 73 SE1000491IN15020220150202OR150202013ITEM_NUMBER_19 0000007800001999 @@ -8269,7 +8269,7 @@ run_reportwriter.at-5051-inp_data:74.6-74.7: 76 SE1000671IN15020320150203OR150205071ITEM_NUMBER_64 0000009400006999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:75.6-75.7: +run_reportwriter.at-5052-inp_data:75.6-75.7: 72 SE1000471IN15021120150211OR150213025ITEM_NUMBER_54 0000009200005999 73 SE1000491IN15020220150202OR150202013ITEM_NUMBER_19 0000007800001999 74 SE1000601IN15022420150224OR150210039ITEM_NUMBER_19 0000005600001999 @@ -8279,7 +8279,7 @@ run_reportwriter.at-5051-inp_data:75.6-75.7: 77 SE1000671IN15022020150220OR150214032ITEM_NUMBER_53 0000005900005999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:76.6-76.7: +run_reportwriter.at-5052-inp_data:76.6-76.7: 73 SE1000491IN15020220150202OR150202013ITEM_NUMBER_19 0000007800001999 74 SE1000601IN15022420150224OR150210039ITEM_NUMBER_19 0000005600001999 75 SE1000631IN15020120150201OR150216003ITEM_NUMBER_65 0000001100006999 @@ -8289,7 +8289,7 @@ run_reportwriter.at-5051-inp_data:76.6-76.7: 78 SE1000891IN15022620150226OR150229068ITEM_NUMBER_75 0000008400007999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:77.6-77.7: +run_reportwriter.at-5052-inp_data:77.6-77.7: 74 SE1000601IN15022420150224OR150210039ITEM_NUMBER_19 0000005600001999 75 SE1000631IN15020120150201OR150216003ITEM_NUMBER_65 0000001100006999 76 SE1000671IN15020320150203OR150205071ITEM_NUMBER_64 0000009400006999 @@ -8299,7 +8299,7 @@ run_reportwriter.at-5051-inp_data:77.6-77.7: 79 SW1000011IN15020220150202OR150206000ITEM_NUMBER_30 0000005900003999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:78.6-78.7: +run_reportwriter.at-5052-inp_data:78.6-78.7: 75 SE1000631IN15020120150201OR150216003ITEM_NUMBER_65 0000001100006999 76 SE1000671IN15020320150203OR150205071ITEM_NUMBER_64 0000009400006999 77 SE1000671IN15022020150220OR150214032ITEM_NUMBER_53 0000005900005999 @@ -8309,7 +8309,7 @@ run_reportwriter.at-5051-inp_data:78.6-78.7: 80 SW1000031IN15020320150203OR150214033ITEM_NUMBER_09 0000006000000999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:79.6-79.7: +run_reportwriter.at-5052-inp_data:79.6-79.7: 76 SE1000671IN15020320150203OR150205071ITEM_NUMBER_64 0000009400006999 77 SE1000671IN15022020150220OR150214032ITEM_NUMBER_53 0000005900005999 78 SE1000891IN15022620150226OR150229068ITEM_NUMBER_75 0000008400007999 @@ -8319,7 +8319,7 @@ run_reportwriter.at-5051-inp_data:79.6-79.7: 81 SW1000031IN15020620150206OR150206021ITEM_NUMBER_91 0000005400009999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:80.6-80.7: +run_reportwriter.at-5052-inp_data:80.6-80.7: 77 SE1000671IN15022020150220OR150214032ITEM_NUMBER_53 0000005900005999 78 SE1000891IN15022620150226OR150229068ITEM_NUMBER_75 0000008400007999 79 SW1000011IN15020220150202OR150206000ITEM_NUMBER_30 0000005900003999 @@ -8329,7 +8329,7 @@ run_reportwriter.at-5051-inp_data:80.6-80.7: 82 SW1000091IN15022320150223OR150221028ITEM_NUMBER_67 0000003900006999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:81.6-81.7: +run_reportwriter.at-5052-inp_data:81.6-81.7: 78 SE1000891IN15022620150226OR150229068ITEM_NUMBER_75 0000008400007999 79 SW1000011IN15020220150202OR150206000ITEM_NUMBER_30 0000005900003999 80 SW1000031IN15020320150203OR150214033ITEM_NUMBER_09 0000006000000999 @@ -8339,7 +8339,7 @@ run_reportwriter.at-5051-inp_data:81.6-81.7: 83 SW1000201IN15020920150209OR150205065ITEM_NUMBER_21 0000007000002999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:82.6-82.7: +run_reportwriter.at-5052-inp_data:82.6-82.7: 79 SW1000011IN15020220150202OR150206000ITEM_NUMBER_30 0000005900003999 80 SW1000031IN15020320150203OR150214033ITEM_NUMBER_09 0000006000000999 81 SW1000031IN15020620150206OR150206021ITEM_NUMBER_91 0000005400009999 @@ -8349,7 +8349,7 @@ run_reportwriter.at-5051-inp_data:82.6-82.7: 84 SW1000201IN15022520150225OR150203052ITEM_NUMBER_55 0000007500005999 >> Error: Unexpected indicator: `0' -run_reportwriter.at-5051-inp_data:83.6-83.7: +run_reportwriter.at-5052-inp_data:83.6-83.7: 80 SW1000031IN15020320150203OR150214033ITEM_NUMBER_09 0000006000000999 81 SW1000031IN15020620150206OR150206021ITEM_NUMBER_91 0000005400009999 82 SW1000091IN15022320150223OR150221028ITEM_NUMBER_67 0000003900006999 @@ -8359,7 +8359,7 @@ run_reportwriter.at-5051-inp_data:83.6-83.7: 85 SW1000201IN15022520150225OR150210067ITEM_NUMBER_83 0000001500008999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:84.6-84.7: +run_reportwriter.at-5052-inp_data:84.6-84.7: 81 SW1000031IN15020620150206OR150206021ITEM_NUMBER_91 0000005400009999 82 SW1000091IN15022320150223OR150221028ITEM_NUMBER_67 0000003900006999 83 SW1000201IN15020920150209OR150205065ITEM_NUMBER_21 0000007000002999 @@ -8369,7 +8369,7 @@ run_reportwriter.at-5051-inp_data:84.6-84.7: 86 SW1000211IN15020220150202OR150221055ITEM_NUMBER_16 0000001300001999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:85.6-85.7: +run_reportwriter.at-5052-inp_data:85.6-85.7: 82 SW1000091IN15022320150223OR150221028ITEM_NUMBER_67 0000003900006999 83 SW1000201IN15020920150209OR150205065ITEM_NUMBER_21 0000007000002999 84 SW1000201IN15022520150225OR150203052ITEM_NUMBER_55 0000007500005999 @@ -8379,7 +8379,7 @@ run_reportwriter.at-5051-inp_data:85.6-85.7: 87 SW1000211IN15020820150208OR150215007ITEM_NUMBER_97 0000008900009999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:86.6-86.7: +run_reportwriter.at-5052-inp_data:86.6-86.7: 83 SW1000201IN15020920150209OR150205065ITEM_NUMBER_21 0000007000002999 84 SW1000201IN15022520150225OR150203052ITEM_NUMBER_55 0000007500005999 85 SW1000201IN15022520150225OR150210067ITEM_NUMBER_83 0000001500008999 @@ -8389,7 +8389,7 @@ run_reportwriter.at-5051-inp_data:86.6-86.7: 88 SW1000271IN15021120150211OR150228080ITEM_NUMBER_45 0000005200004999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:87.6-87.7: +run_reportwriter.at-5052-inp_data:87.6-87.7: 84 SW1000201IN15022520150225OR150203052ITEM_NUMBER_55 0000007500005999 85 SW1000201IN15022520150225OR150210067ITEM_NUMBER_83 0000001500008999 86 SW1000211IN15020220150202OR150221055ITEM_NUMBER_16 0000001300001999 @@ -8399,7 +8399,7 @@ run_reportwriter.at-5051-inp_data:87.6-87.7: 89 SW1000271IN15021320150213OR150207095ITEM_NUMBER_09 0000005400000999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:88.6-88.7: +run_reportwriter.at-5052-inp_data:88.6-88.7: 85 SW1000201IN15022520150225OR150210067ITEM_NUMBER_83 0000001500008999 86 SW1000211IN15020220150202OR150221055ITEM_NUMBER_16 0000001300001999 87 SW1000211IN15020820150208OR150215007ITEM_NUMBER_97 0000008900009999 @@ -8409,7 +8409,7 @@ run_reportwriter.at-5051-inp_data:88.6-88.7: 90 SW1000401IN15022820150228OR150202027ITEM_NUMBER_83 0000000100008999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:89.6-89.7: +run_reportwriter.at-5052-inp_data:89.6-89.7: 86 SW1000211IN15020220150202OR150221055ITEM_NUMBER_16 0000001300001999 87 SW1000211IN15020820150208OR150215007ITEM_NUMBER_97 0000008900009999 88 SW1000271IN15021120150211OR150228080ITEM_NUMBER_45 0000005200004999 @@ -8419,7 +8419,7 @@ run_reportwriter.at-5051-inp_data:89.6-89.7: 91 SW1000411IN15021020150210OR150220073ITEM_NUMBER_63 0000001400006999 >> Error: Unexpected indicator: `2' -run_reportwriter.at-5051-inp_data:90.6-90.7: +run_reportwriter.at-5052-inp_data:90.6-90.7: 87 SW1000211IN15020820150208OR150215007ITEM_NUMBER_97 0000008900009999 88 SW1000271IN15021120150211OR150228080ITEM_NUMBER_45 0000005200004999 89 SW1000271IN15021320150213OR150207095ITEM_NUMBER_09 0000005400000999 @@ -8429,7 +8429,7 @@ run_reportwriter.at-5051-inp_data:90.6-90.7: 92 SW1000431IN15020820150208OR150227078ITEM_NUMBER_23 0000005200002999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:91.6-91.7: +run_reportwriter.at-5052-inp_data:91.6-91.7: 88 SW1000271IN15021120150211OR150228080ITEM_NUMBER_45 0000005200004999 89 SW1000271IN15021320150213OR150207095ITEM_NUMBER_09 0000005400000999 90 SW1000401IN15022820150228OR150202027ITEM_NUMBER_83 0000000100008999 @@ -8439,7 +8439,7 @@ run_reportwriter.at-5051-inp_data:91.6-91.7: 93 SW1000431IN15022020150220OR150227006ITEM_NUMBER_50 0000008500005999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:92.6-92.7: +run_reportwriter.at-5052-inp_data:92.6-92.7: 89 SW1000271IN15021320150213OR150207095ITEM_NUMBER_09 0000005400000999 90 SW1000401IN15022820150228OR150202027ITEM_NUMBER_83 0000000100008999 91 SW1000411IN15021020150210OR150220073ITEM_NUMBER_63 0000001400006999 @@ -8449,7 +8449,7 @@ run_reportwriter.at-5051-inp_data:92.6-92.7: 94 SW1000601IN15020620150206OR150201011ITEM_NUMBER_73 0000008400007999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:93.6-93.7: +run_reportwriter.at-5052-inp_data:93.6-93.7: 90 SW1000401IN15022820150228OR150202027ITEM_NUMBER_83 0000000100008999 91 SW1000411IN15021020150210OR150220073ITEM_NUMBER_63 0000001400006999 92 SW1000431IN15020820150208OR150227078ITEM_NUMBER_23 0000005200002999 @@ -8459,7 +8459,7 @@ run_reportwriter.at-5051-inp_data:93.6-93.7: 95 SW1000611IN15020620150206OR150218019ITEM_NUMBER_67 0000006100006999 >> Error: Unexpected indicator: `4' -run_reportwriter.at-5051-inp_data:94.6-94.7: +run_reportwriter.at-5052-inp_data:94.6-94.7: 91 SW1000411IN15021020150210OR150220073ITEM_NUMBER_63 0000001400006999 92 SW1000431IN15020820150208OR150227078ITEM_NUMBER_23 0000005200002999 93 SW1000431IN15022020150220OR150227006ITEM_NUMBER_50 0000008500005999 @@ -8469,7 +8469,7 @@ run_reportwriter.at-5051-inp_data:94.6-94.7: 96 SW1000651IN15020920150209OR150224009ITEM_NUMBER_23 0000001800002999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:95.6-95.7: +run_reportwriter.at-5052-inp_data:95.6-95.7: 92 SW1000431IN15020820150208OR150227078ITEM_NUMBER_23 0000005200002999 93 SW1000431IN15022020150220OR150227006ITEM_NUMBER_50 0000008500005999 94 SW1000601IN15020620150206OR150201011ITEM_NUMBER_73 0000008400007999 @@ -8479,7 +8479,7 @@ run_reportwriter.at-5051-inp_data:95.6-95.7: 97 SW1000831IN15020120150201OR150221046ITEM_NUMBER_44 0000006900004999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:96.6-96.7: +run_reportwriter.at-5052-inp_data:96.6-96.7: 93 SW1000431IN15022020150220OR150227006ITEM_NUMBER_50 0000008500005999 94 SW1000601IN15020620150206OR150201011ITEM_NUMBER_73 0000008400007999 95 SW1000611IN15020620150206OR150218019ITEM_NUMBER_67 0000006100006999 @@ -8489,7 +8489,7 @@ run_reportwriter.at-5051-inp_data:96.6-96.7: 98 SW1000831IN15022020150220OR150213005ITEM_NUMBER_44 0000003700004999 >> Error: Unexpected indicator: `6' -run_reportwriter.at-5051-inp_data:97.6-97.7: +run_reportwriter.at-5052-inp_data:97.6-97.7: 94 SW1000601IN15020620150206OR150201011ITEM_NUMBER_73 0000008400007999 95 SW1000611IN15020620150206OR150218019ITEM_NUMBER_67 0000006100006999 96 SW1000651IN15020920150209OR150224009ITEM_NUMBER_23 0000001800002999 @@ -8499,7 +8499,7 @@ run_reportwriter.at-5051-inp_data:97.6-97.7: 99 SW1000831IN15022220150222OR150213058ITEM_NUMBER_86 0000008300008999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:98.6-98.7: +run_reportwriter.at-5052-inp_data:98.6-98.7: 95 SW1000611IN15020620150206OR150218019ITEM_NUMBER_67 0000006100006999 96 SW1000651IN15020920150209OR150224009ITEM_NUMBER_23 0000001800002999 97 SW1000831IN15020120150201OR150221046ITEM_NUMBER_44 0000006900004999 @@ -8509,7 +8509,7 @@ run_reportwriter.at-5051-inp_data:98.6-98.7: 100 SW1000871IN15020220150202OR150216016ITEM_NUMBER_62 0000008300006999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:99.6-99.7: +run_reportwriter.at-5052-inp_data:99.6-99.7: 96 SW1000651IN15020920150209OR150224009ITEM_NUMBER_23 0000001800002999 97 SW1000831IN15020120150201OR150221046ITEM_NUMBER_44 0000006900004999 98 SW1000831IN15022020150220OR150213005ITEM_NUMBER_44 0000003700004999 @@ -8518,7 +8518,7 @@ run_reportwriter.at-5051-inp_data:99.6-99.7: 100 SW1000871IN15020220150202OR150216016ITEM_NUMBER_62 0000008300006999 >> Error: Unexpected indicator: `8' -run_reportwriter.at-5051-inp_data:100.6-100.7: +run_reportwriter.at-5052-inp_data:100.6-100.7: 97 SW1000831IN15020120150201OR150221046ITEM_NUMBER_44 0000006900004999 98 SW1000831IN15022020150220OR150213005ITEM_NUMBER_44 0000003700004999 99 SW1000831IN15022220150222OR150213058ITEM_NUMBER_86 0000008300008999 @@ -8526,8 +8526,8 @@ run_reportwriter.at-5051-inp_data:100.6-100.7: ---- ^ >> Error: Unexpected indicator: `8' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:5049:0 -run_reportwriter.at-5049-prog.cob:14.24-14.32: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:5050:0 +run_reportwriter.at-5050-prog.cob:14.24-14.32: 11 FILE-CONTROL. 12 13 SELECT REPORT-FILE @@ -8537,7 +8537,7 @@ run_reportwriter.at-5049-prog.cob:14.24-14.32: 16 >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-5049-prog.cob:18.24-18.32: +run_reportwriter.at-5050-prog.cob:18.24-18.32: 15 ORGANIZATION IS LINE SEQUENTIAL. 16 17 SELECT TEMP-FILE @@ -8547,7 +8547,7 @@ run_reportwriter.at-5049-prog.cob:18.24-18.32: 20 >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-5049-prog.cob:122.43: +run_reportwriter.at-5050-prog.cob:122.43: 119 05 COLUMN 113 PIC ZZZZZZZ9.99 SUM TEMP-COST. 120 121 01 RPTA-BRANCH-FOOTING TYPE CONTROL FOOTING TEMP-BRANCH @@ -8557,7 +8557,7 @@ run_reportwriter.at-5049-prog.cob:122.43: 124 05 COLUMN 69 PIC X(15) VALUE "Branch Total: ". >> Hint: Missing -run_reportwriter.at-5049-prog.cob:122.44-122.53: +run_reportwriter.at-5050-prog.cob:122.44-122.53: 119 05 COLUMN 113 PIC ZZZZZZZ9.99 SUM TEMP-COST. 120 121 01 RPTA-BRANCH-FOOTING TYPE CONTROL FOOTING TEMP-BRANCH @@ -8567,7 +8567,7 @@ run_reportwriter.at-5049-prog.cob:122.44-122.53: 124 05 COLUMN 69 PIC X(15) VALUE "Branch Total: ". >> Error: Invalid syntax -run_reportwriter.at-5049-prog.cob:129.43: +run_reportwriter.at-5050-prog.cob:129.43: 126 05 COLUMN 113 PIC ZZZZZZZ9.99 SUM TEMP-COST. 127 128 01 RPTA-REGION-FOOTING TYPE CONTROL FOOTING TEMP-REGION @@ -8577,7 +8577,7 @@ run_reportwriter.at-5049-prog.cob:129.43: 131 05 COLUMN 69 PIC X(15) VALUE "Region Total: ". >> Hint: Missing -run_reportwriter.at-5049-prog.cob:129.44-129.53: +run_reportwriter.at-5050-prog.cob:129.44-129.53: 126 05 COLUMN 113 PIC ZZZZZZZ9.99 SUM TEMP-COST. 127 128 01 RPTA-REGION-FOOTING TYPE CONTROL FOOTING TEMP-REGION @@ -8587,8 +8587,8 @@ run_reportwriter.at-5049-prog.cob:129.44-129.53: 131 05 COLUMN 69 PIC X(15) VALUE "Region Total: ". >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9078:0 -run_reportwriter.at-9078-reference:2.6-2.7: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9079:0 +run_reportwriter.at-9079-reference:2.6-2.7: 1 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 1 2 > Region: MW ---- ^ @@ -8596,7 +8596,7 @@ run_reportwriter.at-9078-reference:2.6-2.7: 4 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2.11-2.13: +run_reportwriter.at-9079-reference:2.11-2.13: 1 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 1 2 > Region: MW ---- ^^ @@ -8604,7 +8604,7 @@ run_reportwriter.at-9078-reference:2.11-2.13: 4 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Invalid syntax -run_reportwriter.at-9078-reference:3.6-3.7: +run_reportwriter.at-9079-reference:3.6-3.7: 1 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 1 2 Region: MW 3 > Location: 1000051 @@ -8613,7 +8613,7 @@ run_reportwriter.at-9078-reference:3.6-3.7: 5 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:4.6-4.7: +run_reportwriter.at-9079-reference:4.6-4.7: 1 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 1 2 Region: MW 3 Location: 1000051 @@ -8623,7 +8623,7 @@ run_reportwriter.at-9078-reference:4.6-4.7: 6 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:8.6-8.7: +run_reportwriter.at-9079-reference:8.6-8.7: 5 -------------------------------------------------------------------------------------------------------------------------------- 6 7 @@ -8633,7 +8633,7 @@ run_reportwriter.at-9078-reference:8.6-8.7: 10 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:11.6-11.7: +run_reportwriter.at-9079-reference:11.6-11.7: 8 IN150212 20150212 OR150212 043 ITEM_NUMBER_22 00000028 29.99 9 Invoice Total: 000000028 29.99 10 @@ -8643,7 +8643,7 @@ run_reportwriter.at-9078-reference:11.6-11.7: 13 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:62.6-62.7: +run_reportwriter.at-9079-reference:62.6-62.7: 59 60 61 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 2 @@ -8653,7 +8653,7 @@ run_reportwriter.at-9078-reference:62.6-62.7: 64 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:63.6-63.7: +run_reportwriter.at-9079-reference:63.6-63.7: 60 61 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 2 62 Region: MW @@ -8663,7 +8663,7 @@ run_reportwriter.at-9078-reference:63.6-63.7: 65 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:64.6-64.7: +run_reportwriter.at-9079-reference:64.6-64.7: 61 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 2 62 Region: MW 63 Location: 1000071 @@ -8673,7 +8673,7 @@ run_reportwriter.at-9078-reference:64.6-64.7: 66 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:68.6-68.7: +run_reportwriter.at-9079-reference:68.6-68.7: 65 -------------------------------------------------------------------------------------------------------------------------------- 66 67 @@ -8683,7 +8683,7 @@ run_reportwriter.at-9078-reference:68.6-68.7: 70 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:71.6-71.7: +run_reportwriter.at-9079-reference:71.6-71.7: 68 IN150214 20150214 OR150212 057 ITEM_NUMBER_51 00000070 59.99 69 Invoice Total: 000000070 59.99 70 @@ -8693,7 +8693,7 @@ run_reportwriter.at-9078-reference:71.6-71.7: 73 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:122.6-122.7: +run_reportwriter.at-9079-reference:122.6-122.7: 119 120 121 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 3 @@ -8703,7 +8703,7 @@ run_reportwriter.at-9078-reference:122.6-122.7: 124 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:123.6-123.7: +run_reportwriter.at-9079-reference:123.6-123.7: 120 121 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 3 122 Region: MW @@ -8713,7 +8713,7 @@ run_reportwriter.at-9078-reference:123.6-123.7: 125 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:124.6-124.7: +run_reportwriter.at-9079-reference:124.6-124.7: 121 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 3 122 Region: MW 123 Location: 1000201 @@ -8723,7 +8723,7 @@ run_reportwriter.at-9078-reference:124.6-124.7: 126 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:128.6-128.7: +run_reportwriter.at-9079-reference:128.6-128.7: 125 -------------------------------------------------------------------------------------------------------------------------------- 126 127 @@ -8733,7 +8733,7 @@ run_reportwriter.at-9078-reference:128.6-128.7: 130 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:131.6-131.7: +run_reportwriter.at-9079-reference:131.6-131.7: 128 IN150209 20150209 OR150216 083 ITEM_NUMBER_77 00000077 79.99 129 Invoice Total: 000000077 79.99 130 @@ -8743,7 +8743,7 @@ run_reportwriter.at-9078-reference:131.6-131.7: 133 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:182.6-182.7: +run_reportwriter.at-9079-reference:182.6-182.7: 179 180 181 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 4 @@ -8753,7 +8753,7 @@ run_reportwriter.at-9078-reference:182.6-182.7: 184 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:183.6-183.7: +run_reportwriter.at-9079-reference:183.6-183.7: 180 181 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 4 182 Region: MW @@ -8763,7 +8763,7 @@ run_reportwriter.at-9078-reference:183.6-183.7: 185 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:184.6-184.7: +run_reportwriter.at-9079-reference:184.6-184.7: 181 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 4 182 Region: MW 183 Location: 1000291 @@ -8773,7 +8773,7 @@ run_reportwriter.at-9078-reference:184.6-184.7: 186 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:188.6-188.7: +run_reportwriter.at-9079-reference:188.6-188.7: 185 -------------------------------------------------------------------------------------------------------------------------------- 186 187 @@ -8783,7 +8783,7 @@ run_reportwriter.at-9078-reference:188.6-188.7: 190 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:242.6-242.7: +run_reportwriter.at-9079-reference:242.6-242.7: 239 240 241 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 5 @@ -8793,7 +8793,7 @@ run_reportwriter.at-9078-reference:242.6-242.7: 244 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:243.6-243.7: +run_reportwriter.at-9079-reference:243.6-243.7: 240 241 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 5 242 Region: MW @@ -8803,7 +8803,7 @@ run_reportwriter.at-9078-reference:243.6-243.7: 245 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:244.6-244.7: +run_reportwriter.at-9079-reference:244.6-244.7: 241 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 5 242 Region: MW 243 Location: 1000411 @@ -8813,7 +8813,7 @@ run_reportwriter.at-9078-reference:244.6-244.7: 246 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:248.6-248.7: +run_reportwriter.at-9079-reference:248.6-248.7: 245 -------------------------------------------------------------------------------------------------------------------------------- 246 247 @@ -8823,7 +8823,7 @@ run_reportwriter.at-9078-reference:248.6-248.7: 250 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:302.6-302.7: +run_reportwriter.at-9079-reference:302.6-302.7: 299 300 301 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 6 @@ -8833,7 +8833,7 @@ run_reportwriter.at-9078-reference:302.6-302.7: 304 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:303.6-303.7: +run_reportwriter.at-9079-reference:303.6-303.7: 300 301 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 6 302 Region: MW @@ -8843,7 +8843,7 @@ run_reportwriter.at-9078-reference:303.6-303.7: 305 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:304.6-304.7: +run_reportwriter.at-9079-reference:304.6-304.7: 301 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 6 302 Region: MW 303 Location: 1000451 @@ -8853,7 +8853,7 @@ run_reportwriter.at-9078-reference:304.6-304.7: 306 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:308.6-308.7: +run_reportwriter.at-9079-reference:308.6-308.7: 305 -------------------------------------------------------------------------------------------------------------------------------- 306 307 @@ -8863,7 +8863,7 @@ run_reportwriter.at-9078-reference:308.6-308.7: 310 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:362.6-362.7: +run_reportwriter.at-9079-reference:362.6-362.7: 359 360 361 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 7 @@ -8873,7 +8873,7 @@ run_reportwriter.at-9078-reference:362.6-362.7: 364 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:363.6-363.7: +run_reportwriter.at-9079-reference:363.6-363.7: 360 361 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 7 362 Region: MW @@ -8883,7 +8883,7 @@ run_reportwriter.at-9078-reference:363.6-363.7: 365 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:364.6-364.7: +run_reportwriter.at-9079-reference:364.6-364.7: 361 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 7 362 Region: MW 363 Location: 1000471 @@ -8893,7 +8893,7 @@ run_reportwriter.at-9078-reference:364.6-364.7: 366 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:368.6-368.7: +run_reportwriter.at-9079-reference:368.6-368.7: 365 -------------------------------------------------------------------------------------------------------------------------------- 366 367 @@ -8903,7 +8903,7 @@ run_reportwriter.at-9078-reference:368.6-368.7: 370 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:422.6-422.7: +run_reportwriter.at-9079-reference:422.6-422.7: 419 420 421 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 8 @@ -8913,7 +8913,7 @@ run_reportwriter.at-9078-reference:422.6-422.7: 424 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:423.6-423.7: +run_reportwriter.at-9079-reference:423.6-423.7: 420 421 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 8 422 Region: MW @@ -8923,7 +8923,7 @@ run_reportwriter.at-9078-reference:423.6-423.7: 425 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:424.6-424.7: +run_reportwriter.at-9079-reference:424.6-424.7: 421 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 8 422 Region: MW 423 Location: 1000831 @@ -8933,7 +8933,7 @@ run_reportwriter.at-9078-reference:424.6-424.7: 426 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:428.6-428.7: +run_reportwriter.at-9079-reference:428.6-428.7: 425 -------------------------------------------------------------------------------------------------------------------------------- 426 427 @@ -8943,7 +8943,7 @@ run_reportwriter.at-9078-reference:428.6-428.7: 430 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:431.6-431.7: +run_reportwriter.at-9079-reference:431.6-431.7: 428 IN150210 20150210 OR150227 042 ITEM_NUMBER_70 00000072 79.99 429 Invoice Total: 000000072 79.99 430 @@ -8953,7 +8953,7 @@ run_reportwriter.at-9078-reference:431.6-431.7: 433 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:434.6-434.7: +run_reportwriter.at-9079-reference:434.6-434.7: 431 IN150214 20150214 OR150228 090 ITEM_NUMBER_07 00000023 9.99 432 Invoice Total: 000000023 9.99 433 @@ -8963,7 +8963,7 @@ run_reportwriter.at-9078-reference:434.6-434.7: 436 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:482.6-482.7: +run_reportwriter.at-9079-reference:482.6-482.7: 479 480 481 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 9 @@ -8973,7 +8973,7 @@ run_reportwriter.at-9078-reference:482.6-482.7: 484 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:483.6-483.7: +run_reportwriter.at-9079-reference:483.6-483.7: 480 481 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 9 482 Region: MW @@ -8983,7 +8983,7 @@ run_reportwriter.at-9078-reference:483.6-483.7: 485 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:484.6-484.7: +run_reportwriter.at-9079-reference:484.6-484.7: 481 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 9 482 Region: MW 483 Location: 1000891 @@ -8993,7 +8993,7 @@ run_reportwriter.at-9078-reference:484.6-484.7: 486 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:488.6-488.7: +run_reportwriter.at-9079-reference:488.6-488.7: 485 -------------------------------------------------------------------------------------------------------------------------------- 486 487 @@ -9003,7 +9003,7 @@ run_reportwriter.at-9078-reference:488.6-488.7: 490 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:491.6-491.7: +run_reportwriter.at-9079-reference:491.6-491.7: 488 IN150221 20150221 OR150219 018 ITEM_NUMBER_72 00000073 79.99 489 Invoice Total: 000000073 79.99 490 @@ -9013,7 +9013,7 @@ run_reportwriter.at-9078-reference:491.6-491.7: 493 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:542.6-542.7: +run_reportwriter.at-9079-reference:542.6-542.7: 539 540 541 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 10 @@ -9023,7 +9023,7 @@ run_reportwriter.at-9078-reference:542.6-542.7: 544 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:543.6-543.7: +run_reportwriter.at-9079-reference:543.6-543.7: 540 541 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 10 542 Region: NE @@ -9033,7 +9033,7 @@ run_reportwriter.at-9078-reference:543.6-543.7: 545 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:544.6-544.7: +run_reportwriter.at-9079-reference:544.6-544.7: 541 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 10 542 Region: NE 543 Location: 1000001 @@ -9043,7 +9043,7 @@ run_reportwriter.at-9078-reference:544.6-544.7: 546 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:548.6-548.7: +run_reportwriter.at-9079-reference:548.6-548.7: 545 -------------------------------------------------------------------------------------------------------------------------------- 546 547 @@ -9053,7 +9053,7 @@ run_reportwriter.at-9078-reference:548.6-548.7: 550 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:602.6-602.7: +run_reportwriter.at-9079-reference:602.6-602.7: 599 600 601 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 11 @@ -9063,7 +9063,7 @@ run_reportwriter.at-9078-reference:602.6-602.7: 604 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:603.6-603.7: +run_reportwriter.at-9079-reference:603.6-603.7: 600 601 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 11 602 Region: NE @@ -9073,7 +9073,7 @@ run_reportwriter.at-9078-reference:603.6-603.7: 605 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:604.6-604.7: +run_reportwriter.at-9079-reference:604.6-604.7: 601 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 11 602 Region: NE 603 Location: 1000201 @@ -9083,7 +9083,7 @@ run_reportwriter.at-9078-reference:604.6-604.7: 606 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:608.6-608.7: +run_reportwriter.at-9079-reference:608.6-608.7: 605 -------------------------------------------------------------------------------------------------------------------------------- 606 607 @@ -9093,7 +9093,7 @@ run_reportwriter.at-9078-reference:608.6-608.7: 610 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:662.6-662.7: +run_reportwriter.at-9079-reference:662.6-662.7: 659 660 661 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 12 @@ -9103,7 +9103,7 @@ run_reportwriter.at-9078-reference:662.6-662.7: 664 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:663.6-663.7: +run_reportwriter.at-9079-reference:663.6-663.7: 660 661 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 12 662 Region: NE @@ -9113,7 +9113,7 @@ run_reportwriter.at-9078-reference:663.6-663.7: 665 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:664.6-664.7: +run_reportwriter.at-9079-reference:664.6-664.7: 661 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 12 662 Region: NE 663 Location: 1000431 @@ -9123,7 +9123,7 @@ run_reportwriter.at-9078-reference:664.6-664.7: 666 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:668.6-668.7: +run_reportwriter.at-9079-reference:668.6-668.7: 665 -------------------------------------------------------------------------------------------------------------------------------- 666 667 @@ -9133,7 +9133,7 @@ run_reportwriter.at-9078-reference:668.6-668.7: 670 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:671.6-671.7: +run_reportwriter.at-9079-reference:671.6-671.7: 668 IN150215 20150215 OR150227 047 ITEM_NUMBER_64 00000087 69.99 669 Invoice Total: 000000087 69.99 670 @@ -9143,7 +9143,7 @@ run_reportwriter.at-9078-reference:671.6-671.7: 673 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:722.6-722.7: +run_reportwriter.at-9079-reference:722.6-722.7: 719 720 721 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 13 @@ -9153,7 +9153,7 @@ run_reportwriter.at-9078-reference:722.6-722.7: 724 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:723.6-723.7: +run_reportwriter.at-9079-reference:723.6-723.7: 720 721 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 13 722 Region: NE @@ -9163,7 +9163,7 @@ run_reportwriter.at-9078-reference:723.6-723.7: 725 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:724.6-724.7: +run_reportwriter.at-9079-reference:724.6-724.7: 721 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 13 722 Region: NE 723 Location: 1000451 @@ -9173,7 +9173,7 @@ run_reportwriter.at-9078-reference:724.6-724.7: 726 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:728.6-728.7: +run_reportwriter.at-9079-reference:728.6-728.7: 725 -------------------------------------------------------------------------------------------------------------------------------- 726 727 @@ -9183,7 +9183,7 @@ run_reportwriter.at-9078-reference:728.6-728.7: 730 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:782.6-782.7: +run_reportwriter.at-9079-reference:782.6-782.7: 779 780 781 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 14 @@ -9193,7 +9193,7 @@ run_reportwriter.at-9078-reference:782.6-782.7: 784 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:783.6-783.7: +run_reportwriter.at-9079-reference:783.6-783.7: 780 781 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 14 782 Region: NE @@ -9203,7 +9203,7 @@ run_reportwriter.at-9078-reference:783.6-783.7: 785 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:784.6-784.7: +run_reportwriter.at-9079-reference:784.6-784.7: 781 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 14 782 Region: NE 783 Location: 1000471 @@ -9213,7 +9213,7 @@ run_reportwriter.at-9078-reference:784.6-784.7: 786 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:788.6-788.7: +run_reportwriter.at-9079-reference:788.6-788.7: 785 -------------------------------------------------------------------------------------------------------------------------------- 786 787 @@ -9223,7 +9223,7 @@ run_reportwriter.at-9078-reference:788.6-788.7: 790 Invoice Total: 000000108 159.98 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:842.6-842.7: +run_reportwriter.at-9079-reference:842.6-842.7: 839 840 841 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 15 @@ -9233,7 +9233,7 @@ run_reportwriter.at-9078-reference:842.6-842.7: 844 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:843.6-843.7: +run_reportwriter.at-9079-reference:843.6-843.7: 840 841 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 15 842 Region: NE @@ -9243,7 +9243,7 @@ run_reportwriter.at-9078-reference:843.6-843.7: 845 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:844.6-844.7: +run_reportwriter.at-9079-reference:844.6-844.7: 841 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 15 842 Region: NE 843 Location: 1000491 @@ -9253,7 +9253,7 @@ run_reportwriter.at-9078-reference:844.6-844.7: 846 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:848.6-848.7: +run_reportwriter.at-9079-reference:848.6-848.7: 845 -------------------------------------------------------------------------------------------------------------------------------- 846 847 @@ -9263,7 +9263,7 @@ run_reportwriter.at-9078-reference:848.6-848.7: 850 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:902.6-902.7: +run_reportwriter.at-9079-reference:902.6-902.7: 899 900 901 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 16 @@ -9273,7 +9273,7 @@ run_reportwriter.at-9078-reference:902.6-902.7: 904 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:903.6-903.7: +run_reportwriter.at-9079-reference:903.6-903.7: 900 901 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 16 902 Region: NE @@ -9283,7 +9283,7 @@ run_reportwriter.at-9078-reference:903.6-903.7: 905 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:904.6-904.7: +run_reportwriter.at-9079-reference:904.6-904.7: 901 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 16 902 Region: NE 903 Location: 1000601 @@ -9293,7 +9293,7 @@ run_reportwriter.at-9078-reference:904.6-904.7: 906 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:908.6-908.7: +run_reportwriter.at-9079-reference:908.6-908.7: 905 -------------------------------------------------------------------------------------------------------------------------------- 906 907 @@ -9303,7 +9303,7 @@ run_reportwriter.at-9078-reference:908.6-908.7: 910 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:962.6-962.7: +run_reportwriter.at-9079-reference:962.6-962.7: 959 960 961 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 17 @@ -9313,7 +9313,7 @@ run_reportwriter.at-9078-reference:962.6-962.7: 964 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:963.6-963.7: +run_reportwriter.at-9079-reference:963.6-963.7: 960 961 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 17 962 Region: NE @@ -9323,7 +9323,7 @@ run_reportwriter.at-9078-reference:963.6-963.7: 965 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:964.6-964.7: +run_reportwriter.at-9079-reference:964.6-964.7: 961 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 17 962 Region: NE 963 Location: 1000631 @@ -9333,7 +9333,7 @@ run_reportwriter.at-9078-reference:964.6-964.7: 966 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:968.6-968.7: +run_reportwriter.at-9079-reference:968.6-968.7: 965 -------------------------------------------------------------------------------------------------------------------------------- 966 967 @@ -9343,7 +9343,7 @@ run_reportwriter.at-9078-reference:968.6-968.7: 970 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1022.6-1022.7: +run_reportwriter.at-9079-reference:1022.6-1022.7: 1019 1020 1021 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 18 @@ -9353,7 +9353,7 @@ run_reportwriter.at-9078-reference:1022.6-1022.7: 1024 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1023.6-1023.7: +run_reportwriter.at-9079-reference:1023.6-1023.7: 1020 1021 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 18 1022 Region: NE @@ -9363,7 +9363,7 @@ run_reportwriter.at-9078-reference:1023.6-1023.7: 1025 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1024.6-1024.7: +run_reportwriter.at-9079-reference:1024.6-1024.7: 1021 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 18 1022 Region: NE 1023 Location: 1000671 @@ -9373,7 +9373,7 @@ run_reportwriter.at-9078-reference:1024.6-1024.7: 1026 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1028.6-1028.7: +run_reportwriter.at-9079-reference:1028.6-1028.7: 1025 -------------------------------------------------------------------------------------------------------------------------------- 1026 1027 @@ -9383,7 +9383,7 @@ run_reportwriter.at-9078-reference:1028.6-1028.7: 1030 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:1082.6-1082.7: +run_reportwriter.at-9079-reference:1082.6-1082.7: 1079 1080 1081 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 19 @@ -9393,7 +9393,7 @@ run_reportwriter.at-9078-reference:1082.6-1082.7: 1084 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1083.6-1083.7: +run_reportwriter.at-9079-reference:1083.6-1083.7: 1080 1081 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 19 1082 Region: NE @@ -9403,7 +9403,7 @@ run_reportwriter.at-9078-reference:1083.6-1083.7: 1085 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1084.6-1084.7: +run_reportwriter.at-9079-reference:1084.6-1084.7: 1081 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 19 1082 Region: NE 1083 Location: 1000811 @@ -9413,7 +9413,7 @@ run_reportwriter.at-9078-reference:1084.6-1084.7: 1086 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1088.6-1088.7: +run_reportwriter.at-9079-reference:1088.6-1088.7: 1085 -------------------------------------------------------------------------------------------------------------------------------- 1086 1087 @@ -9423,7 +9423,7 @@ run_reportwriter.at-9078-reference:1088.6-1088.7: 1090 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1091.6-1091.7: +run_reportwriter.at-9079-reference:1091.6-1091.7: 1088 IN150220 20150220 OR150212 086 ITEM_NUMBER_27 00000017 29.99 1089 Invoice Total: 000000017 29.99 1090 @@ -9433,7 +9433,7 @@ run_reportwriter.at-9078-reference:1091.6-1091.7: 1093 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1142.6-1142.7: +run_reportwriter.at-9079-reference:1142.6-1142.7: 1139 1140 1141 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 20 @@ -9443,7 +9443,7 @@ run_reportwriter.at-9078-reference:1142.6-1142.7: 1144 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1143.6-1143.7: +run_reportwriter.at-9079-reference:1143.6-1143.7: 1140 1141 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 20 1142 Region: NE @@ -9453,7 +9453,7 @@ run_reportwriter.at-9078-reference:1143.6-1143.7: 1145 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1144.6-1144.7: +run_reportwriter.at-9079-reference:1144.6-1144.7: 1141 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 20 1142 Region: NE 1143 Location: 1000831 @@ -9463,7 +9463,7 @@ run_reportwriter.at-9078-reference:1144.6-1144.7: 1146 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1148.6-1148.7: +run_reportwriter.at-9079-reference:1148.6-1148.7: 1145 -------------------------------------------------------------------------------------------------------------------------------- 1146 1147 @@ -9473,7 +9473,7 @@ run_reportwriter.at-9078-reference:1148.6-1148.7: 1150 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1202.6-1202.7: +run_reportwriter.at-9079-reference:1202.6-1202.7: 1199 1200 1201 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 21 @@ -9483,7 +9483,7 @@ run_reportwriter.at-9078-reference:1202.6-1202.7: 1204 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1203.6-1203.7: +run_reportwriter.at-9079-reference:1203.6-1203.7: 1200 1201 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 21 1202 Region: NW @@ -9493,7 +9493,7 @@ run_reportwriter.at-9078-reference:1203.6-1203.7: 1205 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1204.6-1204.7: +run_reportwriter.at-9079-reference:1204.6-1204.7: 1201 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 21 1202 Region: NW 1203 Location: 1000001 @@ -9503,7 +9503,7 @@ run_reportwriter.at-9078-reference:1204.6-1204.7: 1206 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1208.6-1208.7: +run_reportwriter.at-9079-reference:1208.6-1208.7: 1205 -------------------------------------------------------------------------------------------------------------------------------- 1206 1207 @@ -9513,7 +9513,7 @@ run_reportwriter.at-9078-reference:1208.6-1208.7: 1210 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1262.6-1262.7: +run_reportwriter.at-9079-reference:1262.6-1262.7: 1259 1260 1261 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 22 @@ -9523,7 +9523,7 @@ run_reportwriter.at-9078-reference:1262.6-1262.7: 1264 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1263.6-1263.7: +run_reportwriter.at-9079-reference:1263.6-1263.7: 1260 1261 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 22 1262 Region: NW @@ -9533,7 +9533,7 @@ run_reportwriter.at-9078-reference:1263.6-1263.7: 1265 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1264.6-1264.7: +run_reportwriter.at-9079-reference:1264.6-1264.7: 1261 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 22 1262 Region: NW 1263 Location: 1000011 @@ -9543,7 +9543,7 @@ run_reportwriter.at-9078-reference:1264.6-1264.7: 1266 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1268.6-1268.7: +run_reportwriter.at-9079-reference:1268.6-1268.7: 1265 -------------------------------------------------------------------------------------------------------------------------------- 1266 1267 @@ -9553,7 +9553,7 @@ run_reportwriter.at-9078-reference:1268.6-1268.7: 1270 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1322.6-1322.7: +run_reportwriter.at-9079-reference:1322.6-1322.7: 1319 1320 1321 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 23 @@ -9563,7 +9563,7 @@ run_reportwriter.at-9078-reference:1322.6-1322.7: 1324 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1323.6-1323.7: +run_reportwriter.at-9079-reference:1323.6-1323.7: 1320 1321 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 23 1322 Region: NW @@ -9573,7 +9573,7 @@ run_reportwriter.at-9078-reference:1323.6-1323.7: 1325 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1324.6-1324.7: +run_reportwriter.at-9079-reference:1324.6-1324.7: 1321 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 23 1322 Region: NW 1323 Location: 1000051 @@ -9583,7 +9583,7 @@ run_reportwriter.at-9078-reference:1324.6-1324.7: 1326 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1328.6-1328.7: +run_reportwriter.at-9079-reference:1328.6-1328.7: 1325 -------------------------------------------------------------------------------------------------------------------------------- 1326 1327 @@ -9593,7 +9593,7 @@ run_reportwriter.at-9078-reference:1328.6-1328.7: 1330 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1331.6-1331.7: +run_reportwriter.at-9079-reference:1331.6-1331.7: 1328 IN150210 20150210 OR150225 076 ITEM_NUMBER_50 00000039 59.99 1329 Invoice Total: 000000039 59.99 1330 @@ -9603,7 +9603,7 @@ run_reportwriter.at-9078-reference:1331.6-1331.7: 1333 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1334.6-1334.7: +run_reportwriter.at-9079-reference:1334.6-1334.7: 1331 IN150218 20150218 OR150229 093 ITEM_NUMBER_94 00000037 99.99 1332 Invoice Total: 000000037 99.99 1333 @@ -9613,7 +9613,7 @@ run_reportwriter.at-9078-reference:1334.6-1334.7: 1336 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1382.6-1382.7: +run_reportwriter.at-9079-reference:1382.6-1382.7: 1379 1380 1381 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 24 @@ -9623,7 +9623,7 @@ run_reportwriter.at-9078-reference:1382.6-1382.7: 1384 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1383.6-1383.7: +run_reportwriter.at-9079-reference:1383.6-1383.7: 1380 1381 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 24 1382 Region: NW @@ -9633,7 +9633,7 @@ run_reportwriter.at-9078-reference:1383.6-1383.7: 1385 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1384.6-1384.7: +run_reportwriter.at-9079-reference:1384.6-1384.7: 1381 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 24 1382 Region: NW 1383 Location: 1000071 @@ -9643,7 +9643,7 @@ run_reportwriter.at-9078-reference:1384.6-1384.7: 1386 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1388.6-1388.7: +run_reportwriter.at-9079-reference:1388.6-1388.7: 1385 -------------------------------------------------------------------------------------------------------------------------------- 1386 1387 @@ -9653,7 +9653,7 @@ run_reportwriter.at-9078-reference:1388.6-1388.7: 1390 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:1442.6-1442.7: +run_reportwriter.at-9079-reference:1442.6-1442.7: 1439 1440 1441 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 25 @@ -9663,7 +9663,7 @@ run_reportwriter.at-9078-reference:1442.6-1442.7: 1444 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1443.6-1443.7: +run_reportwriter.at-9079-reference:1443.6-1443.7: 1440 1441 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 25 1442 Region: NW @@ -9673,7 +9673,7 @@ run_reportwriter.at-9078-reference:1443.6-1443.7: 1445 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1444.6-1444.7: +run_reportwriter.at-9079-reference:1444.6-1444.7: 1441 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 25 1442 Region: NW 1443 Location: 1000091 @@ -9683,7 +9683,7 @@ run_reportwriter.at-9078-reference:1444.6-1444.7: 1446 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1448.6-1448.7: +run_reportwriter.at-9079-reference:1448.6-1448.7: 1445 -------------------------------------------------------------------------------------------------------------------------------- 1446 1447 @@ -9693,7 +9693,7 @@ run_reportwriter.at-9078-reference:1448.6-1448.7: 1450 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:1451.6-1451.7: +run_reportwriter.at-9079-reference:1451.6-1451.7: 1448 IN150208 20150208 OR150229 094 ITEM_NUMBER_17 00000072 19.99 1449 Invoice Total: 000000072 19.99 1450 @@ -9703,7 +9703,7 @@ run_reportwriter.at-9078-reference:1451.6-1451.7: 1453 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1454.6-1454.7: +run_reportwriter.at-9079-reference:1454.6-1454.7: 1451 IN150212 20150212 OR150222 096 ITEM_NUMBER_89 00000049 89.99 1452 Invoice Total: 000000049 89.99 1453 @@ -9713,7 +9713,7 @@ run_reportwriter.at-9078-reference:1454.6-1454.7: 1456 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1457.6-1457.7: +run_reportwriter.at-9079-reference:1457.6-1457.7: 1454 IN150224 20150224 OR150211 074 ITEM_NUMBER_90 00000043 99.99 1455 Invoice Total: 000000043 99.99 1456 @@ -9723,7 +9723,7 @@ run_reportwriter.at-9078-reference:1457.6-1457.7: 1459 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1502.6-1502.7: +run_reportwriter.at-9079-reference:1502.6-1502.7: 1499 1500 1501 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 26 @@ -9733,7 +9733,7 @@ run_reportwriter.at-9078-reference:1502.6-1502.7: 1504 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1503.6-1503.7: +run_reportwriter.at-9079-reference:1503.6-1503.7: 1500 1501 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 26 1502 Region: NW @@ -9743,7 +9743,7 @@ run_reportwriter.at-9078-reference:1503.6-1503.7: 1505 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1504.6-1504.7: +run_reportwriter.at-9079-reference:1504.6-1504.7: 1501 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 26 1502 Region: NW 1503 Location: 1000201 @@ -9753,7 +9753,7 @@ run_reportwriter.at-9078-reference:1504.6-1504.7: 1506 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1508.6-1508.7: +run_reportwriter.at-9079-reference:1508.6-1508.7: 1505 -------------------------------------------------------------------------------------------------------------------------------- 1506 1507 @@ -9763,7 +9763,7 @@ run_reportwriter.at-9078-reference:1508.6-1508.7: 1510 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:1562.6-1562.7: +run_reportwriter.at-9079-reference:1562.6-1562.7: 1559 1560 1561 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 27 @@ -9773,7 +9773,7 @@ run_reportwriter.at-9078-reference:1562.6-1562.7: 1564 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1563.6-1563.7: +run_reportwriter.at-9079-reference:1563.6-1563.7: 1560 1561 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 27 1562 Region: NW @@ -9783,7 +9783,7 @@ run_reportwriter.at-9078-reference:1563.6-1563.7: 1565 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1564.6-1564.7: +run_reportwriter.at-9079-reference:1564.6-1564.7: 1561 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 27 1562 Region: NW 1563 Location: 1000231 @@ -9793,7 +9793,7 @@ run_reportwriter.at-9078-reference:1564.6-1564.7: 1566 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1568.6-1568.7: +run_reportwriter.at-9079-reference:1568.6-1568.7: 1565 -------------------------------------------------------------------------------------------------------------------------------- 1566 1567 @@ -9803,7 +9803,7 @@ run_reportwriter.at-9078-reference:1568.6-1568.7: 1570 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1622.6-1622.7: +run_reportwriter.at-9079-reference:1622.6-1622.7: 1619 1620 1621 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 28 @@ -9813,7 +9813,7 @@ run_reportwriter.at-9078-reference:1622.6-1622.7: 1624 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1623.6-1623.7: +run_reportwriter.at-9079-reference:1623.6-1623.7: 1620 1621 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 28 1622 Region: NW @@ -9823,7 +9823,7 @@ run_reportwriter.at-9078-reference:1623.6-1623.7: 1625 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1624.6-1624.7: +run_reportwriter.at-9079-reference:1624.6-1624.7: 1621 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 28 1622 Region: NW 1623 Location: 1000251 @@ -9833,7 +9833,7 @@ run_reportwriter.at-9078-reference:1624.6-1624.7: 1626 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1628.6-1628.7: +run_reportwriter.at-9079-reference:1628.6-1628.7: 1625 -------------------------------------------------------------------------------------------------------------------------------- 1626 1627 @@ -9843,7 +9843,7 @@ run_reportwriter.at-9078-reference:1628.6-1628.7: 1630 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1682.6-1682.7: +run_reportwriter.at-9079-reference:1682.6-1682.7: 1679 1680 1681 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 29 @@ -9853,7 +9853,7 @@ run_reportwriter.at-9078-reference:1682.6-1682.7: 1684 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1683.6-1683.7: +run_reportwriter.at-9079-reference:1683.6-1683.7: 1680 1681 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 29 1682 Region: NW @@ -9863,7 +9863,7 @@ run_reportwriter.at-9078-reference:1683.6-1683.7: 1685 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1684.6-1684.7: +run_reportwriter.at-9079-reference:1684.6-1684.7: 1681 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 29 1682 Region: NW 1683 Location: 1000401 @@ -9873,7 +9873,7 @@ run_reportwriter.at-9078-reference:1684.6-1684.7: 1686 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1688.6-1688.7: +run_reportwriter.at-9079-reference:1688.6-1688.7: 1685 -------------------------------------------------------------------------------------------------------------------------------- 1686 1687 @@ -9883,7 +9883,7 @@ run_reportwriter.at-9078-reference:1688.6-1688.7: 1690 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1691.6-1691.7: +run_reportwriter.at-9079-reference:1691.6-1691.7: 1688 IN150215 20150215 OR150222 049 ITEM_NUMBER_40 00000081 49.99 1689 Invoice Total: 000000081 49.99 1690 @@ -9893,7 +9893,7 @@ run_reportwriter.at-9078-reference:1691.6-1691.7: 1693 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1742.6-1742.7: +run_reportwriter.at-9079-reference:1742.6-1742.7: 1739 1740 1741 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 30 @@ -9903,7 +9903,7 @@ run_reportwriter.at-9078-reference:1742.6-1742.7: 1744 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1743.6-1743.7: +run_reportwriter.at-9079-reference:1743.6-1743.7: 1740 1741 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 30 1742 Region: NW @@ -9913,7 +9913,7 @@ run_reportwriter.at-9078-reference:1743.6-1743.7: 1745 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1744.6-1744.7: +run_reportwriter.at-9079-reference:1744.6-1744.7: 1741 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 30 1742 Region: NW 1743 Location: 1000411 @@ -9923,7 +9923,7 @@ run_reportwriter.at-9078-reference:1744.6-1744.7: 1746 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1748.6-1748.7: +run_reportwriter.at-9079-reference:1748.6-1748.7: 1745 -------------------------------------------------------------------------------------------------------------------------------- 1746 1747 @@ -9933,7 +9933,7 @@ run_reportwriter.at-9078-reference:1748.6-1748.7: 1750 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:1751.6-1751.7: +run_reportwriter.at-9079-reference:1751.6-1751.7: 1748 IN150207 20150207 OR150224 056 ITEM_NUMBER_99 00000054 99.99 1749 Invoice Total: 000000054 99.99 1750 @@ -9943,7 +9943,7 @@ run_reportwriter.at-9078-reference:1751.6-1751.7: 1753 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1802.6-1802.7: +run_reportwriter.at-9079-reference:1802.6-1802.7: 1799 1800 1801 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 31 @@ -9953,7 +9953,7 @@ run_reportwriter.at-9078-reference:1802.6-1802.7: 1804 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1803.6-1803.7: +run_reportwriter.at-9079-reference:1803.6-1803.7: 1800 1801 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 31 1802 Region: NW @@ -9963,7 +9963,7 @@ run_reportwriter.at-9078-reference:1803.6-1803.7: 1805 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1804.6-1804.7: +run_reportwriter.at-9079-reference:1804.6-1804.7: 1801 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 31 1802 Region: NW 1803 Location: 1000491 @@ -9973,7 +9973,7 @@ run_reportwriter.at-9078-reference:1804.6-1804.7: 1806 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1808.6-1808.7: +run_reportwriter.at-9079-reference:1808.6-1808.7: 1805 -------------------------------------------------------------------------------------------------------------------------------- 1806 1807 @@ -9983,7 +9983,7 @@ run_reportwriter.at-9078-reference:1808.6-1808.7: 1810 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1862.6-1862.7: +run_reportwriter.at-9079-reference:1862.6-1862.7: 1859 1860 1861 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 32 @@ -9993,7 +9993,7 @@ run_reportwriter.at-9078-reference:1862.6-1862.7: 1864 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1863.6-1863.7: +run_reportwriter.at-9079-reference:1863.6-1863.7: 1860 1861 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 32 1862 Region: NW @@ -10003,7 +10003,7 @@ run_reportwriter.at-9078-reference:1863.6-1863.7: 1865 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1864.6-1864.7: +run_reportwriter.at-9079-reference:1864.6-1864.7: 1861 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 32 1862 Region: NW 1863 Location: 1000611 @@ -10013,7 +10013,7 @@ run_reportwriter.at-9078-reference:1864.6-1864.7: 1866 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1868.6-1868.7: +run_reportwriter.at-9079-reference:1868.6-1868.7: 1865 -------------------------------------------------------------------------------------------------------------------------------- 1866 1867 @@ -10023,7 +10023,7 @@ run_reportwriter.at-9078-reference:1868.6-1868.7: 1870 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1922.6-1922.7: +run_reportwriter.at-9079-reference:1922.6-1922.7: 1919 1920 1921 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 33 @@ -10033,7 +10033,7 @@ run_reportwriter.at-9078-reference:1922.6-1922.7: 1924 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1923.6-1923.7: +run_reportwriter.at-9079-reference:1923.6-1923.7: 1920 1921 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 33 1922 Region: NW @@ -10043,7 +10043,7 @@ run_reportwriter.at-9078-reference:1923.6-1923.7: 1925 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1924.6-1924.7: +run_reportwriter.at-9079-reference:1924.6-1924.7: 1921 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 33 1922 Region: NW 1923 Location: 1000631 @@ -10053,7 +10053,7 @@ run_reportwriter.at-9078-reference:1924.6-1924.7: 1926 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1928.6-1928.7: +run_reportwriter.at-9079-reference:1928.6-1928.7: 1925 -------------------------------------------------------------------------------------------------------------------------------- 1926 1927 @@ -10063,7 +10063,7 @@ run_reportwriter.at-9078-reference:1928.6-1928.7: 1930 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:1931.6-1931.7: +run_reportwriter.at-9079-reference:1931.6-1931.7: 1928 IN150207 20150207 OR150206 031 ITEM_NUMBER_49 00000015 49.99 1929 Invoice Total: 000000015 49.99 1930 @@ -10073,7 +10073,7 @@ run_reportwriter.at-9078-reference:1931.6-1931.7: 1933 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:1934.6-1934.7: +run_reportwriter.at-9079-reference:1934.6-1934.7: 1931 IN150214 20150214 OR150210 054 ITEM_NUMBER_40 00000042 49.99 1932 Invoice Total: 000000042 49.99 1933 @@ -10083,7 +10083,7 @@ run_reportwriter.at-9078-reference:1934.6-1934.7: 1936 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:1982.6-1982.7: +run_reportwriter.at-9079-reference:1982.6-1982.7: 1979 1980 1981 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 34 @@ -10093,7 +10093,7 @@ run_reportwriter.at-9078-reference:1982.6-1982.7: 1984 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:1983.6-1983.7: +run_reportwriter.at-9079-reference:1983.6-1983.7: 1980 1981 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 34 1982 Region: NW @@ -10103,7 +10103,7 @@ run_reportwriter.at-9078-reference:1983.6-1983.7: 1985 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:1984.6-1984.7: +run_reportwriter.at-9079-reference:1984.6-1984.7: 1981 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 34 1982 Region: NW 1983 Location: 1000651 @@ -10113,7 +10113,7 @@ run_reportwriter.at-9078-reference:1984.6-1984.7: 1986 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:1988.6-1988.7: +run_reportwriter.at-9079-reference:1988.6-1988.7: 1985 -------------------------------------------------------------------------------------------------------------------------------- 1986 1987 @@ -10123,7 +10123,7 @@ run_reportwriter.at-9078-reference:1988.6-1988.7: 1990 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2042.6-2042.7: +run_reportwriter.at-9079-reference:2042.6-2042.7: 2039 2040 2041 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 35 @@ -10133,7 +10133,7 @@ run_reportwriter.at-9078-reference:2042.6-2042.7: 2044 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2043.6-2043.7: +run_reportwriter.at-9079-reference:2043.6-2043.7: 2040 2041 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 35 2042 Region: NW @@ -10143,7 +10143,7 @@ run_reportwriter.at-9078-reference:2043.6-2043.7: 2045 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2044.6-2044.7: +run_reportwriter.at-9079-reference:2044.6-2044.7: 2041 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 35 2042 Region: NW 2043 Location: 1000671 @@ -10153,7 +10153,7 @@ run_reportwriter.at-9078-reference:2044.6-2044.7: 2046 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2048.6-2048.7: +run_reportwriter.at-9079-reference:2048.6-2048.7: 2045 -------------------------------------------------------------------------------------------------------------------------------- 2046 2047 @@ -10163,7 +10163,7 @@ run_reportwriter.at-9078-reference:2048.6-2048.7: 2050 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:2102.6-2102.7: +run_reportwriter.at-9079-reference:2102.6-2102.7: 2099 2100 2101 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 36 @@ -10173,7 +10173,7 @@ run_reportwriter.at-9078-reference:2102.6-2102.7: 2104 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2103.6-2103.7: +run_reportwriter.at-9079-reference:2103.6-2103.7: 2100 2101 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 36 2102 Region: NW @@ -10183,7 +10183,7 @@ run_reportwriter.at-9078-reference:2103.6-2103.7: 2105 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2104.6-2104.7: +run_reportwriter.at-9079-reference:2104.6-2104.7: 2101 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 36 2102 Region: NW 2103 Location: 1000691 @@ -10193,7 +10193,7 @@ run_reportwriter.at-9078-reference:2104.6-2104.7: 2106 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2108.6-2108.7: +run_reportwriter.at-9079-reference:2108.6-2108.7: 2105 -------------------------------------------------------------------------------------------------------------------------------- 2106 2107 @@ -10203,7 +10203,7 @@ run_reportwriter.at-9078-reference:2108.6-2108.7: 2110 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2162.6-2162.7: +run_reportwriter.at-9079-reference:2162.6-2162.7: 2159 2160 2161 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 37 @@ -10213,7 +10213,7 @@ run_reportwriter.at-9078-reference:2162.6-2162.7: 2164 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2163.6-2163.7: +run_reportwriter.at-9079-reference:2163.6-2163.7: 2160 2161 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 37 2162 Region: NW @@ -10223,7 +10223,7 @@ run_reportwriter.at-9078-reference:2163.6-2163.7: 2165 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2164.6-2164.7: +run_reportwriter.at-9079-reference:2164.6-2164.7: 2161 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 37 2162 Region: NW 2163 Location: 1000811 @@ -10233,7 +10233,7 @@ run_reportwriter.at-9078-reference:2164.6-2164.7: 2166 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2168.6-2168.7: +run_reportwriter.at-9079-reference:2168.6-2168.7: 2165 -------------------------------------------------------------------------------------------------------------------------------- 2166 2167 @@ -10243,7 +10243,7 @@ run_reportwriter.at-9078-reference:2168.6-2168.7: 2170 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:2222.6-2222.7: +run_reportwriter.at-9079-reference:2222.6-2222.7: 2219 2220 2221 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 38 @@ -10253,7 +10253,7 @@ run_reportwriter.at-9078-reference:2222.6-2222.7: 2224 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2223.6-2223.7: +run_reportwriter.at-9079-reference:2223.6-2223.7: 2220 2221 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 38 2222 Region: NW @@ -10263,7 +10263,7 @@ run_reportwriter.at-9078-reference:2223.6-2223.7: 2225 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2224.6-2224.7: +run_reportwriter.at-9079-reference:2224.6-2224.7: 2221 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 38 2222 Region: NW 2223 Location: 1000851 @@ -10273,7 +10273,7 @@ run_reportwriter.at-9078-reference:2224.6-2224.7: 2226 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2228.6-2228.7: +run_reportwriter.at-9079-reference:2228.6-2228.7: 2225 -------------------------------------------------------------------------------------------------------------------------------- 2226 2227 @@ -10283,7 +10283,7 @@ run_reportwriter.at-9078-reference:2228.6-2228.7: 2230 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2282.6-2282.7: +run_reportwriter.at-9079-reference:2282.6-2282.7: 2279 2280 2281 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 39 @@ -10293,7 +10293,7 @@ run_reportwriter.at-9078-reference:2282.6-2282.7: 2284 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2283.6-2283.7: +run_reportwriter.at-9079-reference:2283.6-2283.7: 2280 2281 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 39 2282 Region: NW @@ -10303,7 +10303,7 @@ run_reportwriter.at-9078-reference:2283.6-2283.7: 2285 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2284.6-2284.7: +run_reportwriter.at-9079-reference:2284.6-2284.7: 2281 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 39 2282 Region: NW 2283 Location: 1000871 @@ -10313,7 +10313,7 @@ run_reportwriter.at-9078-reference:2284.6-2284.7: 2286 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2288.6-2288.7: +run_reportwriter.at-9079-reference:2288.6-2288.7: 2285 -------------------------------------------------------------------------------------------------------------------------------- 2286 2287 @@ -10323,7 +10323,7 @@ run_reportwriter.at-9078-reference:2288.6-2288.7: 2290 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:2291.6-2291.7: +run_reportwriter.at-9079-reference:2291.6-2291.7: 2288 IN150218 20150218 OR150209 082 ITEM_NUMBER_30 00000055 39.99 2289 Invoice Total: 000000055 39.99 2290 @@ -10333,7 +10333,7 @@ run_reportwriter.at-9078-reference:2291.6-2291.7: 2293 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:2342.6-2342.7: +run_reportwriter.at-9079-reference:2342.6-2342.7: 2339 2340 2341 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 40 @@ -10343,7 +10343,7 @@ run_reportwriter.at-9078-reference:2342.6-2342.7: 2344 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2343.6-2343.7: +run_reportwriter.at-9079-reference:2343.6-2343.7: 2340 2341 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 40 2342 Region: NW @@ -10353,7 +10353,7 @@ run_reportwriter.at-9078-reference:2343.6-2343.7: 2345 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2344.6-2344.7: +run_reportwriter.at-9079-reference:2344.6-2344.7: 2341 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 40 2342 Region: NW 2343 Location: 1000891 @@ -10363,7 +10363,7 @@ run_reportwriter.at-9078-reference:2344.6-2344.7: 2346 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2348.6-2348.7: +run_reportwriter.at-9079-reference:2348.6-2348.7: 2345 -------------------------------------------------------------------------------------------------------------------------------- 2346 2347 @@ -10373,7 +10373,7 @@ run_reportwriter.at-9078-reference:2348.6-2348.7: 2350 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:2402.6-2402.7: +run_reportwriter.at-9079-reference:2402.6-2402.7: 2399 2400 2401 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 41 @@ -10383,7 +10383,7 @@ run_reportwriter.at-9078-reference:2402.6-2402.7: 2404 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2403.6-2403.7: +run_reportwriter.at-9079-reference:2403.6-2403.7: 2400 2401 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 41 2402 Region: SE @@ -10393,7 +10393,7 @@ run_reportwriter.at-9078-reference:2403.6-2403.7: 2405 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2404.6-2404.7: +run_reportwriter.at-9079-reference:2404.6-2404.7: 2401 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 41 2402 Region: SE 2403 Location: 1000001 @@ -10403,7 +10403,7 @@ run_reportwriter.at-9078-reference:2404.6-2404.7: 2406 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2408.6-2408.7: +run_reportwriter.at-9079-reference:2408.6-2408.7: 2405 -------------------------------------------------------------------------------------------------------------------------------- 2406 2407 @@ -10413,7 +10413,7 @@ run_reportwriter.at-9078-reference:2408.6-2408.7: 2410 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:2462.6-2462.7: +run_reportwriter.at-9079-reference:2462.6-2462.7: 2459 2460 2461 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 42 @@ -10423,7 +10423,7 @@ run_reportwriter.at-9078-reference:2462.6-2462.7: 2464 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2463.6-2463.7: +run_reportwriter.at-9079-reference:2463.6-2463.7: 2460 2461 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 42 2462 Region: SE @@ -10433,7 +10433,7 @@ run_reportwriter.at-9078-reference:2463.6-2463.7: 2465 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2464.6-2464.7: +run_reportwriter.at-9079-reference:2464.6-2464.7: 2461 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 42 2462 Region: SE 2463 Location: 1000011 @@ -10443,7 +10443,7 @@ run_reportwriter.at-9078-reference:2464.6-2464.7: 2466 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2468.6-2468.7: +run_reportwriter.at-9079-reference:2468.6-2468.7: 2465 -------------------------------------------------------------------------------------------------------------------------------- 2466 2467 @@ -10453,7 +10453,7 @@ run_reportwriter.at-9078-reference:2468.6-2468.7: 2470 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2471.6-2471.7: +run_reportwriter.at-9079-reference:2471.6-2471.7: 2468 IN150201 20150201 OR150213 017 ITEM_NUMBER_09 00000006 9.99 2469 Invoice Total: 000000006 9.99 2470 @@ -10463,7 +10463,7 @@ run_reportwriter.at-9078-reference:2471.6-2471.7: 2473 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:2522.6-2522.7: +run_reportwriter.at-9079-reference:2522.6-2522.7: 2519 2520 2521 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 43 @@ -10473,7 +10473,7 @@ run_reportwriter.at-9078-reference:2522.6-2522.7: 2524 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2523.6-2523.7: +run_reportwriter.at-9079-reference:2523.6-2523.7: 2520 2521 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 43 2522 Region: SE @@ -10483,7 +10483,7 @@ run_reportwriter.at-9078-reference:2523.6-2523.7: 2525 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2524.6-2524.7: +run_reportwriter.at-9079-reference:2524.6-2524.7: 2521 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 43 2522 Region: SE 2523 Location: 1000091 @@ -10493,7 +10493,7 @@ run_reportwriter.at-9078-reference:2524.6-2524.7: 2526 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2528.6-2528.7: +run_reportwriter.at-9079-reference:2528.6-2528.7: 2525 -------------------------------------------------------------------------------------------------------------------------------- 2526 2527 @@ -10503,7 +10503,7 @@ run_reportwriter.at-9078-reference:2528.6-2528.7: 2530 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2531.6-2531.7: +run_reportwriter.at-9079-reference:2531.6-2531.7: 2528 IN150204 20150204 OR150201 001 ITEM_NUMBER_68 00000019 69.99 2529 Invoice Total: 000000019 69.99 2530 @@ -10513,7 +10513,7 @@ run_reportwriter.at-9078-reference:2531.6-2531.7: 2533 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:2534.6-2534.7: +run_reportwriter.at-9079-reference:2534.6-2534.7: 2531 IN150210 20150210 OR150223 084 ITEM_NUMBER_11 00000093 19.99 2532 Invoice Total: 000000093 19.99 2533 @@ -10523,7 +10523,7 @@ run_reportwriter.at-9078-reference:2534.6-2534.7: 2536 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:2582.6-2582.7: +run_reportwriter.at-9079-reference:2582.6-2582.7: 2579 2580 2581 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 44 @@ -10533,7 +10533,7 @@ run_reportwriter.at-9078-reference:2582.6-2582.7: 2584 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2583.6-2583.7: +run_reportwriter.at-9079-reference:2583.6-2583.7: 2580 2581 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 44 2582 Region: SE @@ -10543,7 +10543,7 @@ run_reportwriter.at-9078-reference:2583.6-2583.7: 2585 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2584.6-2584.7: +run_reportwriter.at-9079-reference:2584.6-2584.7: 2581 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 44 2582 Region: SE 2583 Location: 1000211 @@ -10553,7 +10553,7 @@ run_reportwriter.at-9078-reference:2584.6-2584.7: 2586 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2588.6-2588.7: +run_reportwriter.at-9079-reference:2588.6-2588.7: 2585 -------------------------------------------------------------------------------------------------------------------------------- 2586 2587 @@ -10563,7 +10563,7 @@ run_reportwriter.at-9078-reference:2588.6-2588.7: 2590 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2642.6-2642.7: +run_reportwriter.at-9079-reference:2642.6-2642.7: 2639 2640 2641 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 45 @@ -10573,7 +10573,7 @@ run_reportwriter.at-9078-reference:2642.6-2642.7: 2644 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2643.6-2643.7: +run_reportwriter.at-9079-reference:2643.6-2643.7: 2640 2641 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 45 2642 Region: SE @@ -10583,7 +10583,7 @@ run_reportwriter.at-9078-reference:2643.6-2643.7: 2645 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2644.6-2644.7: +run_reportwriter.at-9079-reference:2644.6-2644.7: 2641 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 45 2642 Region: SE 2643 Location: 1000411 @@ -10593,7 +10593,7 @@ run_reportwriter.at-9078-reference:2644.6-2644.7: 2646 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2648.6-2648.7: +run_reportwriter.at-9079-reference:2648.6-2648.7: 2645 -------------------------------------------------------------------------------------------------------------------------------- 2646 2647 @@ -10603,7 +10603,7 @@ run_reportwriter.at-9078-reference:2648.6-2648.7: 2650 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:2702.6-2702.7: +run_reportwriter.at-9079-reference:2702.6-2702.7: 2699 2700 2701 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 46 @@ -10613,7 +10613,7 @@ run_reportwriter.at-9078-reference:2702.6-2702.7: 2704 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2703.6-2703.7: +run_reportwriter.at-9079-reference:2703.6-2703.7: 2700 2701 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 46 2702 Region: SE @@ -10623,7 +10623,7 @@ run_reportwriter.at-9078-reference:2703.6-2703.7: 2705 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2704.6-2704.7: +run_reportwriter.at-9079-reference:2704.6-2704.7: 2701 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 46 2702 Region: SE 2703 Location: 1000431 @@ -10633,7 +10633,7 @@ run_reportwriter.at-9078-reference:2704.6-2704.7: 2706 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2708.6-2708.7: +run_reportwriter.at-9079-reference:2708.6-2708.7: 2705 -------------------------------------------------------------------------------------------------------------------------------- 2706 2707 @@ -10643,7 +10643,7 @@ run_reportwriter.at-9078-reference:2708.6-2708.7: 2710 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2711.6-2711.7: +run_reportwriter.at-9079-reference:2711.6-2711.7: 2708 IN150207 20150207 OR150214 072 ITEM_NUMBER_25 00000046 29.99 2709 Invoice Total: 000000046 29.99 2710 @@ -10653,7 +10653,7 @@ run_reportwriter.at-9078-reference:2711.6-2711.7: 2713 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:2762.6-2762.7: +run_reportwriter.at-9079-reference:2762.6-2762.7: 2759 2760 2761 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 47 @@ -10663,7 +10663,7 @@ run_reportwriter.at-9078-reference:2762.6-2762.7: 2764 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2763.6-2763.7: +run_reportwriter.at-9079-reference:2763.6-2763.7: 2760 2761 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 47 2762 Region: SE @@ -10673,7 +10673,7 @@ run_reportwriter.at-9078-reference:2763.6-2763.7: 2765 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2764.6-2764.7: +run_reportwriter.at-9079-reference:2764.6-2764.7: 2761 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 47 2762 Region: SE 2763 Location: 1000451 @@ -10683,7 +10683,7 @@ run_reportwriter.at-9078-reference:2764.6-2764.7: 2766 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2768.6-2768.7: +run_reportwriter.at-9079-reference:2768.6-2768.7: 2765 -------------------------------------------------------------------------------------------------------------------------------- 2766 2767 @@ -10693,7 +10693,7 @@ run_reportwriter.at-9078-reference:2768.6-2768.7: 2770 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:2822.6-2822.7: +run_reportwriter.at-9079-reference:2822.6-2822.7: 2819 2820 2821 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 48 @@ -10703,7 +10703,7 @@ run_reportwriter.at-9078-reference:2822.6-2822.7: 2824 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2823.6-2823.7: +run_reportwriter.at-9079-reference:2823.6-2823.7: 2820 2821 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 48 2822 Region: SE @@ -10713,7 +10713,7 @@ run_reportwriter.at-9078-reference:2823.6-2823.7: 2825 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2824.6-2824.7: +run_reportwriter.at-9079-reference:2824.6-2824.7: 2821 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 48 2822 Region: SE 2823 Location: 1000471 @@ -10723,7 +10723,7 @@ run_reportwriter.at-9078-reference:2824.6-2824.7: 2826 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2828.6-2828.7: +run_reportwriter.at-9079-reference:2828.6-2828.7: 2825 -------------------------------------------------------------------------------------------------------------------------------- 2826 2827 @@ -10733,7 +10733,7 @@ run_reportwriter.at-9078-reference:2828.6-2828.7: 2830 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2831.6-2831.7: +run_reportwriter.at-9079-reference:2831.6-2831.7: 2828 IN150203 20150203 OR150217 010 ITEM_NUMBER_25 00000034 29.99 2829 Invoice Total: 000000034 29.99 2830 @@ -10743,7 +10743,7 @@ run_reportwriter.at-9078-reference:2831.6-2831.7: 2833 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:2882.6-2882.7: +run_reportwriter.at-9079-reference:2882.6-2882.7: 2879 2880 2881 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 49 @@ -10753,7 +10753,7 @@ run_reportwriter.at-9078-reference:2882.6-2882.7: 2884 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2883.6-2883.7: +run_reportwriter.at-9079-reference:2883.6-2883.7: 2880 2881 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 49 2882 Region: SE @@ -10763,7 +10763,7 @@ run_reportwriter.at-9078-reference:2883.6-2883.7: 2885 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2884.6-2884.7: +run_reportwriter.at-9079-reference:2884.6-2884.7: 2881 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 49 2882 Region: SE 2883 Location: 1000491 @@ -10773,7 +10773,7 @@ run_reportwriter.at-9078-reference:2884.6-2884.7: 2886 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2888.6-2888.7: +run_reportwriter.at-9079-reference:2888.6-2888.7: 2885 -------------------------------------------------------------------------------------------------------------------------------- 2886 2887 @@ -10783,7 +10783,7 @@ run_reportwriter.at-9078-reference:2888.6-2888.7: 2890 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:2942.6-2942.7: +run_reportwriter.at-9079-reference:2942.6-2942.7: 2939 2940 2941 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 50 @@ -10793,7 +10793,7 @@ run_reportwriter.at-9078-reference:2942.6-2942.7: 2944 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:2943.6-2943.7: +run_reportwriter.at-9079-reference:2943.6-2943.7: 2940 2941 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 50 2942 Region: SE @@ -10803,7 +10803,7 @@ run_reportwriter.at-9078-reference:2943.6-2943.7: 2945 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:2944.6-2944.7: +run_reportwriter.at-9079-reference:2944.6-2944.7: 2941 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 50 2942 Region: SE 2943 Location: 1000601 @@ -10813,7 +10813,7 @@ run_reportwriter.at-9078-reference:2944.6-2944.7: 2946 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:2948.6-2948.7: +run_reportwriter.at-9079-reference:2948.6-2948.7: 2945 -------------------------------------------------------------------------------------------------------------------------------- 2946 2947 @@ -10823,7 +10823,7 @@ run_reportwriter.at-9078-reference:2948.6-2948.7: 2950 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3002.6-3002.7: +run_reportwriter.at-9079-reference:3002.6-3002.7: 2999 3000 3001 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 51 @@ -10833,7 +10833,7 @@ run_reportwriter.at-9078-reference:3002.6-3002.7: 3004 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3003.6-3003.7: +run_reportwriter.at-9079-reference:3003.6-3003.7: 3000 3001 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 51 3002 Region: SE @@ -10843,7 +10843,7 @@ run_reportwriter.at-9078-reference:3003.6-3003.7: 3005 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3004.6-3004.7: +run_reportwriter.at-9079-reference:3004.6-3004.7: 3001 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 51 3002 Region: SE 3003 Location: 1000631 @@ -10853,7 +10853,7 @@ run_reportwriter.at-9078-reference:3004.6-3004.7: 3006 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3008.6-3008.7: +run_reportwriter.at-9079-reference:3008.6-3008.7: 3005 -------------------------------------------------------------------------------------------------------------------------------- 3006 3007 @@ -10863,7 +10863,7 @@ run_reportwriter.at-9078-reference:3008.6-3008.7: 3010 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3062.6-3062.7: +run_reportwriter.at-9079-reference:3062.6-3062.7: 3059 3060 3061 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 52 @@ -10873,7 +10873,7 @@ run_reportwriter.at-9078-reference:3062.6-3062.7: 3064 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3063.6-3063.7: +run_reportwriter.at-9079-reference:3063.6-3063.7: 3060 3061 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 52 3062 Region: SE @@ -10883,7 +10883,7 @@ run_reportwriter.at-9078-reference:3063.6-3063.7: 3065 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3064.6-3064.7: +run_reportwriter.at-9079-reference:3064.6-3064.7: 3061 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 52 3062 Region: SE 3063 Location: 1000671 @@ -10893,7 +10893,7 @@ run_reportwriter.at-9078-reference:3064.6-3064.7: 3066 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3068.6-3068.7: +run_reportwriter.at-9079-reference:3068.6-3068.7: 3065 -------------------------------------------------------------------------------------------------------------------------------- 3066 3067 @@ -10903,7 +10903,7 @@ run_reportwriter.at-9078-reference:3068.6-3068.7: 3070 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3071.6-3071.7: +run_reportwriter.at-9079-reference:3071.6-3071.7: 3068 IN150203 20150203 OR150205 071 ITEM_NUMBER_64 00000094 69.99 3069 Invoice Total: 000000094 69.99 3070 @@ -10913,7 +10913,7 @@ run_reportwriter.at-9078-reference:3071.6-3071.7: 3073 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3122.6-3122.7: +run_reportwriter.at-9079-reference:3122.6-3122.7: 3119 3120 3121 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 53 @@ -10923,7 +10923,7 @@ run_reportwriter.at-9078-reference:3122.6-3122.7: 3124 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3123.6-3123.7: +run_reportwriter.at-9079-reference:3123.6-3123.7: 3120 3121 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 53 3122 Region: SE @@ -10933,7 +10933,7 @@ run_reportwriter.at-9078-reference:3123.6-3123.7: 3125 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3124.6-3124.7: +run_reportwriter.at-9079-reference:3124.6-3124.7: 3121 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 53 3122 Region: SE 3123 Location: 1000891 @@ -10943,7 +10943,7 @@ run_reportwriter.at-9078-reference:3124.6-3124.7: 3126 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3128.6-3128.7: +run_reportwriter.at-9079-reference:3128.6-3128.7: 3125 -------------------------------------------------------------------------------------------------------------------------------- 3126 3127 @@ -10953,7 +10953,7 @@ run_reportwriter.at-9078-reference:3128.6-3128.7: 3130 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3182.6-3182.7: +run_reportwriter.at-9079-reference:3182.6-3182.7: 3179 3180 3181 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 54 @@ -10963,7 +10963,7 @@ run_reportwriter.at-9078-reference:3182.6-3182.7: 3184 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3183.6-3183.7: +run_reportwriter.at-9079-reference:3183.6-3183.7: 3180 3181 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 54 3182 Region: SW @@ -10973,7 +10973,7 @@ run_reportwriter.at-9078-reference:3183.6-3183.7: 3185 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3184.6-3184.7: +run_reportwriter.at-9079-reference:3184.6-3184.7: 3181 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 54 3182 Region: SW 3183 Location: 1000011 @@ -10983,7 +10983,7 @@ run_reportwriter.at-9078-reference:3184.6-3184.7: 3186 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3188.6-3188.7: +run_reportwriter.at-9079-reference:3188.6-3188.7: 3185 -------------------------------------------------------------------------------------------------------------------------------- 3186 3187 @@ -10993,7 +10993,7 @@ run_reportwriter.at-9078-reference:3188.6-3188.7: 3190 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3242.6-3242.7: +run_reportwriter.at-9079-reference:3242.6-3242.7: 3239 3240 3241 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 55 @@ -11003,7 +11003,7 @@ run_reportwriter.at-9078-reference:3242.6-3242.7: 3244 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3243.6-3243.7: +run_reportwriter.at-9079-reference:3243.6-3243.7: 3240 3241 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 55 3242 Region: SW @@ -11013,7 +11013,7 @@ run_reportwriter.at-9078-reference:3243.6-3243.7: 3245 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3244.6-3244.7: +run_reportwriter.at-9079-reference:3244.6-3244.7: 3241 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 55 3242 Region: SW 3243 Location: 1000031 @@ -11023,7 +11023,7 @@ run_reportwriter.at-9078-reference:3244.6-3244.7: 3246 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3248.6-3248.7: +run_reportwriter.at-9079-reference:3248.6-3248.7: 3245 -------------------------------------------------------------------------------------------------------------------------------- 3246 3247 @@ -11033,7 +11033,7 @@ run_reportwriter.at-9078-reference:3248.6-3248.7: 3250 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3251.6-3251.7: +run_reportwriter.at-9079-reference:3251.6-3251.7: 3248 IN150203 20150203 OR150214 033 ITEM_NUMBER_09 00000060 9.99 3249 Invoice Total: 000000060 9.99 3250 @@ -11043,7 +11043,7 @@ run_reportwriter.at-9078-reference:3251.6-3251.7: 3253 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3302.6-3302.7: +run_reportwriter.at-9079-reference:3302.6-3302.7: 3299 3300 3301 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 56 @@ -11053,7 +11053,7 @@ run_reportwriter.at-9078-reference:3302.6-3302.7: 3304 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3303.6-3303.7: +run_reportwriter.at-9079-reference:3303.6-3303.7: 3300 3301 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 56 3302 Region: SW @@ -11063,7 +11063,7 @@ run_reportwriter.at-9078-reference:3303.6-3303.7: 3305 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3304.6-3304.7: +run_reportwriter.at-9079-reference:3304.6-3304.7: 3301 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 56 3302 Region: SW 3303 Location: 1000091 @@ -11073,7 +11073,7 @@ run_reportwriter.at-9078-reference:3304.6-3304.7: 3306 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3308.6-3308.7: +run_reportwriter.at-9079-reference:3308.6-3308.7: 3305 -------------------------------------------------------------------------------------------------------------------------------- 3306 3307 @@ -11083,7 +11083,7 @@ run_reportwriter.at-9078-reference:3308.6-3308.7: 3310 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3362.6-3362.7: +run_reportwriter.at-9079-reference:3362.6-3362.7: 3359 3360 3361 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 57 @@ -11093,7 +11093,7 @@ run_reportwriter.at-9078-reference:3362.6-3362.7: 3364 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3363.6-3363.7: +run_reportwriter.at-9079-reference:3363.6-3363.7: 3360 3361 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 57 3362 Region: SW @@ -11103,7 +11103,7 @@ run_reportwriter.at-9078-reference:3363.6-3363.7: 3365 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3364.6-3364.7: +run_reportwriter.at-9079-reference:3364.6-3364.7: 3361 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 57 3362 Region: SW 3363 Location: 1000201 @@ -11113,7 +11113,7 @@ run_reportwriter.at-9078-reference:3364.6-3364.7: 3366 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3368.6-3368.7: +run_reportwriter.at-9079-reference:3368.6-3368.7: 3365 -------------------------------------------------------------------------------------------------------------------------------- 3366 3367 @@ -11123,7 +11123,7 @@ run_reportwriter.at-9078-reference:3368.6-3368.7: 3370 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3371.6-3371.7: +run_reportwriter.at-9079-reference:3371.6-3371.7: 3368 IN150209 20150209 OR150205 065 ITEM_NUMBER_21 00000070 29.99 3369 Invoice Total: 000000070 29.99 3370 @@ -11133,7 +11133,7 @@ run_reportwriter.at-9078-reference:3371.6-3371.7: 3373 Invoice Total: 000000090 149.98 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3422.6-3422.7: +run_reportwriter.at-9079-reference:3422.6-3422.7: 3419 3420 3421 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 58 @@ -11143,7 +11143,7 @@ run_reportwriter.at-9078-reference:3422.6-3422.7: 3424 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3423.6-3423.7: +run_reportwriter.at-9079-reference:3423.6-3423.7: 3420 3421 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 58 3422 Region: SW @@ -11153,7 +11153,7 @@ run_reportwriter.at-9078-reference:3423.6-3423.7: 3425 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3424.6-3424.7: +run_reportwriter.at-9079-reference:3424.6-3424.7: 3421 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 58 3422 Region: SW 3423 Location: 1000211 @@ -11163,7 +11163,7 @@ run_reportwriter.at-9078-reference:3424.6-3424.7: 3426 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3428.6-3428.7: +run_reportwriter.at-9079-reference:3428.6-3428.7: 3425 -------------------------------------------------------------------------------------------------------------------------------- 3426 3427 @@ -11173,7 +11173,7 @@ run_reportwriter.at-9078-reference:3428.6-3428.7: 3430 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3431.6-3431.7: +run_reportwriter.at-9079-reference:3431.6-3431.7: 3428 IN150202 20150202 OR150221 055 ITEM_NUMBER_16 00000013 19.99 3429 Invoice Total: 000000013 19.99 3430 @@ -11183,7 +11183,7 @@ run_reportwriter.at-9078-reference:3431.6-3431.7: 3433 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3482.6-3482.7: +run_reportwriter.at-9079-reference:3482.6-3482.7: 3479 3480 3481 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 59 @@ -11193,7 +11193,7 @@ run_reportwriter.at-9078-reference:3482.6-3482.7: 3484 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3483.6-3483.7: +run_reportwriter.at-9079-reference:3483.6-3483.7: 3480 3481 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 59 3482 Region: SW @@ -11203,7 +11203,7 @@ run_reportwriter.at-9078-reference:3483.6-3483.7: 3485 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3484.6-3484.7: +run_reportwriter.at-9079-reference:3484.6-3484.7: 3481 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 59 3482 Region: SW 3483 Location: 1000271 @@ -11213,7 +11213,7 @@ run_reportwriter.at-9078-reference:3484.6-3484.7: 3486 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3488.6-3488.7: +run_reportwriter.at-9079-reference:3488.6-3488.7: 3485 -------------------------------------------------------------------------------------------------------------------------------- 3486 3487 @@ -11223,7 +11223,7 @@ run_reportwriter.at-9078-reference:3488.6-3488.7: 3490 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:3491.6-3491.7: +run_reportwriter.at-9079-reference:3491.6-3491.7: 3488 IN150211 20150211 OR150228 080 ITEM_NUMBER_45 00000052 49.99 3489 Invoice Total: 000000052 49.99 3490 @@ -11233,7 +11233,7 @@ run_reportwriter.at-9078-reference:3491.6-3491.7: 3493 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:3542.6-3542.7: +run_reportwriter.at-9079-reference:3542.6-3542.7: 3539 3540 3541 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 60 @@ -11243,7 +11243,7 @@ run_reportwriter.at-9078-reference:3542.6-3542.7: 3544 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3543.6-3543.7: +run_reportwriter.at-9079-reference:3543.6-3543.7: 3540 3541 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 60 3542 Region: SW @@ -11253,7 +11253,7 @@ run_reportwriter.at-9078-reference:3543.6-3543.7: 3545 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3544.6-3544.7: +run_reportwriter.at-9079-reference:3544.6-3544.7: 3541 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 60 3542 Region: SW 3543 Location: 1000401 @@ -11263,7 +11263,7 @@ run_reportwriter.at-9078-reference:3544.6-3544.7: 3546 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3548.6-3548.7: +run_reportwriter.at-9079-reference:3548.6-3548.7: 3545 -------------------------------------------------------------------------------------------------------------------------------- 3546 3547 @@ -11273,7 +11273,7 @@ run_reportwriter.at-9078-reference:3548.6-3548.7: 3550 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3602.6-3602.7: +run_reportwriter.at-9079-reference:3602.6-3602.7: 3599 3600 3601 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 61 @@ -11283,7 +11283,7 @@ run_reportwriter.at-9078-reference:3602.6-3602.7: 3604 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3603.6-3603.7: +run_reportwriter.at-9079-reference:3603.6-3603.7: 3600 3601 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 61 3602 Region: SW @@ -11293,7 +11293,7 @@ run_reportwriter.at-9078-reference:3603.6-3603.7: 3605 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3604.6-3604.7: +run_reportwriter.at-9079-reference:3604.6-3604.7: 3601 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 61 3602 Region: SW 3603 Location: 1000411 @@ -11303,7 +11303,7 @@ run_reportwriter.at-9078-reference:3604.6-3604.7: 3606 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3608.6-3608.7: +run_reportwriter.at-9079-reference:3608.6-3608.7: 3605 -------------------------------------------------------------------------------------------------------------------------------- 3606 3607 @@ -11313,7 +11313,7 @@ run_reportwriter.at-9078-reference:3608.6-3608.7: 3610 >> Error: Unexpected indicator: `1' -run_reportwriter.at-9078-reference:3662.6-3662.7: +run_reportwriter.at-9079-reference:3662.6-3662.7: 3659 3660 3661 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 62 @@ -11323,7 +11323,7 @@ run_reportwriter.at-9078-reference:3662.6-3662.7: 3664 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3663.6-3663.7: +run_reportwriter.at-9079-reference:3663.6-3663.7: 3660 3661 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 62 3662 Region: SW @@ -11333,7 +11333,7 @@ run_reportwriter.at-9078-reference:3663.6-3663.7: 3665 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3664.6-3664.7: +run_reportwriter.at-9079-reference:3664.6-3664.7: 3661 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 62 3662 Region: SW 3663 Location: 1000431 @@ -11343,7 +11343,7 @@ run_reportwriter.at-9078-reference:3664.6-3664.7: 3666 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3668.6-3668.7: +run_reportwriter.at-9079-reference:3668.6-3668.7: 3665 -------------------------------------------------------------------------------------------------------------------------------- 3666 3667 @@ -11353,7 +11353,7 @@ run_reportwriter.at-9078-reference:3668.6-3668.7: 3670 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3671.6-3671.7: +run_reportwriter.at-9079-reference:3671.6-3671.7: 3668 IN150208 20150208 OR150227 078 ITEM_NUMBER_23 00000052 29.99 3669 Invoice Total: 000000052 29.99 3670 @@ -11363,7 +11363,7 @@ run_reportwriter.at-9078-reference:3671.6-3671.7: 3673 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3722.6-3722.7: +run_reportwriter.at-9079-reference:3722.6-3722.7: 3719 3720 3721 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 63 @@ -11373,7 +11373,7 @@ run_reportwriter.at-9078-reference:3722.6-3722.7: 3724 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3723.6-3723.7: +run_reportwriter.at-9079-reference:3723.6-3723.7: 3720 3721 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 63 3722 Region: SW @@ -11383,7 +11383,7 @@ run_reportwriter.at-9078-reference:3723.6-3723.7: 3725 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3724.6-3724.7: +run_reportwriter.at-9079-reference:3724.6-3724.7: 3721 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 63 3722 Region: SW 3723 Location: 1000601 @@ -11393,7 +11393,7 @@ run_reportwriter.at-9078-reference:3724.6-3724.7: 3726 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3728.6-3728.7: +run_reportwriter.at-9079-reference:3728.6-3728.7: 3725 -------------------------------------------------------------------------------------------------------------------------------- 3726 3727 @@ -11403,7 +11403,7 @@ run_reportwriter.at-9078-reference:3728.6-3728.7: 3730 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3782.6-3782.7: +run_reportwriter.at-9079-reference:3782.6-3782.7: 3779 3780 3781 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 64 @@ -11413,7 +11413,7 @@ run_reportwriter.at-9078-reference:3782.6-3782.7: 3784 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3783.6-3783.7: +run_reportwriter.at-9079-reference:3783.6-3783.7: 3780 3781 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 64 3782 Region: SW @@ -11423,7 +11423,7 @@ run_reportwriter.at-9078-reference:3783.6-3783.7: 3785 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3784.6-3784.7: +run_reportwriter.at-9079-reference:3784.6-3784.7: 3781 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 64 3782 Region: SW 3783 Location: 1000611 @@ -11433,7 +11433,7 @@ run_reportwriter.at-9078-reference:3784.6-3784.7: 3786 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3788.6-3788.7: +run_reportwriter.at-9079-reference:3788.6-3788.7: 3785 -------------------------------------------------------------------------------------------------------------------------------- 3786 3787 @@ -11443,7 +11443,7 @@ run_reportwriter.at-9078-reference:3788.6-3788.7: 3790 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3842.6-3842.7: +run_reportwriter.at-9079-reference:3842.6-3842.7: 3839 3840 3841 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 65 @@ -11453,7 +11453,7 @@ run_reportwriter.at-9078-reference:3842.6-3842.7: 3844 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3843.6-3843.7: +run_reportwriter.at-9079-reference:3843.6-3843.7: 3840 3841 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 65 3842 Region: SW @@ -11463,7 +11463,7 @@ run_reportwriter.at-9078-reference:3843.6-3843.7: 3845 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3844.6-3844.7: +run_reportwriter.at-9079-reference:3844.6-3844.7: 3841 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 65 3842 Region: SW 3843 Location: 1000651 @@ -11473,7 +11473,7 @@ run_reportwriter.at-9078-reference:3844.6-3844.7: 3846 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3848.6-3848.7: +run_reportwriter.at-9079-reference:3848.6-3848.7: 3845 -------------------------------------------------------------------------------------------------------------------------------- 3846 3847 @@ -11483,7 +11483,7 @@ run_reportwriter.at-9078-reference:3848.6-3848.7: 3850 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3902.6-3902.7: +run_reportwriter.at-9079-reference:3902.6-3902.7: 3899 3900 3901 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 66 @@ -11493,7 +11493,7 @@ run_reportwriter.at-9078-reference:3902.6-3902.7: 3904 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3903.6-3903.7: +run_reportwriter.at-9079-reference:3903.6-3903.7: 3900 3901 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 66 3902 Region: SW @@ -11503,7 +11503,7 @@ run_reportwriter.at-9078-reference:3903.6-3903.7: 3905 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3904.6-3904.7: +run_reportwriter.at-9079-reference:3904.6-3904.7: 3901 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 66 3902 Region: SW 3903 Location: 1000831 @@ -11513,7 +11513,7 @@ run_reportwriter.at-9078-reference:3904.6-3904.7: 3906 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3908.6-3908.7: +run_reportwriter.at-9079-reference:3908.6-3908.7: 3905 -------------------------------------------------------------------------------------------------------------------------------- 3906 3907 @@ -11523,7 +11523,7 @@ run_reportwriter.at-9078-reference:3908.6-3908.7: 3910 >> Error: Unexpected indicator: `0' -run_reportwriter.at-9078-reference:3911.6-3911.7: +run_reportwriter.at-9079-reference:3911.6-3911.7: 3908 IN150201 20150201 OR150221 046 ITEM_NUMBER_44 00000069 49.99 3909 Invoice Total: 000000069 49.99 3910 @@ -11533,7 +11533,7 @@ run_reportwriter.at-9078-reference:3911.6-3911.7: 3913 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3914.6-3914.7: +run_reportwriter.at-9079-reference:3914.6-3914.7: 3911 IN150220 20150220 OR150213 005 ITEM_NUMBER_44 00000037 49.99 3912 Invoice Total: 000000037 49.99 3913 @@ -11543,7 +11543,7 @@ run_reportwriter.at-9078-reference:3914.6-3914.7: 3916 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9078-reference:3962.6-3962.7: +run_reportwriter.at-9079-reference:3962.6-3962.7: 3959 3960 3961 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 67 @@ -11553,7 +11553,7 @@ run_reportwriter.at-9078-reference:3962.6-3962.7: 3964 Invoice# Date Order# Line# Item# TX Qty Cost >> Error: Unexpected indicator: `:' -run_reportwriter.at-9078-reference:3963.6-3963.7: +run_reportwriter.at-9079-reference:3963.6-3963.7: 3960 3961 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 67 3962 Region: SW @@ -11563,7 +11563,7 @@ run_reportwriter.at-9078-reference:3963.6-3963.7: 3965 -------------------------------------------------------------------------------------------------------------------------------- >> Error: Unexpected indicator: `o' -run_reportwriter.at-9078-reference:3964.6-3964.7: +run_reportwriter.at-9079-reference:3964.6-3964.7: 3961 Run:02/25/2015 153000 NEXT PAGE ISSUE Page 67 3962 Region: SW 3963 Location: 1000871 @@ -11573,7 +11573,7 @@ run_reportwriter.at-9078-reference:3964.6-3964.7: 3966 >> Error: Unexpected indicator: `e' -run_reportwriter.at-9078-reference:3968.6-3968.7: +run_reportwriter.at-9079-reference:3968.6-3968.7: 3965 -------------------------------------------------------------------------------------------------------------------------------- 3966 3967 @@ -11583,22 +11583,22 @@ run_reportwriter.at-9078-reference:3968.6-3968.7: 3970 >> Error: Unexpected indicator: `0' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9267:0 -run_reportwriter.at-9267-inp_data:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9268:0 +run_reportwriter.at-9268-inp_data:1.6-1.7: 1 > SAINATH KOTGIRE 30/03/201611029473 20 00100000 00000100 ---- ^ 2 UDAY PRATIVADI 30/03/201604547552 20 00100000 00000200 3 MILIND PARDESHI 30/03/201611256856 20 00100000 00000300 >> Error: Unexpected indicator: `H' -run_reportwriter.at-9267-inp_data:1.8-1.15: +run_reportwriter.at-9268-inp_data:1.8-1.15: 1 > SAINATH KOTGIRE 30/03/201611029473 20 00100000 00000100 ---- ^^^^^^^ 2 UDAY PRATIVADI 30/03/201604547552 20 00100000 00000200 3 MILIND PARDESHI 30/03/201611256856 20 00100000 00000300 >> Error: Invalid syntax -run_reportwriter.at-9267-inp_data:2.6-2.7: +run_reportwriter.at-9268-inp_data:2.6-2.7: 1 SAINATH KOTGIRE 30/03/201611029473 20 00100000 00000100 2 > UDAY PRATIVADI 30/03/201604547552 20 00100000 00000200 ---- ^ @@ -11606,7 +11606,7 @@ run_reportwriter.at-9267-inp_data:2.6-2.7: 4 AJIT PATIL 30/03/201610503086 20 00000500 00000400 >> Error: Unexpected indicator: `R' -run_reportwriter.at-9267-inp_data:4.6-4.7: +run_reportwriter.at-9268-inp_data:4.6-4.7: 1 SAINATH KOTGIRE 30/03/201611029473 20 00100000 00000100 2 UDAY PRATIVADI 30/03/201604547552 20 00100000 00000200 3 MILIND PARDESHI 30/03/201611256856 20 00100000 00000300 @@ -11616,7 +11616,7 @@ run_reportwriter.at-9267-inp_data:4.6-4.7: 6 SACHIN TENDUNLKAR 30/03/201614645425 20 00500000 00000600 >> Error: Unexpected indicator: `A' -run_reportwriter.at-9267-inp_data:5.6-5.7: +run_reportwriter.at-9268-inp_data:5.6-5.7: 2 UDAY PRATIVADI 30/03/201604547552 20 00100000 00000200 3 MILIND PARDESHI 30/03/201611256856 20 00100000 00000300 4 AJIT PATIL 30/03/201610503086 20 00000500 00000400 @@ -11625,8 +11625,8 @@ run_reportwriter.at-9267-inp_data:5.6-5.7: 6 SACHIN TENDUNLKAR 30/03/201614645425 20 00500000 00000600 >> Error: Unexpected indicator: `K' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9265:0 -run_reportwriter.at-9265-prog.cob:8.38-8.46: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9266:0 +run_reportwriter.at-9266-prog.cob:8.38-8.46: 5 INPUT-OUTPUT SECTION. 6 FILE-CONTROL. 7 @@ -11636,7 +11636,7 @@ run_reportwriter.at-9265-prog.cob:8.38-8.46: 10 FILE STATUS IS WS-INPUT-STATUS. >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-9265-prog.cob:12.38-12.46: +run_reportwriter.at-9266-prog.cob:12.38-12.46: 9 LINE SEQUENTIAL 10 FILE STATUS IS WS-INPUT-STATUS. 11 @@ -11646,7 +11646,7 @@ run_reportwriter.at-9265-prog.cob:12.38-12.46: 14 FILE STATUS IS WS-OUTPUT-STATUS. >> Warning: Ignored EXTERNAL (implementation pending) -run_reportwriter.at-9265-prog.cob:68.10-68.14: +run_reportwriter.at-9266-prog.cob:68.10-68.14: 65 66 RD REPORT1 67 PAGE LIMIT IS 65 LINES @@ -11656,7 +11656,7 @@ run_reportwriter.at-9265-prog.cob:68.10-68.14: 70 CONTROL ARE WS-SALARY. >> Error: Invalid syntax -run_reportwriter.at-9265-prog.cob:68.24: +run_reportwriter.at-9266-prog.cob:68.24: 65 66 RD REPORT1 67 PAGE LIMIT IS 65 LINES @@ -11666,7 +11666,7 @@ run_reportwriter.at-9265-prog.cob:68.24: 70 CONTROL ARE WS-SALARY. >> Hint: Missing COLUMNS -run_reportwriter.at-9265-prog.cob:69.10-69.17: +run_reportwriter.at-9266-prog.cob:69.10-69.17: 66 RD REPORT1 67 PAGE LIMIT IS 65 LINES 68 LINE LIMIT 132 @@ -11676,7 +11676,7 @@ run_reportwriter.at-9265-prog.cob:69.10-69.17: 71 >> Error: Invalid syntax -run_reportwriter.at-9265-prog.cob:70.18-70.21: +run_reportwriter.at-9266-prog.cob:70.18-70.21: 67 PAGE LIMIT IS 65 LINES 68 LINE LIMIT 132 69 HEADING 1 @@ -11686,7 +11686,7 @@ run_reportwriter.at-9265-prog.cob:70.18-70.21: 72 01 MAIN-HEADER TYPE IS PAGE HEADING. >> Error: Invalid syntax -run_reportwriter.at-9265-prog.cob:89.33: +run_reportwriter.at-9266-prog.cob:89.33: 86 87 01 TYPE IS CONTROL HEADING 88 FOR WS-SALARY OR PAGE. @@ -11696,7 +11696,7 @@ run_reportwriter.at-9265-prog.cob:89.33: 91 10 COLUMN 30 PIC X(13) VALUE 'EMP USERID:'. >> Hint: Missing WHEN -run_reportwriter.at-9265-prog.cob:89.34-89.39: +run_reportwriter.at-9266-prog.cob:89.34-89.39: 86 87 01 TYPE IS CONTROL HEADING 88 FOR WS-SALARY OR PAGE. @@ -11706,7 +11706,7 @@ run_reportwriter.at-9265-prog.cob:89.34-89.39: 91 10 COLUMN 30 PIC X(13) VALUE 'EMP USERID:'. >> Error: Invalid syntax -run_reportwriter.at-9265-prog.cob:94.33: +run_reportwriter.at-9266-prog.cob:94.33: 91 10 COLUMN 30 PIC X(13) VALUE 'EMP USERID:'. 92 10 COLUMN 60 PIC X(13) VALUE 'BILLING DAYS'. 93 10 COLUMN 80 PIC X(15) VALUE 'SALARY CREDITED'. @@ -11716,7 +11716,7 @@ run_reportwriter.at-9265-prog.cob:94.33: 96 >> Hint: Missing WHEN -run_reportwriter.at-9265-prog.cob:94.34-94.39: +run_reportwriter.at-9266-prog.cob:94.34-94.39: 91 10 COLUMN 30 PIC X(13) VALUE 'EMP USERID:'. 92 10 COLUMN 60 PIC X(13) VALUE 'BILLING DAYS'. 93 10 COLUMN 80 PIC X(15) VALUE 'SALARY CREDITED'. @@ -11726,15 +11726,15 @@ run_reportwriter.at-9265-prog.cob:94.34-94.39: 96 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9340:0 -run_reportwriter.at-9340-reference:1.27-1.32: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9341:0 +run_reportwriter.at-9341-reference:1.27-1.32: 1 > STARK TECHNOLOGIES MONTHLY REPORT ---- ^^^^^ 2 -------------------------------------------------- 3 REPORT PERIOD: 2016/04/22 10:55 >> Error: Invalid syntax -run_reportwriter.at-9340-reference:3.6-3.7: +run_reportwriter.at-9341-reference:3.6-3.7: 1 STARK TECHNOLOGIES MONTHLY REPORT 2 -------------------------------------------------- 3 > REPORT PERIOD: 2016/04/22 10:55 @@ -11743,7 +11743,7 @@ run_reportwriter.at-9340-reference:3.6-3.7: 5 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED >> Error: Unexpected indicator: `T' -run_reportwriter.at-9340-reference:5.6-5.7: +run_reportwriter.at-9341-reference:5.6-5.7: 2 -------------------------------------------------- 3 REPORT PERIOD: 2016/04/22 10:55 4 @@ -11753,7 +11753,7 @@ run_reportwriter.at-9340-reference:5.6-5.7: 7 SAINATH KOTGIRE 11029473 20 100000 >> Error: Unexpected indicator: `M' -run_reportwriter.at-9340-reference:6.6-6.7: +run_reportwriter.at-9341-reference:6.6-6.7: 3 REPORT PERIOD: 2016/04/22 10:55 4 5 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED @@ -11763,7 +11763,7 @@ run_reportwriter.at-9340-reference:6.6-6.7: 8 UDAY PRATIVADI 04547552 20 100000 >> Error: Unexpected indicator: `+' -run_reportwriter.at-9340-reference:7.6-7.7: +run_reportwriter.at-9341-reference:7.6-7.7: 4 5 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED 6 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ @@ -11773,7 +11773,7 @@ run_reportwriter.at-9340-reference:7.6-7.7: 9 MILIND PARDESHI 11256856 20 100000 >> Error: Unexpected indicator: `A' -run_reportwriter.at-9340-reference:9.6-9.7: +run_reportwriter.at-9341-reference:9.6-9.7: 6 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 7 SAINATH KOTGIRE 11029473 20 100000 8 UDAY PRATIVADI 04547552 20 100000 @@ -11783,7 +11783,7 @@ run_reportwriter.at-9340-reference:9.6-9.7: 11 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED >> Error: Unexpected indicator: `I' -run_reportwriter.at-9340-reference:11.6-11.7: +run_reportwriter.at-9341-reference:11.6-11.7: 8 UDAY PRATIVADI 04547552 20 100000 9 MILIND PARDESHI 11256856 20 100000 10 @@ -11793,7 +11793,7 @@ run_reportwriter.at-9340-reference:11.6-11.7: 13 AJIT PATIL 10503086 20 500 >> Error: Unexpected indicator: `M' -run_reportwriter.at-9340-reference:12.6-12.7: +run_reportwriter.at-9341-reference:12.6-12.7: 9 MILIND PARDESHI 11256856 20 100000 10 11 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED @@ -11803,7 +11803,7 @@ run_reportwriter.at-9340-reference:12.6-12.7: 14 >> Error: Unexpected indicator: `+' -run_reportwriter.at-9340-reference:13.6-13.7: +run_reportwriter.at-9341-reference:13.6-13.7: 10 11 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED 12 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ @@ -11813,7 +11813,7 @@ run_reportwriter.at-9340-reference:13.6-13.7: 15 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED >> Error: Unexpected indicator: `J' -run_reportwriter.at-9340-reference:15.6-15.7: +run_reportwriter.at-9341-reference:15.6-15.7: 12 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 13 AJIT PATIL 10503086 20 500 14 @@ -11823,7 +11823,7 @@ run_reportwriter.at-9340-reference:15.6-15.7: 17 VINOD KAMBLE 15487558 20 100000 >> Error: Unexpected indicator: `M' -run_reportwriter.at-9340-reference:16.6-16.7: +run_reportwriter.at-9341-reference:16.6-16.7: 13 AJIT PATIL 10503086 20 500 14 15 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED @@ -11833,7 +11833,7 @@ run_reportwriter.at-9340-reference:16.6-16.7: 18 >> Error: Unexpected indicator: `+' -run_reportwriter.at-9340-reference:17.6-17.7: +run_reportwriter.at-9341-reference:17.6-17.7: 14 15 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED 16 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ @@ -11843,7 +11843,7 @@ run_reportwriter.at-9340-reference:17.6-17.7: 19 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED >> Error: Unexpected indicator: `I' -run_reportwriter.at-9340-reference:19.6-19.7: +run_reportwriter.at-9341-reference:19.6-19.7: 16 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 17 VINOD KAMBLE 15487558 20 100000 18 @@ -11853,7 +11853,7 @@ run_reportwriter.at-9340-reference:19.6-19.7: 21 SACHIN TENDUNLKAR 14645425 20 500000 >> Error: Unexpected indicator: `M' -run_reportwriter.at-9340-reference:20.6-20.7: +run_reportwriter.at-9341-reference:20.6-20.7: 17 VINOD KAMBLE 15487558 20 100000 18 19 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED @@ -11863,7 +11863,7 @@ run_reportwriter.at-9340-reference:20.6-20.7: 22 >> Error: Unexpected indicator: `+' -run_reportwriter.at-9340-reference:21.6-21.7: +run_reportwriter.at-9341-reference:21.6-21.7: 18 19 EMP NAME: EMP USERID: BILLING DAYS SALARY CREDITED 20 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ @@ -11873,8 +11873,8 @@ run_reportwriter.at-9340-reference:21.6-21.7: 23 **************************************************************************************************** >> Error: Unexpected indicator: `A' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9469:0 -run_reportwriter.at-9469-prog.cob:32.18: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9470:0 +run_reportwriter.at-9470-prog.cob:32.18: 29 30 REPORT SECTION. 31 RD RP @@ -11884,7 +11884,7 @@ run_reportwriter.at-9469-prog.cob:32.18: 34 60 COLUMNS >> Hint: Missing -run_reportwriter.at-9469-prog.cob:32.19-32.27: +run_reportwriter.at-9470-prog.cob:32.19-32.27: 29 30 REPORT SECTION. 31 RD RP @@ -11894,22 +11894,22 @@ run_reportwriter.at-9469-prog.cob:32.19-32.27: 34 60 COLUMNS >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9514:0 -run_reportwriter.at-9514-reference:1.6-1.7: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9515:0 +run_reportwriter.at-9515-reference:1.6-1.7: 1 > VarQ: H 1 2 3 4 5 Page 1 ---- ^ 2 VarQ: 123456789b123456789c123456789d123456789e123456789f 3 VarQ: >> Error: Unexpected indicator: `H' -run_reportwriter.at-9514-reference:1.15-1.16: +run_reportwriter.at-9515-reference:1.15-1.16: 1 > VarQ: H 1 2 3 4 5 Page 1 ---- ^ 2 VarQ: 123456789b123456789c123456789d123456789e123456789f 3 VarQ: >> Error: Invalid syntax -run_reportwriter.at-9514-reference:2.6-2.7: +run_reportwriter.at-9515-reference:2.6-2.7: 1 VarQ: H 1 2 3 4 5 Page 1 2 > VarQ: 123456789b123456789c123456789d123456789e123456789f ---- ^ @@ -11917,7 +11917,7 @@ run_reportwriter.at-9514-reference:2.6-2.7: 4 VarQ: 100 100 100 <1> >> Error: Unexpected indicator: `1' -run_reportwriter.at-9514-reference:4.6-4.7: +run_reportwriter.at-9515-reference:4.6-4.7: 1 VarQ: H 1 2 3 4 5 Page 1 2 VarQ: 123456789b123456789c123456789d123456789e123456789f 3 VarQ: @@ -11927,7 +11927,7 @@ run_reportwriter.at-9514-reference:4.6-4.7: 6 VarQ: 200 200 200 200 <3> >> Error: Unexpected indicator: `1' -run_reportwriter.at-9514-reference:5.6-5.7: +run_reportwriter.at-9515-reference:5.6-5.7: 2 VarQ: 123456789b123456789c123456789d123456789e123456789f 3 VarQ: 4 VarQ: 100 100 100 <1> @@ -11937,7 +11937,7 @@ run_reportwriter.at-9514-reference:5.6-5.7: 7 VarQ: 400 401 402 403 <4> >> Error: Unexpected indicator: `T' -run_reportwriter.at-9514-reference:6.6-6.7: +run_reportwriter.at-9515-reference:6.6-6.7: 3 VarQ: 4 VarQ: 100 100 100 <1> 5 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> @@ -11947,7 +11947,7 @@ run_reportwriter.at-9514-reference:6.6-6.7: 8 VarQ: >> Error: Unexpected indicator: `2' -run_reportwriter.at-9514-reference:7.6-7.7: +run_reportwriter.at-9515-reference:7.6-7.7: 4 VarQ: 100 100 100 <1> 5 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> 6 VarQ: 200 200 200 200 <3> @@ -11957,7 +11957,7 @@ run_reportwriter.at-9514-reference:7.6-7.7: 9 VarQ: <1> >> Error: Unexpected indicator: `4' -run_reportwriter.at-9514-reference:10.6-10.7: +run_reportwriter.at-9515-reference:10.6-10.7: 7 VarQ: 400 401 402 403 <4> 8 VarQ: 9 VarQ: <1> @@ -11967,7 +11967,7 @@ run_reportwriter.at-9514-reference:10.6-10.7: 12 VarQ: 123456789b123456789c123456789d123456789e123456789f >> Error: Unexpected indicator: `T' -run_reportwriter.at-9514-reference:11.6-11.7: +run_reportwriter.at-9515-reference:11.6-11.7: 8 VarQ: 9 VarQ: <1> 10 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> @@ -11977,7 +11977,7 @@ run_reportwriter.at-9514-reference:11.6-11.7: 13 VarQ: >> Error: Unexpected indicator: `H' -run_reportwriter.at-9514-reference:12.6-12.7: +run_reportwriter.at-9515-reference:12.6-12.7: 9 VarQ: <1> 10 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> 11 VarQ: H 1 2 3 4 5 Page 2 @@ -11987,7 +11987,7 @@ run_reportwriter.at-9514-reference:12.6-12.7: 14 VarQ: 200 200 200 200 <3> >> Error: Unexpected indicator: `1' -run_reportwriter.at-9514-reference:14.6-14.7: +run_reportwriter.at-9515-reference:14.6-14.7: 11 VarQ: H 1 2 3 4 5 Page 2 12 VarQ: 123456789b123456789c123456789d123456789e123456789f 13 VarQ: @@ -11997,7 +11997,7 @@ run_reportwriter.at-9514-reference:14.6-14.7: 16 VarQ: >> Error: Unexpected indicator: `2' -run_reportwriter.at-9514-reference:15.6-15.7: +run_reportwriter.at-9515-reference:15.6-15.7: 12 VarQ: 123456789b123456789c123456789d123456789e123456789f 13 VarQ: 14 VarQ: 200 200 200 200 <3> @@ -12007,7 +12007,7 @@ run_reportwriter.at-9514-reference:15.6-15.7: 17 VarQ: <1> >> Error: Unexpected indicator: `4' -run_reportwriter.at-9514-reference:18.6-18.7: +run_reportwriter.at-9515-reference:18.6-18.7: 15 VarQ: 400 401 402 403 <4> 16 VarQ: 17 VarQ: <1> @@ -12017,7 +12017,7 @@ run_reportwriter.at-9514-reference:18.6-18.7: 20 VarQ: 400 401 402 403 <4> >> Error: Unexpected indicator: `T' -run_reportwriter.at-9514-reference:19.6-19.7: +run_reportwriter.at-9515-reference:19.6-19.7: 16 VarQ: 17 VarQ: <1> 18 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> @@ -12027,7 +12027,7 @@ run_reportwriter.at-9514-reference:19.6-19.7: 21 VarQ: H 1 2 3 4 5 Page 3 >> Error: Unexpected indicator: `2' -run_reportwriter.at-9514-reference:20.6-20.7: +run_reportwriter.at-9515-reference:20.6-20.7: 17 VarQ: <1> 18 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> 19 VarQ: 200 200 200 200 <3> @@ -12037,7 +12037,7 @@ run_reportwriter.at-9514-reference:20.6-20.7: 22 VarQ: 123456789b123456789c123456789d123456789e123456789f >> Error: Unexpected indicator: `4' -run_reportwriter.at-9514-reference:21.6-21.7: +run_reportwriter.at-9515-reference:21.6-21.7: 18 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> 19 VarQ: 200 200 200 200 <3> 20 VarQ: 400 401 402 403 <4> @@ -12047,7 +12047,7 @@ run_reportwriter.at-9514-reference:21.6-21.7: 23 VarQ: >> Error: Unexpected indicator: `H' -run_reportwriter.at-9514-reference:22.6-22.7: +run_reportwriter.at-9515-reference:22.6-22.7: 19 VarQ: 200 200 200 200 <3> 20 VarQ: 400 401 402 403 <4> 21 VarQ: H 1 2 3 4 5 Page 3 @@ -12057,7 +12057,7 @@ run_reportwriter.at-9514-reference:22.6-22.7: 24 VarQ: <1> >> Error: Unexpected indicator: `1' -run_reportwriter.at-9514-reference:25.6-25.7: +run_reportwriter.at-9515-reference:25.6-25.7: 22 VarQ: 123456789b123456789c123456789d123456789e123456789f 23 VarQ: 24 VarQ: <1> @@ -12067,7 +12067,7 @@ run_reportwriter.at-9514-reference:25.6-25.7: 27 VarQ: 400 401 402 403 <4> >> Error: Unexpected indicator: `T' -run_reportwriter.at-9514-reference:26.6-26.7: +run_reportwriter.at-9515-reference:26.6-26.7: 23 VarQ: 24 VarQ: <1> 25 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> @@ -12077,7 +12077,7 @@ run_reportwriter.at-9514-reference:26.6-26.7: 28 VarQ: >> Error: Unexpected indicator: `2' -run_reportwriter.at-9514-reference:27.6-27.7: +run_reportwriter.at-9515-reference:27.6-27.7: 24 VarQ: <1> 25 VarQ: Tag1 *123*Tag2 *Tag1 *123*Tag2 *Tag1 *123*Tag2 * <2> 26 VarQ: 200 200 200 200 <3> @@ -12087,8 +12087,8 @@ run_reportwriter.at-9514-reference:27.6-27.7: 29 VarQ: >> Error: Unexpected indicator: `4' -Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9617:0 -run_reportwriter.at-9617-prog.cob:33.24-33.29: +Considering: import/gnucobol/tests/testsuite.src/run_reportwriter.at:9618:0 +run_reportwriter.at-9618-prog.cob:33.24-33.29: 30 RD REPORT-1 31 CONTROLS ARE FINAL 32 PAGE LIMIT IS 21 @@ -12098,7 +12098,7 @@ run_reportwriter.at-9617-prog.cob:33.24-33.29: 35 LAST DETAIL IS 18 >> Error: Invalid syntax -run_reportwriter.at-9617-prog.cob:33.37: +run_reportwriter.at-9618-prog.cob:33.37: 30 RD REPORT-1 31 CONTROLS ARE FINAL 32 PAGE LIMIT IS 21 @@ -12108,7 +12108,7 @@ run_reportwriter.at-9617-prog.cob:33.37: 35 LAST DETAIL IS 18 >> Hint: Missing COLUMNS -run_reportwriter.at-9617-prog.cob:34.15-34.20: +run_reportwriter.at-9618-prog.cob:34.15-34.20: 31 CONTROLS ARE FINAL 32 PAGE LIMIT IS 21 33 LINE LIMIT IS 71 diff --git a/test/output-tests/syn_copy.expected b/test/output-tests/syn_copy.expected index 72ac160a7..04f17e342 100644 --- a/test/output-tests/syn_copy.expected +++ b/test/output-tests/syn_copy.expected @@ -423,8 +423,8 @@ syn_copy.at-918-prog.cob:7.7-12.55: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -Considering: import/gnucobol/tests/testsuite.src/syn_copy.at:968:0 -syn_copy.at-968-prog.cob:7.7-8.44: +Considering: import/gnucobol/tests/testsuite.src/syn_copy.at:949:0 +syn_copy.at-949-prog.cob:7.7-8.44: 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. 6 REPLACE ==VAR-COLON== BY ==VAR-COMMA==. @@ -474,3 +474,43 @@ syn_copy.at-1072-prog.cob:15.11-15.17: 16 STOP RUN. >> Error: Invalid syntax +Considering: import/gnucobol/tests/testsuite.src/syn_copy.at:1110:0 +syn_copy.at-1110-prog.cob:2.7-2.12: + 1 + 2 > BEGIN PROGRAM prog. +---- ^^^^^ + 3 PROCEDURE DIVISION. + 4 DISPLAY output +>> Error: Invalid syntax + +Considering: import/gnucobol/tests/testsuite.src/syn_copy.at:1155:0 +syn_copy.at-1155-prog.cob:6.7-8.54: + 3 PROGRAM-ID. prog. + 4 DATA DIVISION. + 5 WORKING-STORAGE SECTION. + 6 > COPY "copy.inc" +---- ^^^^^^^^^^^^^^^ + 7 > REPLACING TRAILING ==FIRST== BY ==VAR1== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 8 > TRAILING ==SECOND== BY ==VAR2==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 9 REPLACE == + 10 01 TEST-VAR1 PIC X(2) VALUE "OK". +>> Error: Library `copy.inc' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + +syn_copy.at-1155-prog.cob:20.7-22.54: + 17 END-DISPLAY. + 18 STOP RUN. + 19 ==. + 20 > COPY "copy.inc" +---- ^^^^^^^^^^^^^^^ + 21 > REPLACING TRAILING ==FIRST== BY ==VAR1== +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + 22 > TRAILING ==SECOND== BY ==VAR2==. +---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +>> Error: Library `copy.inc' not found + - search path: + - filename extensions: "cpy" "cbl" "cob" "cbx" + diff --git a/test/output-tests/syn_definition.expected b/test/output-tests/syn_definition.expected index e767749a6..ea5e0eaee 100644 --- a/test/output-tests/syn_definition.expected +++ b/test/output-tests/syn_definition.expected @@ -161,69 +161,69 @@ syn_definition.at-1462-prog.cob:14.0: >> Error: Invalid syntax Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:1497:0 -Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:1845:0 -Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2043:0 -syn_definition.at-2043-prog3.cob:13.11-13.19: +Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:1831:0 +Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2048:0 +syn_definition.at-2048-prog3.cob:13.11-13.19: 10 SPECIAL-NAMES. 11 ALPHABET ALPHABET-1 IS 12 'A' THROUGH 'Z', x'00' thru x'05'. - 13 > ALPHABET ALPHABET-2 + 13 > ALPHABET ALPHABET-2 NATIONAL IS ---- ^^^^^^^^ 14 n'A' also n'B' ALSO n'f', 15 n'g' also n'G', n'1' thru n'9'. >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:29.11-29.19: +syn_definition.at-2048-prog3.cob:29.11-29.19: 26 SPECIAL-NAMES. 27 ALPHABET ALPHABET-1 IS 28 'A' THROUGH 'Z', x'00' thru x'05'. - 29 > ALPHABET ALPHABET-2 IS + 29 > ALPHABET ALPHABET-2 FOR NATIONAL ---- ^^^^^^^^ 30 n'A' ALSO n'f', 31 n'g' also n'G'. >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:41.30: +syn_definition.at-2048-prog3.cob:41.28: 38 SOURCE-COMPUTER. GNU-LINUX. 39 OBJECT-COMPUTER. GC-MACHINE, SEQUENCE ALPHABET-1, ALPHABET-2. 40 SPECIAL-NAMES. - 41 > ALPHABET ALPHABET-1 x'00' thru x'05'. ----- ^ - 42 ALPHABET ALPHABET-2 IS n'g' also n'G', n'1' thru n'9'. + 41 > ALPHABET ALPHABET-1 x'00' thru x'05'. +---- ^ + 42 ALPHABET ALPHABET-2 NATIONAL IS n'g' also n'G', n'1' thru n'9'. 43 END PROGRAM prog3c. >> Hint: Missing IS -syn_definition.at-2043-prog3.cob:41.34-41.39: +syn_definition.at-2048-prog3.cob:41.32-41.37: 38 SOURCE-COMPUTER. GNU-LINUX. 39 OBJECT-COMPUTER. GC-MACHINE, SEQUENCE ALPHABET-1, ALPHABET-2. 40 SPECIAL-NAMES. - 41 > ALPHABET ALPHABET-1 x'00' thru x'05'. ----- ^^^^^ - 42 ALPHABET ALPHABET-2 IS n'g' also n'G', n'1' thru n'9'. + 41 > ALPHABET ALPHABET-1 x'00' thru x'05'. +---- ^^^^^ + 42 ALPHABET ALPHABET-2 NATIONAL IS n'g' also n'G', n'1' thru n'9'. 43 END PROGRAM prog3c. >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:42.11-42.19: +syn_definition.at-2048-prog3.cob:42.9-42.17: 39 OBJECT-COMPUTER. GC-MACHINE, SEQUENCE ALPHABET-1, ALPHABET-2. 40 SPECIAL-NAMES. - 41 ALPHABET ALPHABET-1 x'00' thru x'05'. - 42 > ALPHABET ALPHABET-2 IS n'g' also n'G', n'1' thru n'9'. ----- ^^^^^^^^ + 41 ALPHABET ALPHABET-1 x'00' thru x'05'. + 42 > ALPHABET ALPHABET-2 NATIONAL IS n'g' also n'G', n'1' thru n'9'. +---- ^^^^^^^^ 43 END PROGRAM prog3c. 44 >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:53.11-53.19: +syn_definition.at-2048-prog3.cob:53.11-53.19: 50 OBJECT-COMPUTER. GC-MACHINE, SEQUENCE ALPHABET-1, ALPHABET-2. 51 SPECIAL-NAMES. 52 ALPHABET ALPHABET-1 IS 'A' THROUGH 'Z'. - 53 > ALPHABET ALPHABET-2 n'A' also n'B', n'1' thru n'9'. + 53 > ALPHABET ALPHABET-2 NATIONAL n'A' also n'B', n'1' thru n'9'. ---- ^^^^^^^^ 54 END PROGRAM prog3d. 55 >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:85.33-85.45: +syn_definition.at-2048-prog3.cob:85.33-85.45: 82 CONFIGURATION SECTION. 83 SOURCE-COMPUTER. GNU-LINUX. 84 OBJECT-COMPUTER. GC-MACHINE, @@ -233,7 +233,7 @@ syn_definition.at-2043-prog3.cob:85.33-85.45: 87 ALPHABET ALPHABET-1 IS >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:99.30-99.38: +syn_definition.at-2048-prog3.cob:99.30-99.38: 96 OBJECT-COMPUTER. GC-MACHINE, 97 COLLATING SEQUENCE 98 FOR ALPHANUMERIC IS ALPHABET-1 @@ -243,17 +243,17 @@ syn_definition.at-2043-prog3.cob:99.30-99.38: 101 ALPHABET ALPHABET-1 IS >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:103.11-103.19: +syn_definition.at-2048-prog3.cob:103.11-103.19: 100 SPECIAL-NAMES. 101 ALPHABET ALPHABET-1 IS 102 'A', 'C', x'05'. - 103 > ALPHABET ALPHABET-2 + 103 > ALPHABET ALPHABET-2 FOR NATIONAL IS ---- ^^^^^^^^ 104 n'A', n'1' thru n'9'. 105 END PROGRAM prog3h. >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:114.26-114.34: +syn_definition.at-2048-prog3.cob:114.26-114.34: 111 SOURCE-COMPUTER. GNU-LINUX. 112 OBJECT-COMPUTER. GC-MACHINE, 113 COLLATING SEQUENCE @@ -263,7 +263,7 @@ syn_definition.at-2043-prog3.cob:114.26-114.34: 116 SPECIAL-NAMES. >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:115.26-115.38: +syn_definition.at-2048-prog3.cob:115.26-115.38: 112 OBJECT-COMPUTER. GC-MACHINE, 113 COLLATING SEQUENCE 114 NATIONAL ALPHABET-2 @@ -273,49 +273,49 @@ syn_definition.at-2043-prog3.cob:115.26-115.38: 117 ALPHABET ALPHABET-1 IS >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:119.11-119.19: +syn_definition.at-2048-prog3.cob:119.11-119.19: 116 SPECIAL-NAMES. 117 ALPHABET ALPHABET-1 IS 118 'a' THROUGH 'z'. - 119 > ALPHABET ALPHABET-2 + 119 > ALPHABET ALPHABET-2 NATIONAL IS ---- ^^^^^^^^ 120 n'B', n'C'; n'g' also n'G'. 121 END PROGRAM prog3i. >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:130.26-130.34: +syn_definition.at-2048-prog3.cob:130.26-130.34: 127 SOURCE-COMPUTER. GNU-LINUX. 128 OBJECT-COMPUTER. GC-MACHINE, 129 COLLATING SEQUENCE 130 > NATIONAL ALPHABET-2. ---- ^^^^^^^^ 131 SPECIAL-NAMES. - 132 ALPHABET ALPHABET-2 + 132 ALPHABET ALPHABET-2 NATIONAL >> Error: Invalid syntax -syn_definition.at-2043-prog3.cob:132.30: +syn_definition.at-2048-prog3.cob:132.39: 129 COLLATING SEQUENCE 130 NATIONAL ALPHABET-2. 131 SPECIAL-NAMES. - 132 > ALPHABET ALPHABET-2 ----- ^ - 133 n'B', n'C'; n'g' also n'G'. + 132 > ALPHABET ALPHABET-2 NATIONAL +---- ^ + 133 n'B', n'C'; n'g' also n'G' also nx'003E'. 134 END PROGRAM prog3j. >> Hint: Missing IS -syn_definition.at-2043-prog3.cob:133.20-133.24: +syn_definition.at-2048-prog3.cob:133.20-133.24: 130 NATIONAL ALPHABET-2. 131 SPECIAL-NAMES. - 132 ALPHABET ALPHABET-2 - 133 > n'B', n'C'; n'g' also n'G'. + 132 ALPHABET ALPHABET-2 NATIONAL + 133 > n'B', n'C'; n'g' also n'G' also nx'003E'. ---- ^^^^ 134 END PROGRAM prog3j. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2150:0 -Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2201:0 -Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2357:0 -syn_definition.at-2357-prog.cob:38.37-38.41: +Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2160:0 +Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2211:0 +Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2367:0 +syn_definition.at-2367-prog.cob:38.37-38.41: 35 01 USER-VAR USAGE USER-TYPE. 36 37 01 PROC USAGE PROGRAM-POINTER IS TYPEDEF. @@ -325,7 +325,7 @@ syn_definition.at-2357-prog.cob:38.37-38.41: 40 >> Error: Invalid syntax -syn_definition.at-2357-prog.cob:39.47: +syn_definition.at-2367-prog.cob:39.47: 36 37 01 PROC USAGE PROGRAM-POINTER IS TYPEDEF. 38 88 PROC-UNSET VALUE NULL. @@ -335,7 +335,7 @@ syn_definition.at-2357-prog.cob:39.47: 41 PROCEDURE DIVISION. >> Hint: Missing -syn_definition.at-2357-prog.cob:39.48-39.52: +syn_definition.at-2367-prog.cob:39.48-39.52: 36 37 01 PROC USAGE PROGRAM-POINTER IS TYPEDEF. 38 88 PROC-UNSET VALUE NULL. @@ -345,51 +345,51 @@ syn_definition.at-2357-prog.cob:39.48-39.52: 41 PROCEDURE DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2374:0 -Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2617:0 -syn_definition.at-2617-prog.cob:13.19-13.23: +Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2384:0 +Considering: import/gnucobol/tests/testsuite.src/syn_definition.at:2627:0 +syn_definition.at-2627-prog.cob:13.19-13.23: 10 02 AUSGABE-FILE-NAME-2. 11 05 FILLER PIC 9999. 12 05 DETAIL-NO PIC 9999. 13 > 02 FILLER LIKE AUSGABE-FILE-NAME. ---- ^^^^ - 14 + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:15.20: +syn_definition.at-2627-prog.cob:15.20: 12 05 DETAIL-NO PIC 9999. 13 02 FILLER LIKE AUSGABE-FILE-NAME. - 14 + 14 15 > 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. ---- ^ 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). >> Hint: Missing RENAMES -syn_definition.at-2617-prog.cob:15.25-15.29: +syn_definition.at-2627-prog.cob:15.25-15.29: 12 05 DETAIL-NO PIC 9999. 13 02 FILLER LIKE AUSGABE-FILE-NAME. - 14 + 14 15 > 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. ---- ^^^^ 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:15.40-15.46: +syn_definition.at-2627-prog.cob:15.40-15.46: 12 05 DETAIL-NO PIC 9999. 13 02 FILLER LIKE AUSGABE-FILE-NAME. - 14 + 14 15 > 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. ---- ^^^^^^ 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:16.23: +syn_definition.at-2627-prog.cob:16.23: 13 02 FILLER LIKE AUSGABE-FILE-NAME. - 14 + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 > 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). ---- ^ @@ -397,9 +397,9 @@ syn_definition.at-2617-prog.cob:16.23: 18 77 OUTPUT-VAL-M2 LIKE DETAIL-NO (-2). >> Hint: Missing RENAMES -syn_definition.at-2617-prog.cob:16.25-16.29: +syn_definition.at-2627-prog.cob:16.25-16.29: 13 02 FILLER LIKE AUSGABE-FILE-NAME. - 14 + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 > 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). ---- ^^^^ @@ -407,9 +407,9 @@ syn_definition.at-2617-prog.cob:16.25-16.29: 18 77 OUTPUT-VAL-M2 LIKE DETAIL-NO (-2). >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:16.40-16.41: +syn_definition.at-2627-prog.cob:16.40-16.41: 13 02 FILLER LIKE AUSGABE-FILE-NAME. - 14 + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 > 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). ---- ^ @@ -417,8 +417,8 @@ syn_definition.at-2617-prog.cob:16.40-16.41: 18 77 OUTPUT-VAL-M2 LIKE DETAIL-NO (-2). >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:17.24: - 14 +syn_definition.at-2627-prog.cob:17.24: + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 > 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). @@ -427,8 +427,8 @@ syn_definition.at-2617-prog.cob:17.24: 19 >> Hint: Missing RENAMES -syn_definition.at-2617-prog.cob:17.25-17.29: - 14 +syn_definition.at-2627-prog.cob:17.25-17.29: + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 > 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). @@ -437,8 +437,8 @@ syn_definition.at-2617-prog.cob:17.25-17.29: 19 >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:17.39: - 14 +syn_definition.at-2627-prog.cob:17.39: + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 > 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). @@ -447,8 +447,8 @@ syn_definition.at-2617-prog.cob:17.39: 19 >> Hint: Missing . -syn_definition.at-2617-prog.cob:17.40-17.41: - 14 +syn_definition.at-2627-prog.cob:17.40-17.41: + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 > 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). @@ -457,8 +457,8 @@ syn_definition.at-2617-prog.cob:17.40-17.41: 19 >> Warning: Invalid syntax -syn_definition.at-2617-prog.cob:17.42-17.43: - 14 +syn_definition.at-2627-prog.cob:17.42-17.43: + 14 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 > 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). @@ -467,7 +467,7 @@ syn_definition.at-2617-prog.cob:17.42-17.43: 19 >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:18.23: +syn_definition.at-2627-prog.cob:18.23: 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). @@ -477,7 +477,7 @@ syn_definition.at-2617-prog.cob:18.23: 20 01 Z-MESSAGE-T2 LIKE AUSGABE-FILE-NAME-2. >> Hint: Missing RENAMES -syn_definition.at-2617-prog.cob:18.25-18.29: +syn_definition.at-2627-prog.cob:18.25-18.29: 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). @@ -487,7 +487,7 @@ syn_definition.at-2617-prog.cob:18.25-18.29: 20 01 Z-MESSAGE-T2 LIKE AUSGABE-FILE-NAME-2. >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:18.40-18.41: +syn_definition.at-2627-prog.cob:18.40-18.41: 15 77 OUTPUT-VAL LIKE DETAIL-NO GLOBAL. 16 77 OUTPUT-VAL-P1 LIKE DETAIL-NO (+1). 17 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). @@ -497,7 +497,7 @@ syn_definition.at-2617-prog.cob:18.40-18.41: 20 01 Z-MESSAGE-T2 LIKE AUSGABE-FILE-NAME-2. >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:20.22: +syn_definition.at-2627-prog.cob:20.22: 17 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). 18 77 OUTPUT-VAL-M2 LIKE DETAIL-NO (-2). 19 @@ -507,7 +507,7 @@ syn_definition.at-2617-prog.cob:20.22: 22 49 MT3 LIKE MESSAGE-TEXT-2. >> Hint: Missing RENAMES -syn_definition.at-2617-prog.cob:20.23-20.27: +syn_definition.at-2627-prog.cob:20.23-20.27: 17 77 OUTPUT-VAL-P1b LIKE DETAIL-NO (1). 18 77 OUTPUT-VAL-M2 LIKE DETAIL-NO (-2). 19 @@ -517,7 +517,7 @@ syn_definition.at-2617-prog.cob:20.23-20.27: 22 49 MT3 LIKE MESSAGE-TEXT-2. >> Error: Invalid syntax -syn_definition.at-2617-prog.cob:22.16: +syn_definition.at-2627-prog.cob:22.16: 19 20 01 Z-MESSAGE-T2 LIKE AUSGABE-FILE-NAME-2. 21 01 Z-MESSAGE-T3. @@ -527,7 +527,7 @@ syn_definition.at-2617-prog.cob:22.16: 24 PROCEDURE DIVISION. >> Hint: Missing RENAMES -syn_definition.at-2617-prog.cob:22.22-22.26: +syn_definition.at-2627-prog.cob:22.22-22.26: 19 20 01 Z-MESSAGE-T2 LIKE AUSGABE-FILE-NAME-2. 21 01 Z-MESSAGE-T3. diff --git a/test/output-tests/syn_file.expected b/test/output-tests/syn_file.expected index 1d015bc92..5efd559f9 100644 --- a/test/output-tests/syn_file.expected +++ b/test/output-tests/syn_file.expected @@ -134,9 +134,9 @@ syn_file.at-1592-prog.cob:16.50-16.58: 18 FILE SECTION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:1738:0 -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:1829:0 -syn_file.at-1829-prog.cob:10.26-10.33: +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:1737:0 +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:1827:0 +syn_file.at-1827-prog.cob:10.26-10.33: 7 SELECT file1 ASSIGN DISK. 8 DATA DIVISION. 9 FILE SECTION. @@ -146,7 +146,7 @@ syn_file.at-1829-prog.cob:10.26-10.33: 12 PROCEDURE DIVISION. >> Error: Invalid syntax -syn_file.at-1829-prog.cob:10.43-10.44: +syn_file.at-1827-prog.cob:10.43-10.44: 7 SELECT file1 ASSIGN DISK. 8 DATA DIVISION. 9 FILE SECTION. @@ -156,7 +156,7 @@ syn_file.at-1829-prog.cob:10.43-10.44: 12 PROCEDURE DIVISION. >> Error: Invalid syntax -syn_file.at-1829-prog.cob:10.43: +syn_file.at-1827-prog.cob:10.43: 7 SELECT file1 ASSIGN DISK. 8 DATA DIVISION. 9 FILE SECTION. @@ -166,10 +166,10 @@ syn_file.at-1829-prog.cob:10.43: 12 PROCEDURE DIVISION. >> Hint: Missing -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:1856:0 -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:1937:0 -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2011:0 -syn_file.at-2011-prog.cob:14.17-14.25: +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:1854:0 +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:1935:0 +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2009:0 +syn_file.at-2009-prog.cob:14.17-14.25: 11 RECORD KEY TESTKEY-P1 12 ALTERNATE RECORD KEY TESTKEY-P2 13 WITH DUPLICATES @@ -179,7 +179,7 @@ syn_file.at-2011-prog.cob:14.17-14.25: 16 WITH DUPLICATES >> Error: Invalid syntax -syn_file.at-2011-prog.cob:17.17-17.25: +syn_file.at-2009-prog.cob:17.17-17.25: 14 SUPPRESS WHEN ZEROES 15 ALTERNATE RECORD KEY TESTKEY-P3 16 WITH DUPLICATES @@ -189,7 +189,7 @@ syn_file.at-2011-prog.cob:17.17-17.25: 19 WITH DUPLICATES >> Error: Invalid syntax -syn_file.at-2011-prog.cob:20.17-20.25: +syn_file.at-2009-prog.cob:20.17-20.25: 17 SUPPRESS WHEN SPACES 18 ALTERNATE RECORD KEY TESTKEY-P4 19 WITH DUPLICATES @@ -199,7 +199,7 @@ syn_file.at-2011-prog.cob:20.17-20.25: 22 WITH DUPLICATES >> Error: Invalid syntax -syn_file.at-2011-prog.cob:23.17-23.25: +syn_file.at-2009-prog.cob:23.17-23.25: 20 SUPPRESS WHEN ALL "A" 21 ALTERNATE RECORD KEY TESTKEY-P5 22 WITH DUPLICATES @@ -209,8 +209,8 @@ syn_file.at-2011-prog.cob:23.17-23.25: 25 DATA DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2062:0 -syn_file.at-2062-prog.cob:13.27-13.28: +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2060:0 +syn_file.at-2060-prog.cob:13.27-13.28: 10 ORGANIZATION INDEXED 11 RECORD KEY TESTKEY-P1 OF TEST-REC1 12 ALTERNATE RECORD KEY @@ -220,7 +220,7 @@ syn_file.at-2062-prog.cob:13.27-13.28: 15 WITH DUPLICATES >> Error: Invalid syntax -syn_file.at-2062-prog.cob:23.48-23.50: +syn_file.at-2060-prog.cob:23.48-23.50: 20 ORGANIZATION INDEXED 21 RECORD KEY TESTKEY-P1 OF TEST-REC2 22 ALTERNATE RECORD KEY @@ -230,7 +230,7 @@ syn_file.at-2062-prog.cob:23.48-23.50: 25 WITH DUPLICATES >> Error: Invalid syntax -syn_file.at-2062-prog.cob:24.48-24.50: +syn_file.at-2060-prog.cob:24.48-24.50: 21 RECORD KEY TESTKEY-P1 OF TEST-REC2 22 ALTERNATE RECORD KEY 23 TEST2KEY2 SOURCE IS TESTKEY-P2 OF TEST-REC2, @@ -240,10 +240,10 @@ syn_file.at-2062-prog.cob:24.48-24.50: 26 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2092:0 -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2121:0 -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2203:0 -syn_file.at-2203-prog.cob:16.18: +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2090:0 +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2119:0 +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2201:0 +syn_file.at-2201-prog.cob:16.18: 13 WITH DUPLICATES 14 ALTERNATE RECORD KEY TESTKEY-1P2 15 WITH NO DUPLICATES @@ -253,7 +253,7 @@ syn_file.at-2203-prog.cob:16.18: 18 SELECT TEST-FILE2 >> Hint: Missing AUTOMATIC -syn_file.at-2203-prog.cob:16.19-16.28: +syn_file.at-2201-prog.cob:16.19-16.28: 13 WITH DUPLICATES 14 ALTERNATE RECORD KEY TESTKEY-1P2 15 WITH NO DUPLICATES @@ -263,7 +263,7 @@ syn_file.at-2203-prog.cob:16.19-16.28: 18 SELECT TEST-FILE2 >> Error: Invalid syntax -syn_file.at-2203-prog.cob:41.16-41.25: +syn_file.at-2201-prog.cob:41.16-41.25: 38 03 ALLOWING PIC X(4). 39 03 TESTKEY-2P2 PIC 9(4). 40 PROCEDURE DIVISION. @@ -273,7 +273,7 @@ syn_file.at-2203-prog.cob:41.16-41.25: 43 OPEN I-O TEST-FILE1 TEST-FILE2 ALLOWING UPDATERS >> Error: Invalid syntax -syn_file.at-2203-prog.cob:54.40-54.43: +syn_file.at-2201-prog.cob:54.40-54.43: 51 OPEN I-O TEST-FILE1 ALLOWING WRITERS 52 CLOSE TEST-FILE1 53 CLOSE TEST-FILE1 @@ -283,7 +283,7 @@ syn_file.at-2203-prog.cob:54.40-54.43: 56 CLOSE TEST-FILE1 >> Error: Invalid syntax -syn_file.at-2203-prog.cob:57.42: +syn_file.at-2201-prog.cob:57.42: 54 OPEN I-O TEST-FILE1 ALLOWING ALL 55 CLOSE TEST-FILE1 56 CLOSE TEST-FILE1 @@ -293,7 +293,7 @@ syn_file.at-2203-prog.cob:57.42: 59 OPEN I-O TEST-FILE1 ALLOWING NO OTHERS >> Hint: Missing REWIND -syn_file.at-2203-prog.cob:58.11-58.16: +syn_file.at-2201-prog.cob:58.11-58.16: 55 CLOSE TEST-FILE1 56 CLOSE TEST-FILE1 57 OPEN I-O TEST-FILE1 ALLOWING NO @@ -303,7 +303,7 @@ syn_file.at-2203-prog.cob:58.11-58.16: 60 CLOSE TEST-FILE1 >> Error: Invalid syntax -syn_file.at-2203-prog.cob:59.42: +syn_file.at-2201-prog.cob:59.42: 56 CLOSE TEST-FILE1 57 OPEN I-O TEST-FILE1 ALLOWING NO 58 CLOSE TEST-FILE1 @@ -313,7 +313,7 @@ syn_file.at-2203-prog.cob:59.42: 61 OPEN I-O TEST-FILE1 FOR LOCK >> Hint: Missing REWIND -syn_file.at-2203-prog.cob:59.43-59.49: +syn_file.at-2201-prog.cob:59.43-59.49: 56 CLOSE TEST-FILE1 57 OPEN I-O TEST-FILE1 ALLOWING NO 58 CLOSE TEST-FILE1 @@ -323,7 +323,7 @@ syn_file.at-2203-prog.cob:59.43-59.49: 61 OPEN I-O TEST-FILE1 FOR LOCK >> Error: Invalid syntax -syn_file.at-2203-prog.cob:61.31-61.34: +syn_file.at-2201-prog.cob:61.31-61.34: 58 CLOSE TEST-FILE1 59 OPEN I-O TEST-FILE1 ALLOWING NO OTHERS 60 CLOSE TEST-FILE1 @@ -333,7 +333,7 @@ syn_file.at-2203-prog.cob:61.31-61.34: 63 OPEN I-O TEST-FILE1 LOCK >> Error: Invalid syntax -syn_file.at-2203-prog.cob:63.31-63.35: +syn_file.at-2201-prog.cob:63.31-63.35: 60 CLOSE TEST-FILE1 61 OPEN I-O TEST-FILE1 FOR LOCK 62 CLOSE TEST-FILE1 @@ -343,4 +343,4 @@ syn_file.at-2203-prog.cob:63.31-63.35: 65 OPEN I-O TEST-FILE1 BULK-ADDITION >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2253:0 +Considering: import/gnucobol/tests/testsuite.src/syn_file.at:2251:0 diff --git a/test/output-tests/syn_misc.expected b/test/output-tests/syn_misc.expected index a6340062d..620a9bad4 100644 --- a/test/output-tests/syn_misc.expected +++ b/test/output-tests/syn_misc.expected @@ -2,9 +2,9 @@ Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:46:0 Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:84:0 Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:292:0 Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:420:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:711:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:753:0 -syn_misc.at-753-prog.cob:2.7-2.22: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:731:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:773:0 +syn_misc.at-773-prog.cob:2.7-2.22: 1 2 > SOURCE-COMPUTER. GNU-LINUX. ---- ^^^^^^^^^^^^^^^ @@ -12,18 +12,18 @@ syn_misc.at-753-prog.cob:2.7-2.22: 4 SYMBOLIC NL IS 101 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:784:0 -syn_misc.at-784-prog.cob:1.11-1.18: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:804:0 +syn_misc.at-804-prog.cob:1.11-1.18: 1 > DISPLAY "minimal". ---- ^^^^^^^ >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:809:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:821:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:830:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:895:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1192:0 -syn_misc.at-1192-prog.cob:33.19: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:829:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:841:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:850:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:915:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1218:0 +syn_misc.at-1218-prog.cob:33.19: 30 CONTINUE. *> explicit no unreachable warning 31 P03. 32 GO TO P04 @@ -33,7 +33,7 @@ syn_misc.at-1192-prog.cob:33.19: 35 STOP RUN. >> Hint: Missing . -syn_misc.at-1192-prog.cob:33.20-33.25: +syn_misc.at-1218-prog.cob:33.20-33.25: 30 CONTINUE. *> explicit no unreachable warning 31 P03. 32 GO TO P04 @@ -43,7 +43,7 @@ syn_misc.at-1192-prog.cob:33.20-33.25: 35 STOP RUN. >> Warning: Invalid syntax -syn_misc.at-1192-prog.cob:33.27: +syn_misc.at-1218-prog.cob:33.27: 30 CONTINUE. *> explicit no unreachable warning 31 P03. 32 GO TO P04 @@ -53,7 +53,7 @@ syn_misc.at-1192-prog.cob:33.27: 35 STOP RUN. >> Hint: Missing . -syn_misc.at-1192-prog.cob:33.28-33.35: +syn_misc.at-1218-prog.cob:33.28-33.35: 30 CONTINUE. *> explicit no unreachable warning 31 P03. 32 GO TO P04 @@ -63,9 +63,9 @@ syn_misc.at-1192-prog.cob:33.28-33.35: 35 STOP RUN. >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1239:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1335:0 -syn_misc.at-1335-prog3.cob:6.27-6.29: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1265:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1361:0 +syn_misc.at-1361-prog3.cob:6.27-6.29: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -75,7 +75,7 @@ syn_misc.at-1335-prog3.cob:6.27-6.29: 8 03 CURSOR-COL PIC 999. >> Error: Invalid syntax -syn_misc.at-1335-prog3.cob:9.37-9.39: +syn_misc.at-1361-prog3.cob:9.37-9.39: 6 01 CURSOR-POSITION IS SPECIAL-NAMES CURSOR. 7 03 CURSOR-ROW PIC 999. 8 03 CURSOR-COL PIC 999. @@ -85,7 +85,7 @@ syn_misc.at-1335-prog3.cob:9.37-9.39: 11 ACCEPT OMITTED END-ACCEPT. >> Error: Invalid syntax -syn_misc.at-1335-prog3.cob:11.17: +syn_misc.at-1361-prog3.cob:11.17: 8 03 CURSOR-COL PIC 999. 9 77 CRT-STATUS PIC X(4) IS SPECIAL-NAMES CRT STATUS. 10 PROCEDURE DIVISION. @@ -94,7 +94,7 @@ syn_misc.at-1335-prog3.cob:11.17: 12 STOP RUN. >> Hint: Missing -syn_misc.at-1335-prog3.cob:11.18-11.25: +syn_misc.at-1361-prog3.cob:11.18-11.25: 8 03 CURSOR-COL PIC 999. 9 77 CRT-STATUS PIC X(4) IS SPECIAL-NAMES CRT STATUS. 10 PROCEDURE DIVISION. @@ -103,8 +103,8 @@ syn_misc.at-1335-prog3.cob:11.18-11.25: 12 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1336:0 -syn_misc.at-1336-prog4.cob:6.27-6.29: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1362:0 +syn_misc.at-1362-prog4.cob:6.27-6.29: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -114,7 +114,7 @@ syn_misc.at-1336-prog4.cob:6.27-6.29: 8 03 CURSOR-COL PIC 999. >> Error: Invalid syntax -syn_misc.at-1336-prog4.cob:9.37-9.39: +syn_misc.at-1362-prog4.cob:9.37-9.39: 6 01 CURSOR-POSITION IS SPECIAL-NAMES CURSOR. 7 03 CURSOR-ROW PIC 999. 8 03 CURSOR-COL PIC 999. @@ -124,7 +124,7 @@ syn_misc.at-1336-prog4.cob:9.37-9.39: 11 ACCEPT OMITTED END-ACCEPT. >> Error: Invalid syntax -syn_misc.at-1336-prog4.cob:11.17: +syn_misc.at-1362-prog4.cob:11.17: 8 03 CURSOR-COL PIC 999. 9 77 CRT-STATUS PIC 9(5) IS SPECIAL-NAMES CRT STATUS. 10 PROCEDURE DIVISION. @@ -133,7 +133,7 @@ syn_misc.at-1336-prog4.cob:11.17: 12 STOP RUN. >> Hint: Missing -syn_misc.at-1336-prog4.cob:11.18-11.25: +syn_misc.at-1362-prog4.cob:11.18-11.25: 8 03 CURSOR-COL PIC 999. 9 77 CRT-STATUS PIC 9(5) IS SPECIAL-NAMES CRT STATUS. 10 PROCEDURE DIVISION. @@ -142,8 +142,8 @@ syn_misc.at-1336-prog4.cob:11.18-11.25: 12 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1340:0 -syn_misc.at-1340-prog6.cob:6.33-6.35: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1366:0 +syn_misc.at-1366-prog6.cob:6.33-6.35: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -153,7 +153,7 @@ syn_misc.at-1340-prog6.cob:6.33-6.35: 8 ACCEPT OMITTED END-ACCEPT. >> Error: Invalid syntax -syn_misc.at-1340-prog6.cob:8.17: +syn_misc.at-1366-prog6.cob:8.17: 5 WORKING-STORAGE SECTION. 6 77 CRT-STATUS PIC X(3) IS SPECIAL-NAMES CRT STATUS. 7 PROCEDURE DIVISION. @@ -162,7 +162,7 @@ syn_misc.at-1340-prog6.cob:8.17: 9 STOP RUN. >> Hint: Missing -syn_misc.at-1340-prog6.cob:8.18-8.25: +syn_misc.at-1366-prog6.cob:8.18-8.25: 5 WORKING-STORAGE SECTION. 6 77 CRT-STATUS PIC X(3) IS SPECIAL-NAMES CRT STATUS. 7 PROCEDURE DIVISION. @@ -171,8 +171,8 @@ syn_misc.at-1340-prog6.cob:8.18-8.25: 9 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1435:0 -syn_misc.at-1435-prog3.cob:8.30: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1461:0 +syn_misc.at-1461-prog3.cob:8.30: 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. 7 CURRENCY 'DOLLAR' @@ -182,7 +182,7 @@ syn_misc.at-1435-prog3.cob:8.30: 10 WORKING-STORAGE SECTION. >> Hint: Missing SYMBOL -syn_misc.at-1435-prog3.cob:8.31-8.34: +syn_misc.at-1461-prog3.cob:8.31-8.34: 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. 7 CURRENCY 'DOLLAR' @@ -192,10 +192,10 @@ syn_misc.at-1435-prog3.cob:8.31-8.34: 10 WORKING-STORAGE SECTION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1452:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1671:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1706:0 -syn_misc.at-1706-prog.cob:12.24: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1478:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1697:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1732:0 +syn_misc.at-1732-prog.cob:12.24: 9 PROCEDURE DIVISION. 10 ACCEPT X END-ACCEPT. 11 ACCEPT X WITH UPDATE END-ACCEPT. @@ -205,7 +205,7 @@ syn_misc.at-1706-prog.cob:12.24: 14 ACCEPT X WITH NO DEFAULT END-ACCEPT. >> Hint: Missing -syn_misc.at-1706-prog.cob:12.28-12.35: +syn_misc.at-1732-prog.cob:12.28-12.35: 9 PROCEDURE DIVISION. 10 ACCEPT X END-ACCEPT. 11 ACCEPT X WITH UPDATE END-ACCEPT. @@ -215,7 +215,7 @@ syn_misc.at-1706-prog.cob:12.28-12.35: 14 ACCEPT X WITH NO DEFAULT END-ACCEPT. >> Error: Invalid syntax -syn_misc.at-1706-prog.cob:13.25-13.27: +syn_misc.at-1732-prog.cob:13.25-13.27: 10 ACCEPT X END-ACCEPT. 11 ACCEPT X WITH UPDATE END-ACCEPT. 12 ACCEPT X WITH DEFAULT END-ACCEPT. @@ -225,7 +225,7 @@ syn_misc.at-1706-prog.cob:13.25-13.27: 15 STOP RUN. >> Error: Invalid syntax -syn_misc.at-1706-prog.cob:14.24: +syn_misc.at-1732-prog.cob:14.24: 11 ACCEPT X WITH UPDATE END-ACCEPT. 12 ACCEPT X WITH DEFAULT END-ACCEPT. 13 ACCEPT X WITH NO UPDATE END-ACCEPT. @@ -234,7 +234,7 @@ syn_misc.at-1706-prog.cob:14.24: 15 STOP RUN. >> Hint: Missing -syn_misc.at-1706-prog.cob:14.25-14.27: +syn_misc.at-1732-prog.cob:14.25-14.27: 11 ACCEPT X WITH UPDATE END-ACCEPT. 12 ACCEPT X WITH DEFAULT END-ACCEPT. 13 ACCEPT X WITH NO UPDATE END-ACCEPT. @@ -243,8 +243,8 @@ syn_misc.at-1706-prog.cob:14.25-14.27: 15 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1731:0 -syn_misc.at-1731-prog.cob:14.24: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1757:0 +syn_misc.at-1757-prog.cob:14.24: 11 ACCEPT X WITH AUTO END-ACCEPT. 12 ACCEPT X WITH AUTO-SKIP END-ACCEPT. 13 ACCEPT X WITH AUTOTERMINATE END-ACCEPT. @@ -253,7 +253,7 @@ syn_misc.at-1731-prog.cob:14.24: 15 STOP RUN. >> Hint: Missing . -syn_misc.at-1731-prog.cob:14.28-14.31: +syn_misc.at-1757-prog.cob:14.28-14.31: 11 ACCEPT X WITH AUTO END-ACCEPT. 12 ACCEPT X WITH AUTO-SKIP END-ACCEPT. 13 ACCEPT X WITH AUTOTERMINATE END-ACCEPT. @@ -262,7 +262,7 @@ syn_misc.at-1731-prog.cob:14.28-14.31: 15 STOP RUN. >> Error: Invalid syntax -syn_misc.at-1731-prog.cob:14.42-14.52: +syn_misc.at-1757-prog.cob:14.42-14.52: 11 ACCEPT X WITH AUTO END-ACCEPT. 12 ACCEPT X WITH AUTO-SKIP END-ACCEPT. 13 ACCEPT X WITH AUTOTERMINATE END-ACCEPT. @@ -271,9 +271,9 @@ syn_misc.at-1731-prog.cob:14.42-14.52: 15 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1753:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1782:0 -syn_misc.at-1782-prog.cob:11.24: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1779:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1808:0 +syn_misc.at-1808-prog.cob:11.24: 8 PROCEDURE DIVISION. 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. @@ -283,7 +283,7 @@ syn_misc.at-1782-prog.cob:11.24: 13 ACCEPT X SIZE Y END-ACCEPT. >> Hint: Missing . -syn_misc.at-1782-prog.cob:11.25-11.34: +syn_misc.at-1808-prog.cob:11.25-11.34: 8 PROCEDURE DIVISION. 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. @@ -293,7 +293,7 @@ syn_misc.at-1782-prog.cob:11.25-11.34: 13 ACCEPT X SIZE Y END-ACCEPT. >> Error: Invalid syntax -syn_misc.at-1782-prog.cob:11.34: +syn_misc.at-1808-prog.cob:11.34: 8 PROCEDURE DIVISION. 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. @@ -303,7 +303,7 @@ syn_misc.at-1782-prog.cob:11.34: 13 ACCEPT X SIZE Y END-ACCEPT. >> Hint: Missing . -syn_misc.at-1782-prog.cob:11.35-11.39: +syn_misc.at-1808-prog.cob:11.35-11.39: 8 PROCEDURE DIVISION. 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. @@ -313,7 +313,7 @@ syn_misc.at-1782-prog.cob:11.35-11.39: 13 ACCEPT X SIZE Y END-ACCEPT. >> Warning: Invalid syntax -syn_misc.at-1782-prog.cob:11.45-11.55: +syn_misc.at-1808-prog.cob:11.45-11.55: 8 PROCEDURE DIVISION. 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. @@ -323,7 +323,7 @@ syn_misc.at-1782-prog.cob:11.45-11.55: 13 ACCEPT X SIZE Y END-ACCEPT. >> Error: Invalid syntax -syn_misc.at-1782-prog.cob:12.24: +syn_misc.at-1808-prog.cob:12.24: 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. 11 ACCEPT X WITH PROTECTED SIZE 2 END-ACCEPT. @@ -333,7 +333,7 @@ syn_misc.at-1782-prog.cob:12.24: 14 ACCEPT X SIZE 0 >> Hint: Missing . -syn_misc.at-1782-prog.cob:12.25-12.34: +syn_misc.at-1808-prog.cob:12.25-12.34: 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. 11 ACCEPT X WITH PROTECTED SIZE 2 END-ACCEPT. @@ -343,7 +343,7 @@ syn_misc.at-1782-prog.cob:12.25-12.34: 14 ACCEPT X SIZE 0 >> Error: Invalid syntax -syn_misc.at-1782-prog.cob:12.34: +syn_misc.at-1808-prog.cob:12.34: 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. 11 ACCEPT X WITH PROTECTED SIZE 2 END-ACCEPT. @@ -353,7 +353,7 @@ syn_misc.at-1782-prog.cob:12.34: 14 ACCEPT X SIZE 0 >> Hint: Missing . -syn_misc.at-1782-prog.cob:12.35-12.39: +syn_misc.at-1808-prog.cob:12.35-12.39: 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. 11 ACCEPT X WITH PROTECTED SIZE 2 END-ACCEPT. @@ -363,7 +363,7 @@ syn_misc.at-1782-prog.cob:12.35-12.39: 14 ACCEPT X SIZE 0 >> Warning: Invalid syntax -syn_misc.at-1782-prog.cob:12.45-12.55: +syn_misc.at-1808-prog.cob:12.45-12.55: 9 ACCEPT X WITH SIZE 0 END-ACCEPT. 10 ACCEPT X WITH SIZE IS 1 END-ACCEPT. 11 ACCEPT X WITH PROTECTED SIZE 2 END-ACCEPT. @@ -373,7 +373,7 @@ syn_misc.at-1782-prog.cob:12.45-12.55: 14 ACCEPT X SIZE 0 >> Error: Invalid syntax -syn_misc.at-1782-prog.cob:16.19: +syn_misc.at-1808-prog.cob:16.19: 13 ACCEPT X SIZE Y END-ACCEPT. 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 @@ -383,7 +383,7 @@ syn_misc.at-1782-prog.cob:16.19: 18 ACCEPT X SIZE Y >> Hint: Missing . -syn_misc.at-1782-prog.cob:16.25-16.34: +syn_misc.at-1808-prog.cob:16.25-16.34: 13 ACCEPT X SIZE Y END-ACCEPT. 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 @@ -393,7 +393,7 @@ syn_misc.at-1782-prog.cob:16.25-16.34: 18 ACCEPT X SIZE Y >> Warning: Invalid syntax -syn_misc.at-1782-prog.cob:16.34: +syn_misc.at-1808-prog.cob:16.34: 13 ACCEPT X SIZE Y END-ACCEPT. 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 @@ -403,7 +403,7 @@ syn_misc.at-1782-prog.cob:16.34: 18 ACCEPT X SIZE Y >> Hint: Missing . -syn_misc.at-1782-prog.cob:16.35-16.39: +syn_misc.at-1808-prog.cob:16.35-16.39: 13 ACCEPT X SIZE Y END-ACCEPT. 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 @@ -413,7 +413,7 @@ syn_misc.at-1782-prog.cob:16.35-16.39: 18 ACCEPT X SIZE Y >> Warning: Invalid syntax -syn_misc.at-1782-prog.cob:16.44: +syn_misc.at-1808-prog.cob:16.44: 13 ACCEPT X SIZE Y END-ACCEPT. 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 @@ -423,7 +423,7 @@ syn_misc.at-1782-prog.cob:16.44: 18 ACCEPT X SIZE Y >> Hint: Missing . -syn_misc.at-1782-prog.cob:17.11-17.17: +syn_misc.at-1808-prog.cob:17.11-17.17: 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 16 ACCEPT X PROTECTED SIZE 2 @@ -433,7 +433,7 @@ syn_misc.at-1782-prog.cob:17.11-17.17: 19 STOP RUN. >> Warning: Invalid syntax -syn_misc.at-1782-prog.cob:17.19: +syn_misc.at-1808-prog.cob:17.19: 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 16 ACCEPT X PROTECTED SIZE 2 @@ -443,7 +443,7 @@ syn_misc.at-1782-prog.cob:17.19: 19 STOP RUN. >> Hint: Missing . -syn_misc.at-1782-prog.cob:17.25-17.34: +syn_misc.at-1808-prog.cob:17.25-17.34: 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 16 ACCEPT X PROTECTED SIZE 2 @@ -453,7 +453,7 @@ syn_misc.at-1782-prog.cob:17.25-17.34: 19 STOP RUN. >> Warning: Invalid syntax -syn_misc.at-1782-prog.cob:17.34: +syn_misc.at-1808-prog.cob:17.34: 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 16 ACCEPT X PROTECTED SIZE 2 @@ -463,7 +463,7 @@ syn_misc.at-1782-prog.cob:17.34: 19 STOP RUN. >> Hint: Missing . -syn_misc.at-1782-prog.cob:17.35-17.39: +syn_misc.at-1808-prog.cob:17.35-17.39: 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 16 ACCEPT X PROTECTED SIZE 2 @@ -473,7 +473,7 @@ syn_misc.at-1782-prog.cob:17.35-17.39: 19 STOP RUN. >> Warning: Invalid syntax -syn_misc.at-1782-prog.cob:17.44: +syn_misc.at-1808-prog.cob:17.44: 14 ACCEPT X SIZE 0 15 ACCEPT X SIZE IS 1 16 ACCEPT X PROTECTED SIZE 2 @@ -483,7 +483,7 @@ syn_misc.at-1782-prog.cob:17.44: 19 STOP RUN. >> Hint: Missing . -syn_misc.at-1782-prog.cob:18.11-18.17: +syn_misc.at-1808-prog.cob:18.11-18.17: 15 ACCEPT X SIZE IS 1 16 ACCEPT X PROTECTED SIZE 2 17 ACCEPT X PROTECTED SIZE IS 3 @@ -492,11 +492,11 @@ syn_misc.at-1782-prog.cob:18.11-18.17: 19 STOP RUN. >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1807:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1826:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1858:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1903:0 -syn_misc.at-1903-prog.cob:7.19: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1833:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1852:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1884:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1929:0 +syn_misc.at-1929-prog.cob:7.19: 4 ENVIRONMENT DIVISION. 5 CONFIGURATION SECTION. 6 PROCEDURE DIVISION. @@ -504,16 +504,16 @@ syn_misc.at-1903-prog.cob:7.19: ---- ^ >> Hint: Missing . -syn_misc.at-1903-prog.cob:8.0: +syn_misc.at-1929-prog.cob:8.0: 5 CONFIGURATION SECTION. 6 PROCEDURE DIVISION. 7 CONTINUE >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1936:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2005:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2045:0 -syn_misc.at-2045-prog2.cob:11.6-11.46: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:1962:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2031:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2071:0 +syn_misc.at-2071-prog2.cob:11.6-11.46: 8 PROCEDURE DIVISION. 9 * DISPLAY 'COMMENT' END-DISPLAY 10 / DISPLAY 'COMMENTSLASH' END-DISPLAY @@ -523,7 +523,7 @@ syn_misc.at-2045-prog2.cob:11.6-11.46: 13 * DISPLAY 'NOMFCOMMENT' END-DISPLAY >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-2045-prog2.cob:15.8-15.9: +syn_misc.at-2071-prog2.cob:15.8-15.9: 12 * DISPLAY 'MFCOMMENT' END-DISPLAY 13 * DISPLAY 'NOMFCOMMENT' END-DISPLAY 14 *> DISPLAY 'FLOATING' END-DISPLAY @@ -533,9 +533,9 @@ syn_misc.at-2045-prog2.cob:15.8-15.9: 17 *> DISPLAY 'NOFLOATING' END-DISPLAY >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2232:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2377:0 -syn_misc.at-2377-prog.cob:13.17: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2257:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2402:0 +syn_misc.at-2402-prog.cob:13.17: 10 DISPLAY "Key pressed: " KEYNUM 11 ACCEPT KEYNUM FROM ESCAPE 12 DISPLAY "Key pressed: " KEYNUM @@ -545,7 +545,7 @@ syn_misc.at-2377-prog.cob:13.17: 15 STOP RUN. >> Hint: Missing -syn_misc.at-2377-prog.cob:13.18-13.25: +syn_misc.at-2402-prog.cob:13.18-13.25: 10 DISPLAY "Key pressed: " KEYNUM 11 ACCEPT KEYNUM FROM ESCAPE 12 DISPLAY "Key pressed: " KEYNUM @@ -555,8 +555,8 @@ syn_misc.at-2377-prog.cob:13.18-13.25: 15 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2400:0 -syn_misc.at-2400-prog.cob:6.30: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2425:0 +syn_misc.at-2425-prog.cob:6.30: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -566,7 +566,7 @@ syn_misc.at-2400-prog.cob:6.30: 8 77 mydouble usage double >> Hint: Missing -syn_misc.at-2400-prog.cob:6.31-6.36: +syn_misc.at-2425-prog.cob:6.31-6.36: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -576,7 +576,7 @@ syn_misc.at-2400-prog.cob:6.31-6.36: 8 77 mydouble usage double >> Error: Invalid syntax -syn_misc.at-2400-prog.cob:8.30: +syn_misc.at-2425-prog.cob:8.30: 5 WORKING-STORAGE SECTION. 6 77 myfloat usage float 7 value is 3.97E+24. @@ -586,7 +586,7 @@ syn_misc.at-2400-prog.cob:8.30: 10 PROCEDURE DIVISION. >> Hint: Missing -syn_misc.at-2400-prog.cob:8.31-8.37: +syn_misc.at-2425-prog.cob:8.31-8.37: 5 WORKING-STORAGE SECTION. 6 77 myfloat usage float 7 value is 3.97E+24. @@ -596,8 +596,8 @@ syn_misc.at-2400-prog.cob:8.31-8.37: 10 PROCEDURE DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2668:0 -syn_misc.at-2668-prog.cob:6.30: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2702:0 +syn_misc.at-2702-prog.cob:6.30: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -607,7 +607,7 @@ syn_misc.at-2668-prog.cob:6.30: 8 77 lb-color PIC 9(05) VALUE 8192. >> Hint: Missing -syn_misc.at-2668-prog.cob:6.31-6.37: +syn_misc.at-2702-prog.cob:6.31-6.37: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -617,7 +617,7 @@ syn_misc.at-2668-prog.cob:6.31-6.37: 8 77 lb-color PIC 9(05) VALUE 8192. >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:16.20: +syn_misc.at-2702-prog.cob:16.20: 13 77 selection-idx PIC S9(02). 14 SCREEN SECTION. 15 01 lb-screen. @@ -627,7 +627,7 @@ syn_misc.at-2668-prog.cob:16.20: 18 UNSORTED >> Hint: Missing . -syn_misc.at-2668-prog.cob:16.21-16.29: +syn_misc.at-2702-prog.cob:16.21-16.29: 13 77 selection-idx PIC S9(02). 14 SCREEN SECTION. 15 01 lb-screen. @@ -637,7 +637,7 @@ syn_misc.at-2668-prog.cob:16.21-16.29: 18 UNSORTED >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:20.20-20.25: +syn_misc.at-2702-prog.cob:20.20-20.25: 17 * FIXME: the following should be possible in any order 18 UNSORTED 19 EXCEPTION-VALUE = 13 @@ -647,7 +647,7 @@ syn_misc.at-2668-prog.cob:20.20-20.25: 22 LINES = lb-num-lines >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:20.34: +syn_misc.at-2702-prog.cob:20.34: 17 * FIXME: the following should be possible in any order 18 UNSORTED 19 EXCEPTION-VALUE = 13 @@ -657,7 +657,7 @@ syn_misc.at-2668-prog.cob:20.34: 22 LINES = lb-num-lines >> Hint: Missing . -syn_misc.at-2668-prog.cob:21.20-21.25: +syn_misc.at-2702-prog.cob:21.20-21.25: 18 UNSORTED 19 EXCEPTION-VALUE = 13 20 COLOR lb-color @@ -667,7 +667,7 @@ syn_misc.at-2668-prog.cob:21.20-21.25: 23 SIZE IS lb-num-rows >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:21.32: +syn_misc.at-2702-prog.cob:21.32: 18 UNSORTED 19 EXCEPTION-VALUE = 13 20 COLOR lb-color @@ -677,7 +677,7 @@ syn_misc.at-2668-prog.cob:21.32: 23 SIZE IS lb-num-rows >> Hint: Missing . -syn_misc.at-2668-prog.cob:21.33-21.34: +syn_misc.at-2702-prog.cob:21.33-21.34: 18 UNSORTED 19 EXCEPTION-VALUE = 13 20 COLOR lb-color @@ -687,7 +687,7 @@ syn_misc.at-2668-prog.cob:21.33-21.34: 23 SIZE IS lb-num-rows >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:22.20-22.25: +syn_misc.at-2702-prog.cob:22.20-22.25: 19 EXCEPTION-VALUE = 13 20 COLOR lb-color 21 CLINE 1 CCOL 1 @@ -697,7 +697,7 @@ syn_misc.at-2668-prog.cob:22.20-22.25: 24 * VALUE lb-row raises error as no identifer according >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:29.11-29.17: +syn_misc.at-2702-prog.cob:29.11-29.17: 26 . 27 PROCEDURE DIVISION. 28 MAIN. @@ -707,7 +707,7 @@ syn_misc.at-2668-prog.cob:29.11-29.17: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:29.24: +syn_misc.at-2702-prog.cob:29.24: 26 . 27 PROCEDURE DIVISION. 28 MAIN. @@ -717,7 +717,7 @@ syn_misc.at-2668-prog.cob:29.24: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' >> Hint: Missing . -syn_misc.at-2668-prog.cob:29.25-29.36: +syn_misc.at-2702-prog.cob:29.25-29.36: 26 . 27 PROCEDURE DIVISION. 28 MAIN. @@ -727,7 +727,7 @@ syn_misc.at-2668-prog.cob:29.25-29.36: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:29.36: +syn_misc.at-2702-prog.cob:29.36: 26 . 27 PROCEDURE DIVISION. 28 MAIN. @@ -737,7 +737,7 @@ syn_misc.at-2668-prog.cob:29.36: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' >> Hint: Missing . -syn_misc.at-2668-prog.cob:29.37-29.38: +syn_misc.at-2702-prog.cob:29.37-29.38: 26 . 27 PROCEDURE DIVISION. 28 MAIN. @@ -747,7 +747,7 @@ syn_misc.at-2668-prog.cob:29.37-29.38: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:30.24: +syn_misc.at-2702-prog.cob:30.24: 27 PROCEDURE DIVISION. 28 MAIN. 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' @@ -757,7 +757,7 @@ syn_misc.at-2668-prog.cob:30.24: 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' >> Hint: Missing . -syn_misc.at-2668-prog.cob:30.25-30.36: +syn_misc.at-2702-prog.cob:30.25-30.36: 27 PROCEDURE DIVISION. 28 MAIN. 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' @@ -767,7 +767,7 @@ syn_misc.at-2668-prog.cob:30.25-30.36: 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:30.36: +syn_misc.at-2702-prog.cob:30.36: 27 PROCEDURE DIVISION. 28 MAIN. 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' @@ -777,7 +777,7 @@ syn_misc.at-2668-prog.cob:30.36: 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' >> Hint: Missing . -syn_misc.at-2668-prog.cob:30.37-30.38: +syn_misc.at-2702-prog.cob:30.37-30.38: 27 PROCEDURE DIVISION. 28 MAIN. 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' @@ -787,7 +787,7 @@ syn_misc.at-2668-prog.cob:30.37-30.38: 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:31.24: +syn_misc.at-2702-prog.cob:31.24: 28 MAIN. 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' @@ -797,7 +797,7 @@ syn_misc.at-2668-prog.cob:31.24: 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' >> Hint: Missing . -syn_misc.at-2668-prog.cob:31.25-31.36: +syn_misc.at-2702-prog.cob:31.25-31.36: 28 MAIN. 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' @@ -807,7 +807,7 @@ syn_misc.at-2668-prog.cob:31.25-31.36: 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:31.36: +syn_misc.at-2702-prog.cob:31.36: 28 MAIN. 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' @@ -817,7 +817,7 @@ syn_misc.at-2668-prog.cob:31.36: 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' >> Hint: Missing . -syn_misc.at-2668-prog.cob:31.37-31.38: +syn_misc.at-2702-prog.cob:31.37-31.38: 28 MAIN. 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' @@ -827,7 +827,7 @@ syn_misc.at-2668-prog.cob:31.37-31.38: 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:32.24: +syn_misc.at-2702-prog.cob:32.24: 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' @@ -837,7 +837,7 @@ syn_misc.at-2668-prog.cob:32.24: 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' >> Hint: Missing . -syn_misc.at-2668-prog.cob:32.25-32.36: +syn_misc.at-2702-prog.cob:32.25-32.36: 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' @@ -847,7 +847,7 @@ syn_misc.at-2668-prog.cob:32.25-32.36: 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:32.36: +syn_misc.at-2702-prog.cob:32.36: 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' @@ -857,7 +857,7 @@ syn_misc.at-2668-prog.cob:32.36: 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' >> Hint: Missing . -syn_misc.at-2668-prog.cob:32.37-32.38: +syn_misc.at-2702-prog.cob:32.37-32.38: 29 MODIFY lb-frm ITEM-TO-ADD = 'Row 1' 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' @@ -867,7 +867,7 @@ syn_misc.at-2668-prog.cob:32.37-32.38: 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:33.24: +syn_misc.at-2702-prog.cob:33.24: 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' @@ -877,7 +877,7 @@ syn_misc.at-2668-prog.cob:33.24: 35 MODIFY lb-frm ITEM-TO-ADD = 'Row 7' >> Hint: Missing . -syn_misc.at-2668-prog.cob:33.25-33.36: +syn_misc.at-2702-prog.cob:33.25-33.36: 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' @@ -887,7 +887,7 @@ syn_misc.at-2668-prog.cob:33.25-33.36: 35 MODIFY lb-frm ITEM-TO-ADD = 'Row 7' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:33.36: +syn_misc.at-2702-prog.cob:33.36: 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' @@ -897,7 +897,7 @@ syn_misc.at-2668-prog.cob:33.36: 35 MODIFY lb-frm ITEM-TO-ADD = 'Row 7' >> Hint: Missing . -syn_misc.at-2668-prog.cob:33.37-33.38: +syn_misc.at-2702-prog.cob:33.37-33.38: 30 MODIFY lb-frm ITEM-TO-ADD = 'Row 2' 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' @@ -907,7 +907,7 @@ syn_misc.at-2668-prog.cob:33.37-33.38: 35 MODIFY lb-frm ITEM-TO-ADD = 'Row 7' >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:34.24: +syn_misc.at-2702-prog.cob:34.24: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' @@ -917,7 +917,7 @@ syn_misc.at-2668-prog.cob:34.24: 36 DISPLAY FLOATING WINDOW >> Hint: Missing . -syn_misc.at-2668-prog.cob:34.25-34.36: +syn_misc.at-2702-prog.cob:34.25-34.36: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' @@ -927,7 +927,7 @@ syn_misc.at-2668-prog.cob:34.25-34.36: 36 DISPLAY FLOATING WINDOW >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:34.36: +syn_misc.at-2702-prog.cob:34.36: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' @@ -937,7 +937,7 @@ syn_misc.at-2668-prog.cob:34.36: 36 DISPLAY FLOATING WINDOW >> Hint: Missing . -syn_misc.at-2668-prog.cob:34.37-34.38: +syn_misc.at-2702-prog.cob:34.37-34.38: 31 MODIFY lb-frm ITEM-TO-ADD = 'Row 3' 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' @@ -947,7 +947,7 @@ syn_misc.at-2668-prog.cob:34.37-34.38: 36 DISPLAY FLOATING WINDOW >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:35.24: +syn_misc.at-2702-prog.cob:35.24: 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' @@ -957,7 +957,7 @@ syn_misc.at-2668-prog.cob:35.24: 37 LINE 5 COL 5 >> Hint: Missing . -syn_misc.at-2668-prog.cob:35.25-35.36: +syn_misc.at-2702-prog.cob:35.25-35.36: 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' @@ -967,7 +967,7 @@ syn_misc.at-2668-prog.cob:35.25-35.36: 37 LINE 5 COL 5 >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:35.36: +syn_misc.at-2702-prog.cob:35.36: 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' @@ -977,7 +977,7 @@ syn_misc.at-2668-prog.cob:35.36: 37 LINE 5 COL 5 >> Hint: Missing . -syn_misc.at-2668-prog.cob:35.37-35.38: +syn_misc.at-2702-prog.cob:35.37-35.38: 32 MODIFY lb-frm ITEM-TO-ADD = 'Row 4' 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' @@ -987,7 +987,7 @@ syn_misc.at-2668-prog.cob:35.37-35.38: 37 LINE 5 COL 5 >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:36.19-36.27: +syn_misc.at-2702-prog.cob:36.19-36.27: 33 MODIFY lb-frm ITEM-TO-ADD = 'Row 5' 34 MODIFY lb-frm ITEM-TO-ADD = 'Row 6' 35 MODIFY lb-frm ITEM-TO-ADD = 'Row 7' @@ -997,7 +997,7 @@ syn_misc.at-2668-prog.cob:36.19-36.27: 38 LINES window-lines >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:38.15-38.20: +syn_misc.at-2702-prog.cob:38.15-38.20: 35 MODIFY lb-frm ITEM-TO-ADD = 'Row 7' 36 DISPLAY FLOATING WINDOW 37 LINE 5 COL 5 @@ -1007,7 +1007,7 @@ syn_misc.at-2668-prog.cob:38.15-38.20: 40 BOXED >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:41.15-41.20: +syn_misc.at-2702-prog.cob:41.15-41.20: 38 LINES window-lines 39 SIZE window-rows 40 BOXED @@ -1017,7 +1017,7 @@ syn_misc.at-2668-prog.cob:41.15-41.20: 43 END-DISPLAY >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:42.15-42.21: +syn_misc.at-2702-prog.cob:42.15-42.21: 39 SIZE window-rows 40 BOXED 41 COLOR lb-color @@ -1027,7 +1027,7 @@ syn_misc.at-2668-prog.cob:42.15-42.21: 44 DISPLAY lb-screen >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:46.29: +syn_misc.at-2702-prog.cob:46.29: 43 END-DISPLAY 44 DISPLAY lb-screen 45 ACCEPT lb-screen @@ -1037,7 +1037,7 @@ syn_misc.at-2668-prog.cob:46.29: 48 IF selection-idx > ZERO >> Hint: Missing . -syn_misc.at-2668-prog.cob:47.14-47.21: +syn_misc.at-2702-prog.cob:47.14-47.21: 44 DISPLAY lb-screen 45 ACCEPT lb-screen 46 IF lb-row = SPACES @@ -1047,7 +1047,7 @@ syn_misc.at-2668-prog.cob:47.14-47.21: 49 MODIFY lb-frm QUERY-INDEX = selection-idx >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:47.28: +syn_misc.at-2702-prog.cob:47.28: 44 DISPLAY lb-screen 45 ACCEPT lb-screen 46 IF lb-row = SPACES @@ -1057,7 +1057,7 @@ syn_misc.at-2668-prog.cob:47.28: 49 MODIFY lb-frm QUERY-INDEX = selection-idx >> Hint: Missing . -syn_misc.at-2668-prog.cob:47.29-47.44: +syn_misc.at-2702-prog.cob:47.29-47.44: 44 DISPLAY lb-screen 45 ACCEPT lb-screen 46 IF lb-row = SPACES @@ -1067,7 +1067,7 @@ syn_misc.at-2668-prog.cob:47.29-47.44: 49 MODIFY lb-frm QUERY-INDEX = selection-idx >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:47.44: +syn_misc.at-2702-prog.cob:47.44: 44 DISPLAY lb-screen 45 ACCEPT lb-screen 46 IF lb-row = SPACES @@ -1077,7 +1077,7 @@ syn_misc.at-2668-prog.cob:47.44: 49 MODIFY lb-frm QUERY-INDEX = selection-idx >> Hint: Missing . -syn_misc.at-2668-prog.cob:47.45-47.47: +syn_misc.at-2702-prog.cob:47.45-47.47: 44 DISPLAY lb-screen 45 ACCEPT lb-screen 46 IF lb-row = SPACES @@ -1087,7 +1087,7 @@ syn_misc.at-2668-prog.cob:47.45-47.47: 49 MODIFY lb-frm QUERY-INDEX = selection-idx >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:47.61: +syn_misc.at-2702-prog.cob:47.61: 44 DISPLAY lb-screen 45 ACCEPT lb-screen 46 IF lb-row = SPACES @@ -1097,7 +1097,7 @@ syn_misc.at-2668-prog.cob:47.61: 49 MODIFY lb-frm QUERY-INDEX = selection-idx >> Hint: Missing . -syn_misc.at-2668-prog.cob:48.14-48.16: +syn_misc.at-2702-prog.cob:48.14-48.16: 45 ACCEPT lb-screen 46 IF lb-row = SPACES 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx @@ -1107,7 +1107,7 @@ syn_misc.at-2668-prog.cob:48.14-48.16: 50 INQUIRE lb-frm ITEM-VALUE IN lb-row >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:48.37: +syn_misc.at-2702-prog.cob:48.37: 45 ACCEPT lb-screen 46 IF lb-row = SPACES 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx @@ -1117,7 +1117,7 @@ syn_misc.at-2668-prog.cob:48.37: 50 INQUIRE lb-frm ITEM-VALUE IN lb-row >> Hint: Missing . -syn_misc.at-2668-prog.cob:49.17-49.23: +syn_misc.at-2702-prog.cob:49.17-49.23: 46 IF lb-row = SPACES 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO @@ -1127,7 +1127,7 @@ syn_misc.at-2668-prog.cob:49.17-49.23: 51 END-IF >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:49.31: +syn_misc.at-2702-prog.cob:49.31: 46 IF lb-row = SPACES 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO @@ -1137,7 +1137,7 @@ syn_misc.at-2668-prog.cob:49.31: 51 END-IF >> Hint: Missing . -syn_misc.at-2668-prog.cob:49.32-49.43: +syn_misc.at-2702-prog.cob:49.32-49.43: 46 IF lb-row = SPACES 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO @@ -1147,7 +1147,7 @@ syn_misc.at-2668-prog.cob:49.32-49.43: 51 END-IF >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:49.43: +syn_misc.at-2702-prog.cob:49.43: 46 IF lb-row = SPACES 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO @@ -1157,7 +1157,7 @@ syn_misc.at-2668-prog.cob:49.43: 51 END-IF >> Hint: Missing . -syn_misc.at-2668-prog.cob:49.44-49.45: +syn_misc.at-2702-prog.cob:49.44-49.45: 46 IF lb-row = SPACES 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO @@ -1167,7 +1167,7 @@ syn_misc.at-2668-prog.cob:49.44-49.45: 51 END-IF >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:49.59: +syn_misc.at-2702-prog.cob:49.59: 46 IF lb-row = SPACES 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO @@ -1177,7 +1177,7 @@ syn_misc.at-2668-prog.cob:49.59: 51 END-IF >> Hint: Missing . -syn_misc.at-2668-prog.cob:50.17-50.24: +syn_misc.at-2702-prog.cob:50.17-50.24: 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO 49 MODIFY lb-frm QUERY-INDEX = selection-idx @@ -1187,7 +1187,7 @@ syn_misc.at-2668-prog.cob:50.17-50.24: 52 END-IF >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:50.31: +syn_misc.at-2702-prog.cob:50.31: 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO 49 MODIFY lb-frm QUERY-INDEX = selection-idx @@ -1197,7 +1197,7 @@ syn_misc.at-2668-prog.cob:50.31: 52 END-IF >> Hint: Missing . -syn_misc.at-2668-prog.cob:50.32-50.42: +syn_misc.at-2702-prog.cob:50.32-50.42: 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO 49 MODIFY lb-frm QUERY-INDEX = selection-idx @@ -1207,7 +1207,7 @@ syn_misc.at-2668-prog.cob:50.32-50.42: 52 END-IF >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:50.42: +syn_misc.at-2702-prog.cob:50.42: 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO 49 MODIFY lb-frm QUERY-INDEX = selection-idx @@ -1217,7 +1217,7 @@ syn_misc.at-2668-prog.cob:50.42: 52 END-IF >> Hint: Missing . -syn_misc.at-2668-prog.cob:50.43-50.45: +syn_misc.at-2702-prog.cob:50.43-50.45: 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO 49 MODIFY lb-frm QUERY-INDEX = selection-idx @@ -1227,7 +1227,7 @@ syn_misc.at-2668-prog.cob:50.43-50.45: 52 END-IF >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:50.52: +syn_misc.at-2702-prog.cob:50.52: 47 INQUIRE lb-frm SELECTION-INDEX IN selection-idx 48 IF selection-idx > ZERO 49 MODIFY lb-frm QUERY-INDEX = selection-idx @@ -1237,7 +1237,7 @@ syn_misc.at-2668-prog.cob:50.52: 52 END-IF >> Hint: Missing . -syn_misc.at-2668-prog.cob:51.14-51.20: +syn_misc.at-2702-prog.cob:51.14-51.20: 48 IF selection-idx > ZERO 49 MODIFY lb-frm QUERY-INDEX = selection-idx 50 INQUIRE lb-frm ITEM-VALUE IN lb-row @@ -1247,7 +1247,7 @@ syn_misc.at-2668-prog.cob:51.14-51.20: 53 CLOSE WINDOW window-handle >> Warning: Invalid syntax -syn_misc.at-2668-prog.cob:53.17-53.23: +syn_misc.at-2702-prog.cob:53.17-53.23: 50 INQUIRE lb-frm ITEM-VALUE IN lb-row 51 END-IF 52 END-IF @@ -1257,7 +1257,7 @@ syn_misc.at-2668-prog.cob:53.17-53.23: 55 ACCEPT OMITTED >> Error: Invalid syntax -syn_misc.at-2668-prog.cob:55.17: +syn_misc.at-2702-prog.cob:55.17: 52 END-IF 53 CLOSE WINDOW window-handle 54 DISPLAY "chosen row value was '" lb-row "'" @@ -1267,7 +1267,7 @@ syn_misc.at-2668-prog.cob:55.17: 57 STOP RUN. >> Hint: Missing -syn_misc.at-2668-prog.cob:55.18-55.25: +syn_misc.at-2702-prog.cob:55.18-55.25: 52 END-IF 53 CLOSE WINDOW window-handle 54 DISPLAY "chosen row value was '" lb-row "'" @@ -1277,8 +1277,8 @@ syn_misc.at-2668-prog.cob:55.18-55.25: 57 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2715:0 -syn_misc.at-2715-prog.cob:18.19-18.26: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2749:0 +syn_misc.at-2749-prog.cob:18.19-18.26: 15 78 MB-WARNING-ICON VALUE 2. 16 78 MB-ERROR-ICON VALUE 3. 17 PROCEDURE DIVISION. @@ -1288,7 +1288,7 @@ syn_misc.at-2715-prog.cob:18.19-18.26: 20 TYPE = MB-OK >> Error: Invalid syntax -syn_misc.at-2715-prog.cob:20.19-20.23: +syn_misc.at-2749-prog.cob:20.19-20.23: 17 PROCEDURE DIVISION. 18 DISPLAY MESSAGE "Important" 19 TITLE "Very important" @@ -1298,7 +1298,7 @@ syn_misc.at-2715-prog.cob:20.19-20.23: 22 DISPLAY MESSAGE "This is" space "my" space my-text >> Error: Invalid syntax -syn_misc.at-2715-prog.cob:21.24-21.26: +syn_misc.at-2749-prog.cob:21.24-21.26: 18 DISPLAY MESSAGE "Important" 19 TITLE "Very important" 20 TYPE = MB-OK @@ -1308,7 +1308,7 @@ syn_misc.at-2715-prog.cob:21.24-21.26: 23 DISPLAY MESSAGE BOX "More messages?" >> Error: Invalid syntax -syn_misc.at-2715-prog.cob:22.19-22.26: +syn_misc.at-2749-prog.cob:22.19-22.26: 19 TITLE "Very important" 20 TYPE = MB-OK 21 ICON IS MB-WARNING-ICON @@ -1318,7 +1318,7 @@ syn_misc.at-2715-prog.cob:22.19-22.26: 24 TYPE MB-YES-NO >> Error: Invalid syntax -syn_misc.at-2715-prog.cob:23.19-23.26: +syn_misc.at-2749-prog.cob:23.19-23.26: 20 TYPE = MB-OK 21 ICON IS MB-WARNING-ICON 22 DISPLAY MESSAGE "This is" space "my" space my-text @@ -1328,7 +1328,7 @@ syn_misc.at-2715-prog.cob:23.19-23.26: 25 TITLE = "box title" >> Error: Invalid syntax -syn_misc.at-2715-prog.cob:24.19-24.23: +syn_misc.at-2749-prog.cob:24.19-24.23: 21 ICON IS MB-WARNING-ICON 22 DISPLAY MESSAGE "This is" space "my" space my-text 23 DISPLAY MESSAGE BOX "More messages?" @@ -1338,7 +1338,7 @@ syn_misc.at-2715-prog.cob:24.19-24.23: 26 DEFAULT IS MB-YES >> Error: Invalid syntax -syn_misc.at-2715-prog.cob:25.25-25.26: +syn_misc.at-2749-prog.cob:25.25-25.26: 22 DISPLAY MESSAGE "This is" space "my" space my-text 23 DISPLAY MESSAGE BOX "More messages?" 24 TYPE MB-YES-NO @@ -1348,7 +1348,7 @@ syn_misc.at-2715-prog.cob:25.25-25.26: 27 RETURNING RETURN-CODE >> Error: Invalid syntax -syn_misc.at-2715-prog.cob:26.19-26.26: +syn_misc.at-2749-prog.cob:26.19-26.26: 23 DISPLAY MESSAGE BOX "More messages?" 24 TYPE MB-YES-NO 25 TITLE = "box title" @@ -1358,7 +1358,7 @@ syn_misc.at-2715-prog.cob:26.19-26.26: 28 * >> Error: Invalid syntax -syn_misc.at-2715-prog.cob:27.19-27.28: +syn_misc.at-2749-prog.cob:27.19-27.28: 24 TYPE MB-YES-NO 25 TITLE = "box title" 26 DEFAULT IS MB-YES @@ -1368,8 +1368,8 @@ syn_misc.at-2715-prog.cob:27.19-27.28: 29 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2737:0 -syn_misc.at-2737-prog.cob:5.18: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2771:0 +syn_misc.at-2771-prog.cob:5.18: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog. 4 PROCEDURE DIVISION. @@ -1379,7 +1379,7 @@ syn_misc.at-2737-prog.cob:5.18: 7 * >> Hint: Missing -syn_misc.at-2737-prog.cob:5.19-5.26: +syn_misc.at-2771-prog.cob:5.19-5.26: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog. 4 PROCEDURE DIVISION. @@ -1389,7 +1389,7 @@ syn_misc.at-2737-prog.cob:5.19-5.26: 7 * >> Error: Invalid syntax -syn_misc.at-2737-prog.cob:6.19-6.26: +syn_misc.at-2771-prog.cob:6.19-6.26: 3 PROGRAM-ID. prog. 4 PROCEDURE DIVISION. 5 DISPLAY OMITTED WITH BELL @@ -1399,8 +1399,8 @@ syn_misc.at-2737-prog.cob:6.19-6.26: 8 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2788:0 -syn_misc.at-2788-prog.cob:6.24-6.26: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2822:0 +syn_misc.at-2822-prog.cob:6.24-6.26: 3 PROGRAM-ID. prog. 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. @@ -1410,7 +1410,7 @@ syn_misc.at-2788-prog.cob:6.24-6.26: 8 01 WEB-PAGE-1 EXTERNAL-FORM, >> Error: Invalid syntax -syn_misc.at-2788-prog.cob:8.22-8.35: +syn_misc.at-2822-prog.cob:8.22-8.35: 5 WORKING-STORAGE SECTION. 6 01 GNUCOBOL-URL IS EXTERNAL-FORM 7 IDENTIFIED BY "http://www.gnu.org/software/gnucobol/". @@ -1420,7 +1420,7 @@ syn_misc.at-2788-prog.cob:8.22-8.35: 10 01 SIMPLE-FORM IS EXTERNAL-FORM. >> Error: Invalid syntax -syn_misc.at-2788-prog.cob:10.23-10.25: +syn_misc.at-2822-prog.cob:10.23-10.25: 7 IDENTIFIED BY "http://www.gnu.org/software/gnucobol/". 8 01 WEB-PAGE-1 EXTERNAL-FORM, 9 IDENTIFIED "cgipage1". @@ -1430,7 +1430,7 @@ syn_misc.at-2788-prog.cob:10.23-10.25: 12 03 SIMPLE-FORM-VAR2 PIC 9(5). >> Error: Invalid syntax -syn_misc.at-2788-prog.cob:13.19-13.32: +syn_misc.at-2822-prog.cob:13.19-13.32: 10 01 SIMPLE-FORM IS EXTERNAL-FORM. 11 03 SIMPLE-FORM-VAR1 PIC X(10). 12 03 SIMPLE-FORM-VAR2 PIC 9(5). @@ -1440,7 +1440,7 @@ syn_misc.at-2788-prog.cob:13.19-13.32: 15 03 CGI-VAR2 PIC X(50) IDENTIFIED BY CGI-VAR1. >> Error: Invalid syntax -syn_misc.at-2788-prog.cob:14.34-14.44: +syn_misc.at-2822-prog.cob:14.34-14.44: 11 03 SIMPLE-FORM-VAR1 PIC X(10). 12 03 SIMPLE-FORM-VAR2 PIC 9(5). 13 01 MY-FORM EXTERNAL-FORM. @@ -1450,7 +1450,7 @@ syn_misc.at-2788-prog.cob:14.34-14.44: 16 >> Error: Invalid syntax -syn_misc.at-2788-prog.cob:15.34-15.44: +syn_misc.at-2822-prog.cob:15.34-15.44: 12 03 SIMPLE-FORM-VAR2 PIC 9(5). 13 01 MY-FORM EXTERNAL-FORM. 14 03 CGI-VAR1 PIC X(20) IDENTIFIED "Name". @@ -1460,8 +1460,8 @@ syn_misc.at-2788-prog.cob:15.34-15.44: 17 PROCEDURE DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2826:0 -syn_misc.at-2826-prog.cob:10.11-10.15: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2860:0 +syn_misc.at-2860-prog.cob:10.11-10.15: 7 01 hello PIC X. 8 01 foo PIC X. 9 01 bars PIC X. @@ -1471,8 +1471,8 @@ syn_misc.at-2826-prog.cob:10.11-10.15: 12 >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2858:0 -syn_misc.at-2858-prog.cob:6.15-6.30: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2892:0 +syn_misc.at-2892-prog.cob:6.15-6.30: 3 PROGRAM-ID. prog. 4 5 PROCEDURE DIVISION. @@ -1481,8 +1481,8 @@ syn_misc.at-2858-prog.cob:6.15-6.30: 7 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2876:0 -syn_misc.at-2876-prog.cob:6.11-6.17: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2910:0 +syn_misc.at-2910-prog.cob:6.11-6.17: 3 PROGRAM-ID. prog. 4 5 PROCEDURE DIVISION. @@ -1491,14 +1491,14 @@ syn_misc.at-2876-prog.cob:6.11-6.17: 7 DISPLAY "Hello, world!". >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2910:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2943:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2987:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3048:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3104:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3107:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3109:0 -syn_misc.at-3109-prog3.cob:2.7-2.32: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2944:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:2977:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3021:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3082:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3138:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3141:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3143:0 +syn_misc.at-3143-prog3.cob:2.7-2.32: 1 2 > >> CALL-CONVENTION STATIC ---- ^^^^^^^^^^^^^^^^^^^^^^^^^ @@ -1506,9 +1506,9 @@ syn_misc.at-3109-prog3.cob:2.7-2.32: 4 PROGRAM-ID. prog3. >> Error: Invalid >>CALL-CONVENTION compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3175:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3227:0 -syn_misc.at-3227-prog.cob:7.30-7.31: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3209:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3261:0 +syn_misc.at-3261-prog.cob:7.30-7.31: 4 5 DATA DIVISION. 6 WORKING-STORAGE SECTION. @@ -1518,7 +1518,7 @@ syn_misc.at-3227-prog.cob:7.30-7.31: 9 >> Error: Invalid syntax -syn_misc.at-3227-prog.cob:10.7-10.15: +syn_misc.at-3261-prog.cob:10.7-10.15: 7 REPLACE ==a== BY ==b==.. *> blah blah 8 . 9 @@ -1530,7 +1530,7 @@ syn_misc.at-3227-prog.cob:10.7-10.15: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -syn_misc.at-3227-prog.cob:14.10-14.11: +syn_misc.at-3261-prog.cob:14.10-14.11: 11 12 78 var VALUE "hello". 13 * blah blah @@ -1538,8 +1538,8 @@ syn_misc.at-3227-prog.cob:14.10-14.11: ---- ^ >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3266:0 -syn_misc.at-3266-prog.cob:14.19: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3300:0 +syn_misc.at-3300-prog.cob:14.19: 11 IF NOT DONE = 1 12 DISPLAY "SEC-1 NOT EXECUTED" 13 END-IF @@ -1549,7 +1549,7 @@ syn_misc.at-3266-prog.cob:14.19: 16 MOVE 1 TO DONE >> Hint: Missing . -syn_misc.at-3266-prog.cob:15.7-15.12: +syn_misc.at-3300-prog.cob:15.7-15.12: 12 DISPLAY "SEC-1 NOT EXECUTED" 13 END-IF 14 STOP RUN @@ -1559,8 +1559,8 @@ syn_misc.at-3266-prog.cob:15.7-15.12: 17 GOBACK. >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3321:0 -syn_misc.at-3321-prog.cob:7.7-7.21: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3355:0 +syn_misc.at-3355-prog.cob:7.7-7.21: 4 5 DATA DIVISION. 6 WORKING-STORAGE SECTION. @@ -1572,7 +1572,7 @@ syn_misc.at-3321-prog.cob:7.7-7.21: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -syn_misc.at-3321-prog.cob:16.11-16.28: +syn_misc.at-3355-prog.cob:16.11-16.28: 13 * Directive purposefully in Area A 14 REPLACE ==RUNNN== BY ==RUN==. 15 STOP RUNNN @@ -1584,7 +1584,7 @@ syn_misc.at-3321-prog.cob:16.11-16.28: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -syn_misc.at-3321-prog.cob:18.8-18.25: +syn_misc.at-3355-prog.cob:18.8-18.25: 15 STOP RUNNN 16 COPY "sec-1.inc". 17 * Also purposefully in Area A @@ -1594,21 +1594,21 @@ syn_misc.at-3321-prog.cob:18.8-18.25: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -syn_misc.at-3321-prog.cob:19.0: +syn_misc.at-3355-prog.cob:19.0: 16 COPY "sec-1.inc". 17 * Also purposefully in Area A 18 COPY "sec-2.inc". >> Hint: Missing . -syn_misc.at-3321-prog.cob:19.0: +syn_misc.at-3355-prog.cob:19.0: 16 COPY "sec-1.inc". 17 * Also purposefully in Area A 18 COPY "sec-2.inc". >> Warning: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3386:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3436:0 -syn_misc.at-3436-prog.cob:7.11-9.12: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3420:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3470:0 +syn_misc.at-3470-prog.cob:7.11-9.12: 4 5 DATA DIVISION. 6 WORKING-STORAGE SECTION. @@ -1624,7 +1624,7 @@ syn_misc.at-3436-prog.cob:7.11-9.12: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -syn_misc.at-3436-prog.cob:11.11-11.18: +syn_misc.at-3470-prog.cob:11.11-11.18: 8 01 OK PIC XX VALUE "OK". == 9 . 10 @@ -1634,9 +1634,9 @@ syn_misc.at-3436-prog.cob:11.11-11.18: 13 CONTINUE >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:3969:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4209:0 -syn_misc.at-4209-prog.cob:9.27-9.28: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4003:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4244:0 +syn_misc.at-4244-prog.cob:9.27-9.28: 6 ENVIRONMENT DIVISION. 7 CONFIGURATION SECTION. 8 SPECIAL-NAMES. @@ -1646,7 +1646,7 @@ syn_misc.at-4209-prog.cob:9.27-9.28: 11 PROCEDURE DIVISION EXTERN. >> Error: Invalid syntax -syn_misc.at-4209-prog.cob:11.29: +syn_misc.at-4244-prog.cob:11.29: 8 SPECIAL-NAMES. 9 CALL-CONVENTION 0 IS EXTERN. 10 @@ -1656,7 +1656,7 @@ syn_misc.at-4209-prog.cob:11.29: 13 . >> Hint: Missing . -syn_misc.at-4209-prog.cob:11.30-11.36: +syn_misc.at-4244-prog.cob:11.30-11.36: 8 SPECIAL-NAMES. 9 CALL-CONVENTION 0 IS EXTERN. 10 @@ -1666,8 +1666,8 @@ syn_misc.at-4209-prog.cob:11.30-11.36: 13 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4225:0 -syn_misc.at-4225-prog2.cob:9.29: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4260:0 +syn_misc.at-4260-prog2.cob:9.29: 6 ENVIRONMENT DIVISION. 7 CONFIGURATION SECTION. 8 @@ -1677,7 +1677,7 @@ syn_misc.at-4225-prog2.cob:9.29: 11 . >> Hint: Missing . -syn_misc.at-4225-prog2.cob:9.30-9.34: +syn_misc.at-4260-prog2.cob:9.30-9.34: 6 ENVIRONMENT DIVISION. 7 CONFIGURATION SECTION. 8 @@ -1687,7 +1687,7 @@ syn_misc.at-4225-prog2.cob:9.30-9.34: 11 . >> Error: Invalid syntax -syn_misc.at-4225-prog2.cob:9.37-9.44: +syn_misc.at-4260-prog2.cob:9.37-9.44: 6 ENVIRONMENT DIVISION. 7 CONFIGURATION SECTION. 8 @@ -1697,14 +1697,14 @@ syn_misc.at-4225-prog2.cob:9.37-9.44: 11 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4337:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4385:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4578:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4614:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4771:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4859:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4860:0 -syn_misc.at-4860-prog2.cob:12.7-12.9: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4372:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4420:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4613:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4649:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4806:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4894:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4895:0 +syn_misc.at-4895-prog2.cob:12.7-12.9: 9 10 DDATA;DIVISION,. 11 DWORKING-STORAGE,SECTION;. @@ -1714,9 +1714,9 @@ syn_misc.at-4860-prog2.cob:12.7-12.9: 14 PROCEDURE;DIVISION,.; >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4882:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5068:0 -syn_misc.at-5068-prog.cob:7.16-7.24: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:4917:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5103:0 +syn_misc.at-5103-prog.cob:7.16-7.24: 4 ENVIRONMENT DIVISION. 5 CONFIGURATION SECTION. 6 SPECIAL-NAMES. @@ -1726,8 +1726,8 @@ syn_misc.at-5068-prog.cob:7.16-7.24: 9 25156c "25156c". >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5260:0 -syn_misc.at-5260-prog.cob:8.26: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5295:0 +syn_misc.at-5295-prog.cob:8.26: 5 WORKING-STORAGE SECTION. 6 78 const1 value 115. 7 01 const2 CONSTANT 200. @@ -1737,7 +1737,7 @@ syn_misc.at-5260-prog.cob:8.26: 10 77 othervar PIC X(const1). >> Hint: Missing -syn_misc.at-5260-prog.cob:8.27-8.33: +syn_misc.at-5295-prog.cob:8.27-8.33: 5 WORKING-STORAGE SECTION. 6 78 const1 value 115. 7 01 const2 CONSTANT 200. @@ -1747,7 +1747,7 @@ syn_misc.at-5260-prog.cob:8.27-8.33: 10 77 othervar PIC X(const1). >> Error: Invalid syntax -syn_misc.at-5260-prog.cob:9.26: +syn_misc.at-5295-prog.cob:9.26: 6 78 const1 value 115. 7 01 const2 CONSTANT 200. 8 78 const3 value const2. @@ -1757,7 +1757,7 @@ syn_misc.at-5260-prog.cob:9.26: 11 01 var PIC X(const2). >> Hint: Missing -syn_misc.at-5260-prog.cob:9.27-9.33: +syn_misc.at-5295-prog.cob:9.27-9.33: 6 78 const1 value 115. 7 01 const2 CONSTANT 200. 8 78 const3 value const2. @@ -1767,10 +1767,10 @@ syn_misc.at-5260-prog.cob:9.27-9.33: 11 01 var PIC X(const2). >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5309:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5485:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5576:0 -syn_misc.at-5576-prog.cob:16.11-16.15: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5344:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5520:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5611:0 +syn_misc.at-5611-prog.cob:16.11-16.15: 13 PROCEDURE DIVISION. 14 15 IF var-len < 16 @@ -1780,7 +1780,7 @@ syn_misc.at-5576-prog.cob:16.11-16.15: 18 END-IF >> Error: Invalid syntax -syn_misc.at-5576-prog.cob:21.11-21.15: +syn_misc.at-5611-prog.cob:21.11-21.15: 18 END-IF 19 20 IF var-len > 16 @@ -1790,7 +1790,7 @@ syn_misc.at-5576-prog.cob:21.11-21.15: 23 END-IF >> Error: Invalid syntax -syn_misc.at-5576-prog.cob:26.11-26.15: +syn_misc.at-5611-prog.cob:26.11-26.15: 23 END-IF 24 25 IF (2 = 3) @@ -1800,7 +1800,7 @@ syn_misc.at-5576-prog.cob:26.11-26.15: 28 ELSE >> Error: Invalid syntax -syn_misc.at-5576-prog.cob:28.14-28.18: +syn_misc.at-5611-prog.cob:28.14-28.18: 25 IF (2 = 3) 26 ELSE 27 IF 1 = 1 @@ -1810,7 +1810,7 @@ syn_misc.at-5576-prog.cob:28.14-28.18: 30 move var to othervar >> Error: Invalid syntax -syn_misc.at-5576-prog.cob:39.11-39.23: +syn_misc.at-5611-prog.cob:39.11-39.23: 36 WHEN A = B 37 move var to othervar 38 WHEN OTHER @@ -1820,7 +1820,7 @@ syn_misc.at-5576-prog.cob:39.11-39.23: 41 PERFORM WITH TEST BEFORE UNTIL 1 <> 3 >> Error: Invalid syntax -syn_misc.at-5576-prog.cob:47.11-47.23: +syn_misc.at-5611-prog.cob:47.11-47.23: 44 EVALUATE FALSE 45 WHEN A = B 46 WHEN B = A @@ -1830,7 +1830,7 @@ syn_misc.at-5576-prog.cob:47.11-47.23: 49 EVALUATE TRUE >> Error: Invalid syntax -syn_misc.at-5576-prog.cob:53.11-53.12: +syn_misc.at-5611-prog.cob:53.11-53.12: 50 WHEN A = B 51 move var to othervar 52 WHEN OTHER @@ -1840,7 +1840,7 @@ syn_misc.at-5576-prog.cob:53.11-53.12: 55 EVALUATE TRUE >> Error: Invalid syntax -syn_misc.at-5576-prog.cob:58.11-58.12: +syn_misc.at-5611-prog.cob:58.11-58.12: 55 EVALUATE TRUE 56 WHEN A = B 57 WHEN B = A @@ -1850,8 +1850,8 @@ syn_misc.at-5576-prog.cob:58.11-58.12: 60 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5649:0 -syn_misc.at-5649-prog.cob:12.53: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5684:0 +syn_misc.at-5684-prog.cob:12.53: 9 05 item-05-b pic x(01). 10 01 myk-01 constant as length of item-01. 11 01 myk-02 constant is global as length item-05-a. @@ -1861,7 +1861,7 @@ syn_misc.at-5649-prog.cob:12.53: 14 01 myk-05 constant is global as byte-length item-05-a. >> Hint: Missing -syn_misc.at-5649-prog.cob:12.54-12.61: +syn_misc.at-5684-prog.cob:12.54-12.61: 9 05 item-05-b pic x(01). 10 01 myk-01 constant as length of item-01. 11 01 myk-02 constant is global as length item-05-a. @@ -1871,7 +1871,7 @@ syn_misc.at-5649-prog.cob:12.54-12.61: 14 01 myk-05 constant is global as byte-length item-05-a. >> Error: Invalid syntax -syn_misc.at-5649-prog.cob:15.53: +syn_misc.at-5684-prog.cob:15.53: 12 01 myk-03 constant global as length of pointer. *> extension 13 01 myk-04 constant global as byte-length of item-01. 14 01 myk-05 constant is global as byte-length item-05-a. @@ -1879,7 +1879,7 @@ syn_misc.at-5649-prog.cob:15.53: ---- ^ >> Hint: Missing -syn_misc.at-5649-prog.cob:15.54-15.61: +syn_misc.at-5684-prog.cob:15.54-15.61: 12 01 myk-03 constant global as length of pointer. *> extension 13 01 myk-04 constant global as byte-length of item-01. 14 01 myk-05 constant is global as byte-length item-05-a. @@ -1887,8 +1887,8 @@ syn_misc.at-5649-prog.cob:15.54-15.61: ---- ^^^^^^^ >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5735:0 -syn_misc.at-5735-prog.cob:7.26-7.34: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5770:0 +syn_misc.at-5770-prog.cob:7.26-7.34: 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. 6 01 DATA-COLLECTION. @@ -1898,7 +1898,7 @@ syn_misc.at-5735-prog.cob:7.26-7.34: 9 05 DATA-A2 PIC S9(9) BINARY. >> Error: Invalid syntax -syn_misc.at-5735-prog.cob:10.13-10.21: +syn_misc.at-5770-prog.cob:10.13-10.21: 7 03 DATA-ITEMS-A VOLATILE. 8 05 DATA-A1 PIC S9(9) BINARY. 9 05 DATA-A2 PIC S9(9) BINARY. @@ -1908,7 +1908,7 @@ syn_misc.at-5735-prog.cob:10.13-10.21: 12 03 DATA-ITEMS-B. >> Error: Invalid syntax -syn_misc.at-5735-prog.cob:14.34-14.42: +syn_misc.at-5770-prog.cob:14.34-14.42: 11 05 DATA-FILLER PIC S9(9) BINARY. 12 03 DATA-ITEMS-B. 13 05 DATA-B1 PIC S9(9). @@ -1918,7 +1918,7 @@ syn_misc.at-5735-prog.cob:14.34-14.42: 16 05 DATA-C1 PIC S9(9). >> Error: Invalid syntax -syn_misc.at-5735-prog.cob:18.52-18.60: +syn_misc.at-5770-prog.cob:18.52-18.60: 15 03 DATA-ITEMS-C. 16 05 DATA-C1 PIC S9(9). 17 05 DATA-C2 PIC S9(9). @@ -1928,7 +1928,7 @@ syn_misc.at-5735-prog.cob:18.52-18.60: 20 * 88 TESTVAL-A VALUE 'A' VOLATILE. >> Error: Invalid syntax -syn_misc.at-5735-prog.cob:24.31-24.39: +syn_misc.at-5770-prog.cob:24.31-24.39: 21 * 88 TESTVAL-B VOLATILE VALUE 'B'. 22 LINKAGE SECTION. 23 01 XMYREC. @@ -1938,9 +1938,9 @@ syn_misc.at-5735-prog.cob:24.31-24.39: 26 *01 WRONG-SCREEN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5791:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5830:0 -syn_misc.at-5830-prog.cob:6.26-6.29: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5828:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5867:0 +syn_misc.at-5867-prog.cob:6.26-6.29: 3 PROGRAM-ID. prog. 4 5 PROCEDURE DIVISION. @@ -1949,9 +1949,9 @@ syn_misc.at-5830-prog.cob:6.26-6.29: 7 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5857:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5874:0 -syn_misc.at-5874-valid.cob:2.7-2.8: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5894:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5911:0 +syn_misc.at-5911-valid.cob:2.7-2.8: 1 2 > 000100 @OPTIONS NOMAIN,APOST ---- ^ @@ -1959,8 +1959,8 @@ syn_misc.at-5874-valid.cob:2.7-2.8: 4 000300 IDENTIFICATION DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5963:0 -syn_misc.at-5963-valid.cob:2.7-2.14: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6000:0 +syn_misc.at-6000-valid.cob:2.7-2.14: 1 2 > 000100 Process codepage(1047) ---- ^^^^^^^ @@ -1968,8 +1968,8 @@ syn_misc.at-5963-valid.cob:2.7-2.14: 4 000300 CBL >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:5999:0 -syn_misc.at-5999-valid.cob:3.8-3.9: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6036:0 +syn_misc.at-6036-valid.cob:3.8-3.9: 1 2 *CONTROL LIST 3 > *CONTROL SOURCE @@ -1978,7 +1978,7 @@ syn_misc.at-5999-valid.cob:3.8-3.9: 5 000100 *CBL NOMAP NOSOURCE NOLIST >> Error: Invalid syntax -syn_misc.at-5999-valid.cob:3.16: +syn_misc.at-6036-valid.cob:3.16: 1 2 *CONTROL LIST 3 > *CONTROL SOURCE @@ -1987,7 +1987,7 @@ syn_misc.at-5999-valid.cob:3.16: 5 000100 *CBL NOMAP NOSOURCE NOLIST >> Hint: Missing DIVISION . -syn_misc.at-5999-valid.cob:3.17-3.23: +syn_misc.at-6036-valid.cob:3.17-3.23: 1 2 *CONTROL LIST 3 > *CONTROL SOURCE @@ -1996,8 +1996,8 @@ syn_misc.at-5999-valid.cob:3.17-3.23: 5 000100 *CBL NOMAP NOSOURCE NOLIST >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6601:0 -syn_misc.at-6601-prog.cob:9.15-9.26: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6638:0 +syn_misc.at-6638-prog.cob:9.15-9.26: 6 INPUT-OUTPUT SECTION. 7 FILE-CONTROL. 8 SELECT f ASSIGN "f.dat" SEQUENTIAL @@ -2007,7 +2007,7 @@ syn_misc.at-6601-prog.cob:9.15-9.26: 11 TRACK-LIMIT 5 TRACKS. >> Error: Invalid syntax -syn_misc.at-6601-prog.cob:14.15-14.21: +syn_misc.at-6638-prog.cob:14.15-14.21: 11 TRACK-LIMIT 5 TRACKS. 12 SELECT g ASSIGN "g.dat" RELATIVE 13 RELATIVE KEY g-key @@ -2017,7 +2017,7 @@ syn_misc.at-6601-prog.cob:14.15-14.21: 16 I-O-CONTROL. >> Error: Invalid syntax -syn_misc.at-6601-prog.cob:17.11-17.16: +syn_misc.at-6638-prog.cob:17.11-17.16: 14 ACTUAL KEY g-actual-key. 15 16 I-O-CONTROL. @@ -2027,7 +2027,7 @@ syn_misc.at-6601-prog.cob:17.11-17.16: 19 APPLY CYL-INDEX TO 5 ON f >> Error: Invalid syntax -syn_misc.at-6601-prog.cob:25.38: +syn_misc.at-6638-prog.cob:25.38: 22 APPLY MASTER-INDEX TO 5 on g 23 APPLY WRITE-VERIFY f, g 24 APPLY REORG-CRITERIA f-rec, f @@ -2037,7 +2037,7 @@ syn_misc.at-6601-prog.cob:25.38: 27 DATA DIVISION. >> Hint: Missing PROGRAM -syn_misc.at-6601-prog.cob:25.39-25.43: +syn_misc.at-6638-prog.cob:25.39-25.43: 22 APPLY MASTER-INDEX TO 5 on g 23 APPLY WRITE-VERIFY f, g 24 APPLY REORG-CRITERIA f-rec, f @@ -2047,7 +2047,7 @@ syn_misc.at-6601-prog.cob:25.39-25.43: 27 DATA DIVISION. >> Error: Invalid syntax -syn_misc.at-6601-prog.cob:27.7-27.11: +syn_misc.at-6638-prog.cob:27.7-27.11: 24 APPLY REORG-CRITERIA f-rec, f 25 RERUN ON "g2.dat" EVERY END REEL g 26 . @@ -2057,9 +2057,9 @@ syn_misc.at-6601-prog.cob:27.7-27.11: 29 FD f. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6642:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6806:0 -syn_misc.at-6806-prog.cob:5.7-5.21: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6679:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6843:0 +syn_misc.at-6843-prog.cob:5.7-5.21: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog. 4 PROCEDURE DIVISION. @@ -2068,8 +2068,8 @@ syn_misc.at-6806-prog.cob:5.7-5.21: 6 STOP RUN. >> Error: Invalid >>DISPLAY compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6826:0 -syn_misc.at-6826-prog.cob:5.7-5.19: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6863:0 +syn_misc.at-6863-prog.cob:5.7-5.19: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog. 4 PROCEDURE DIVISION. @@ -2078,8 +2078,8 @@ syn_misc.at-6826-prog.cob:5.7-5.19: 6 STOP RUN. >> Error: Invalid >>DISPLAY compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6845:0 -syn_misc.at-6845-prog.cob:5.6-5.17: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6882:0 +syn_misc.at-6882-prog.cob:5.6-5.17: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog. 4 PROCEDURE DIVISION. @@ -2088,8 +2088,8 @@ syn_misc.at-6845-prog.cob:5.6-5.17: 6 STOP RUN. >> Error: Invalid $DISPLAY compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6924:0 -syn_misc.at-6924-prog.cob:2.7-2.8: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6961:0 +syn_misc.at-6961-prog.cob:2.7-2.8: 1 2 > $SET CONSTANT DOGGY "Barky" ---- ^ @@ -2097,7 +2097,7 @@ syn_misc.at-6924-prog.cob:2.7-2.8: 4 IDENTIFICATION DIVISION. >> Error: Invalid syntax -syn_misc.at-6924-prog.cob:8.35: +syn_misc.at-6961-prog.cob:8.35: 5 PROGRAM-ID. prog. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -2107,7 +2107,7 @@ syn_misc.at-6924-prog.cob:8.35: 10 $SET CONSTANT PONY "White" >> Hint: Missing -syn_misc.at-6924-prog.cob:8.36-8.41: +syn_misc.at-6961-prog.cob:8.36-8.41: 5 PROGRAM-ID. prog. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -2117,7 +2117,7 @@ syn_misc.at-6924-prog.cob:8.36-8.41: 10 $SET CONSTANT PONY "White" >> Error: Invalid syntax -syn_misc.at-6924-prog.cob:9.35: +syn_misc.at-6961-prog.cob:9.35: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -2127,7 +2127,7 @@ syn_misc.at-6924-prog.cob:9.35: 11 * >> Hint: Missing -syn_misc.at-6924-prog.cob:9.36-9.40: +syn_misc.at-6961-prog.cob:9.36-9.40: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -2137,7 +2137,7 @@ syn_misc.at-6924-prog.cob:9.36-9.40: 11 * >> Error: Invalid syntax -syn_misc.at-6924-prog.cob:10.7-10.8: +syn_misc.at-6961-prog.cob:10.7-10.8: 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. 9 77 MYHORSE PIC X(7) VALUE PONY. @@ -2147,7 +2147,7 @@ syn_misc.at-6924-prog.cob:10.7-10.8: 12 * ensure to test a numeric, too (not actually used): >> Error: Invalid syntax -syn_misc.at-6924-prog.cob:13.35: +syn_misc.at-6961-prog.cob:13.35: 10 $SET CONSTANT PONY "White" 11 * 12 * ensure to test a numeric, too (not actually used): @@ -2157,7 +2157,7 @@ syn_misc.at-6924-prog.cob:13.35: 15 MAIN. >> Hint: Missing . -syn_misc.at-6924-prog.cob:14.7-14.16: +syn_misc.at-6961-prog.cob:14.7-14.16: 11 * 12 * ensure to test a numeric, too (not actually used): 13 $SET CONSTANT C-UNUSED-NUM 0 @@ -2167,8 +2167,8 @@ syn_misc.at-6924-prog.cob:14.7-14.16: 16 DISPLAY "Your Dog's name is " DOGGY ";". >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6930:0 -syn_misc.at-6930-prog2.cob:2.7-2.35: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6967:0 +syn_misc.at-6967-prog2.cob:2.7-2.35: 1 2 > >>SET CONSTANT DOGGY "Barky" ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ @@ -2176,7 +2176,7 @@ syn_misc.at-6930-prog2.cob:2.7-2.35: 4 IDENTIFICATION DIVISION. >> Error: Malformed compiler directive -syn_misc.at-6930-prog2.cob:3.7-3.35: +syn_misc.at-6967-prog2.cob:3.7-3.35: 1 2 >>SET CONSTANT DOGGY "Barky" 3 > >>SET CONSTANT PONY "Blacky" @@ -2185,7 +2185,7 @@ syn_misc.at-6930-prog2.cob:3.7-3.35: 5 PROGRAM-ID. prog2. >> Error: Malformed compiler directive -syn_misc.at-6930-prog2.cob:8.35: +syn_misc.at-6967-prog2.cob:8.35: 5 PROGRAM-ID. prog2. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -2195,7 +2195,7 @@ syn_misc.at-6930-prog2.cob:8.35: 10 >>SET CONSTANT PONY "White" >> Hint: Missing -syn_misc.at-6930-prog2.cob:8.36-8.41: +syn_misc.at-6967-prog2.cob:8.36-8.41: 5 PROGRAM-ID. prog2. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -2205,7 +2205,7 @@ syn_misc.at-6930-prog2.cob:8.36-8.41: 10 >>SET CONSTANT PONY "White" >> Error: Invalid syntax -syn_misc.at-6930-prog2.cob:9.35: +syn_misc.at-6967-prog2.cob:9.35: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -2215,7 +2215,7 @@ syn_misc.at-6930-prog2.cob:9.35: 11 * >> Hint: Missing -syn_misc.at-6930-prog2.cob:9.36-9.40: +syn_misc.at-6967-prog2.cob:9.36-9.40: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -2225,7 +2225,7 @@ syn_misc.at-6930-prog2.cob:9.36-9.40: 11 * >> Error: Invalid syntax -syn_misc.at-6930-prog2.cob:10.7-10.34: +syn_misc.at-6967-prog2.cob:10.7-10.34: 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. 9 77 MYHORSE PIC X(7) VALUE PONY. @@ -2235,8 +2235,8 @@ syn_misc.at-6930-prog2.cob:10.7-10.34: 12 PROCEDURE DIVISION. >> Error: Malformed compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6934:0 -syn_misc.at-6934-prog3.cob:2.7-2.38: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6971:0 +syn_misc.at-6971-prog3.cob:2.7-2.38: 1 2 > >>DEFINE CONSTANT DOGGY "Barky" ---- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ @@ -2244,7 +2244,7 @@ syn_misc.at-6934-prog3.cob:2.7-2.38: 4 IDENTIFICATION DIVISION. >> Error: Malformed compiler directive -syn_misc.at-6934-prog3.cob:3.7-3.38: +syn_misc.at-6971-prog3.cob:3.7-3.38: 1 2 >>DEFINE CONSTANT DOGGY "Barky" 3 > >>DEFINE CONSTANT PONY "Blacky" @@ -2253,7 +2253,7 @@ syn_misc.at-6934-prog3.cob:3.7-3.38: 5 PROGRAM-ID. prog3. >> Error: Malformed compiler directive -syn_misc.at-6934-prog3.cob:8.35: +syn_misc.at-6971-prog3.cob:8.35: 5 PROGRAM-ID. prog3. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -2263,7 +2263,7 @@ syn_misc.at-6934-prog3.cob:8.35: 10 >>DEFINE CONSTANT PONY "White" OVERRIDE >> Hint: Missing -syn_misc.at-6934-prog3.cob:8.36-8.41: +syn_misc.at-6971-prog3.cob:8.36-8.41: 5 PROGRAM-ID. prog3. 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. @@ -2273,7 +2273,7 @@ syn_misc.at-6934-prog3.cob:8.36-8.41: 10 >>DEFINE CONSTANT PONY "White" OVERRIDE >> Error: Invalid syntax -syn_misc.at-6934-prog3.cob:9.35: +syn_misc.at-6971-prog3.cob:9.35: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -2283,7 +2283,7 @@ syn_misc.at-6934-prog3.cob:9.35: 11 * >> Hint: Missing -syn_misc.at-6934-prog3.cob:9.36-9.40: +syn_misc.at-6971-prog3.cob:9.36-9.40: 6 DATA DIVISION. 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. @@ -2293,7 +2293,7 @@ syn_misc.at-6934-prog3.cob:9.36-9.40: 11 * >> Error: Invalid syntax -syn_misc.at-6934-prog3.cob:10.7-10.46: +syn_misc.at-6971-prog3.cob:10.7-10.46: 7 WORKING-STORAGE SECTION. 8 01 THEDOG PIC X(6) VALUE DOGGY. 9 77 MYHORSE PIC X(7) VALUE PONY. @@ -2303,8 +2303,8 @@ syn_misc.at-6934-prog3.cob:10.7-10.46: 12 PROCEDURE DIVISION. >> Error: Malformed compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6969:0 -syn_misc.at-6969-prog.cob:8.7-8.24: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7006:0 +syn_misc.at-7006-prog.cob:8.7-8.24: 5 WORKING-STORAGE SECTION. 6 PROCEDURE DIVISION. 7 >>IF ACTIVATE DEFINED @@ -2314,7 +2314,7 @@ syn_misc.at-6969-prog.cob:8.7-8.24: 10 >>DISPLAY "OK" >> Error: Invalid >>DISPLAY compiler directive -syn_misc.at-6969-prog.cob:10.7-10.21: +syn_misc.at-7006-prog.cob:10.7-10.21: 7 >>IF ACTIVATE DEFINED 8 >>DISPLAY "NOTOK" 9 >>ELIF ACTIVATE2 DEFINED @@ -2324,7 +2324,7 @@ syn_misc.at-6969-prog.cob:10.7-10.21: 12 >>DISPLAY "NOTOK" >> Error: Invalid >>DISPLAY compiler directive -syn_misc.at-6969-prog.cob:12.7-12.24: +syn_misc.at-7006-prog.cob:12.7-12.24: 9 >>ELIF ACTIVATE2 DEFINED 10 >>DISPLAY "OK" 11 >>ELSE @@ -2334,8 +2334,8 @@ syn_misc.at-6969-prog.cob:12.7-12.24: 14 STOP RUN. >> Error: Invalid >>DISPLAY compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:6994:0 -syn_misc.at-6994-prog.cob:6.9-6.30: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7031:0 +syn_misc.at-7031-prog.cob:6.9-6.30: 3 PROGRAM-ID. prog. 4 PROCEDURE DIVISION. 5 >> IF X DEFINED @@ -2345,7 +2345,7 @@ syn_misc.at-6994-prog.cob:6.9-6.30: 8 >> DISPLAY "X not defined" >> Error: Invalid >>DISPLAY compiler directive -syn_misc.at-6994-prog.cob:8.9-8.35: +syn_misc.at-7031-prog.cob:8.9-8.35: 5 >> IF X DEFINED 6 >>DISPLAY "X defined" 7 >> ELSE @@ -2355,8 +2355,8 @@ syn_misc.at-6994-prog.cob:8.9-8.35: 10 >> END-IF >> Error: Invalid >>DISPLAY compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7027:0 -syn_misc.at-7027-prog.cob:8.7-8.49: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7064:0 +syn_misc.at-7064-prog.cob:8.7-8.49: 5 >>IF A IS DEFINED 6 >>IF B IS DEFINED 7 CONTINUE @@ -2366,7 +2366,7 @@ syn_misc.at-7027-prog.cob:8.7-8.49: 10 >>ELSE >> Error: Invalid >>DISPLAY compiler directive -syn_misc.at-7027-prog.cob:12.7-12.43: +syn_misc.at-7064-prog.cob:12.7-12.43: 9 . 10 >>ELSE 11 CONTINUE @@ -2376,7 +2376,7 @@ syn_misc.at-7027-prog.cob:12.7-12.43: 14 >>END-IF >> Error: Invalid >>DISPLAY compiler directive -syn_misc.at-7027-prog.cob:17.7-17.22: +syn_misc.at-7064-prog.cob:17.7-17.22: 14 >>END-IF 15 >>ELSE 16 CONTINUE @@ -2386,9 +2386,9 @@ syn_misc.at-7027-prog.cob:17.7-17.22: 19 >>END-IF >> Error: Invalid >>DISPLAY compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7051:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7109:0 -syn_misc.at-7109-prog.cob:9.6-9.24: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7088:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7146:0 +syn_misc.at-7146-prog.cob:9.6-9.24: 6 78 Y VALUE 'a'. 7 PROCEDURE DIVISION. 8 $IF X DEFINED @@ -2398,7 +2398,7 @@ syn_misc.at-7109-prog.cob:9.6-9.24: 11 $DISPLAY X not defined, but Y via lvl 78 >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7109-prog.cob:11.6-11.46: +syn_misc.at-7146-prog.cob:11.6-11.46: 8 $IF X DEFINED 9 $DISPLAY X defined 10 $ELIF Y DEFINED @@ -2408,7 +2408,7 @@ syn_misc.at-7109-prog.cob:11.6-11.46: 13 $DISPLAY X not defined >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7109-prog.cob:13.6-13.28: +syn_misc.at-7146-prog.cob:13.6-13.28: 10 $ELIF Y DEFINED 11 $DISPLAY X not defined, but Y via lvl 78 12 $ELSE @@ -2418,8 +2418,8 @@ syn_misc.at-7109-prog.cob:13.6-13.28: 15 CONTINUE >> Error: Invalid $DISPLAY compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7160:0 -syn_misc.at-7160-prog.cob:12.6-12.29: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7197:0 +syn_misc.at-7197-prog.cob:12.6-12.29: 9 78 Z VALUE 354. 10 PROCEDURE DIVISION. 11 $IF Y = Y2X @@ -2429,7 +2429,7 @@ syn_misc.at-7160-prog.cob:12.6-12.29: 14 $DISPLAY bad: Y should be = Y2 >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7160-prog.cob:14.6-14.36: +syn_misc.at-7197-prog.cob:14.6-14.36: 11 $IF Y = Y2X 12 $DISPLAY correct Y = Y2 13 $ELSE @@ -2439,7 +2439,7 @@ syn_misc.at-7160-prog.cob:14.6-14.36: 16 $IF Y > X >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7160-prog.cob:17.6-17.33: +syn_misc.at-7197-prog.cob:17.6-17.33: 14 $DISPLAY bad: Y should be = Y2 15 $END 16 $IF Y > X @@ -2449,7 +2449,7 @@ syn_misc.at-7160-prog.cob:17.6-17.33: 19 $DISPLAY correct Y < X >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7160-prog.cob:19.6-19.28: +syn_misc.at-7197-prog.cob:19.6-19.28: 16 $IF Y > X 17 $DISPLAY BAD - Y is not > X 18 $ELIF Y < X @@ -2459,7 +2459,7 @@ syn_misc.at-7160-prog.cob:19.6-19.28: 21 $DISPLAY BROKEN >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7160-prog.cob:21.6-21.21: +syn_misc.at-7197-prog.cob:21.6-21.21: 18 $ELIF Y < X 19 $DISPLAY correct Y < X 20 $ELSE @@ -2469,7 +2469,7 @@ syn_misc.at-7160-prog.cob:21.6-21.21: 23 >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7160-prog.cob:25.6-25.28: +syn_misc.at-7197-prog.cob:25.6-25.28: 22 $END 23 24 $IF X > Y @@ -2479,7 +2479,7 @@ syn_misc.at-7160-prog.cob:25.6-25.28: 27 $DISPLAY BAD - X is not < Y >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7160-prog.cob:27.6-27.33: +syn_misc.at-7197-prog.cob:27.6-27.33: 24 $IF X > Y 25 $DISPLAY correct X > Y 26 $ELIF X < Y @@ -2489,7 +2489,7 @@ syn_misc.at-7160-prog.cob:27.6-27.33: 29 $DISPLAY BROKEN >> Error: Invalid $DISPLAY compiler directive -syn_misc.at-7160-prog.cob:29.6-29.21: +syn_misc.at-7197-prog.cob:29.6-29.21: 26 $ELIF X < Y 27 $DISPLAY BAD - X is not < Y 28 $ELSE @@ -2499,10 +2499,10 @@ syn_misc.at-7160-prog.cob:29.6-29.21: 31 CONTINUE >> Error: Invalid $DISPLAY compiler directive -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7193:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7264:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7417:0 -syn_misc.at-7417-prog.cob:41.18: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7230:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7301:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7454:0 +syn_misc.at-7454-prog.cob:41.18: 38 05 FILLER REDEFINES IN-NAME PIC X(20) *> should PIC be optional? 39 PRESENT WHEN IN-TYPE = 2 40 DESTINATION OUT-NAME. @@ -2512,7 +2512,7 @@ syn_misc.at-7417-prog.cob:41.18: 43 05 IN-WEEK PIC 99 OCCURS 5 >> Hint: Missing -syn_misc.at-7417-prog.cob:41.33-41.38: +syn_misc.at-7454-prog.cob:41.33-41.38: 38 05 FILLER REDEFINES IN-NAME PIC X(20) *> should PIC be optional? 39 PRESENT WHEN IN-TYPE = 2 40 DESTINATION OUT-NAME. @@ -2522,7 +2522,7 @@ syn_misc.at-7417-prog.cob:41.33-41.38: 43 05 IN-WEEK PIC 99 OCCURS 5 >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:41.46-41.48: +syn_misc.at-7454-prog.cob:41.46-41.48: 38 05 FILLER REDEFINES IN-NAME PIC X(20) *> should PIC be optional? 39 PRESENT WHEN IN-TYPE = 2 40 DESTINATION OUT-NAME. @@ -2532,7 +2532,7 @@ syn_misc.at-7417-prog.cob:41.46-41.48: 43 05 IN-WEEK PIC 99 OCCURS 5 >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:45.16-45.23: +syn_misc.at-7454-prog.cob:45.16-45.23: 42 *>The values of IN-WEEK are checked to be in non-descending order. 43 05 IN-WEEK PIC 99 OCCURS 5 44 VARYING IN-WEEK-NO FROM 1, IN-NEXT-WEEK-NO FROM 2 @@ -2542,7 +2542,7 @@ syn_misc.at-7417-prog.cob:45.16-45.23: 47 *>OUT-WEEK (1) to (5) will hold the values of IN-WEEK (1) to (5), >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:45.39: +syn_misc.at-7454-prog.cob:45.39: 42 *>The values of IN-WEEK are checked to be in non-descending order. 43 05 IN-WEEK PIC 99 OCCURS 5 44 VARYING IN-WEEK-NO FROM 1, IN-NEXT-WEEK-NO FROM 2 @@ -2552,7 +2552,7 @@ syn_misc.at-7417-prog.cob:45.39: 47 *>OUT-WEEK (1) to (5) will hold the values of IN-WEEK (1) to (5), >> Hint: Missing . -syn_misc.at-7417-prog.cob:45.40-45.41: +syn_misc.at-7454-prog.cob:45.40-45.41: 42 *>The values of IN-WEEK are checked to be in non-descending order. 43 05 IN-WEEK PIC 99 OCCURS 5 44 VARYING IN-WEEK-NO FROM 1, IN-NEXT-WEEK-NO FROM 2 @@ -2562,7 +2562,7 @@ syn_misc.at-7417-prog.cob:45.40-45.41: 47 *>OUT-WEEK (1) to (5) will hold the values of IN-WEEK (1) to (5), >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:46.16-46.19: +syn_misc.at-7454-prog.cob:46.16-46.19: 43 05 IN-WEEK PIC 99 OCCURS 5 44 VARYING IN-WEEK-NO FROM 1, IN-NEXT-WEEK-NO FROM 2 45 INVALID WHEN IN-WEEK-NO < 5 @@ -2572,7 +2572,7 @@ syn_misc.at-7417-prog.cob:46.16-46.19: 48 *>or zero for any one that failed the format (PICTURE) test. >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:46.27: +syn_misc.at-7454-prog.cob:46.27: 43 05 IN-WEEK PIC 99 OCCURS 5 44 VARYING IN-WEEK-NO FROM 1, IN-NEXT-WEEK-NO FROM 2 45 INVALID WHEN IN-WEEK-NO < 5 @@ -2582,7 +2582,7 @@ syn_misc.at-7417-prog.cob:46.27: 48 *>or zero for any one that failed the format (PICTURE) test. >> Hint: Missing RENAMES -syn_misc.at-7417-prog.cob:46.28-46.29: +syn_misc.at-7454-prog.cob:46.28-46.29: 43 05 IN-WEEK PIC 99 OCCURS 5 44 VARYING IN-WEEK-NO FROM 1, IN-NEXT-WEEK-NO FROM 2 45 INVALID WHEN IN-WEEK-NO < 5 @@ -2592,7 +2592,7 @@ syn_misc.at-7417-prog.cob:46.28-46.29: 48 *>or zero for any one that failed the format (PICTURE) test. >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:46.39-46.40: +syn_misc.at-7454-prog.cob:46.39-46.40: 43 05 IN-WEEK PIC 99 OCCURS 5 44 VARYING IN-WEEK-NO FROM 1, IN-NEXT-WEEK-NO FROM 2 45 INVALID WHEN IN-WEEK-NO < 5 @@ -2602,7 +2602,7 @@ syn_misc.at-7417-prog.cob:46.39-46.40: 48 *>or zero for any one that failed the format (PICTURE) test. >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:51.17: +syn_misc.at-7454-prog.cob:51.17: 48 *>or zero for any one that failed the format (PICTURE) test. 49 DESTINATION OUT-WEEK (IN-WEEK-NO). 50 *>The 88-level INVALID entries check for invalid ranges of values. @@ -2612,7 +2612,7 @@ syn_misc.at-7417-prog.cob:51.17: 53 03 IN-REC-FORMAT-2 REDEFINES IN-REC-FORMAT-1 >> Hint: Missing -syn_misc.at-7417-prog.cob:51.19-51.25: +syn_misc.at-7454-prog.cob:51.19-51.25: 48 *>or zero for any one that failed the format (PICTURE) test. 49 DESTINATION OUT-WEEK (IN-WEEK-NO). 50 *>The 88-level INVALID entries check for invalid ranges of values. @@ -2622,7 +2622,7 @@ syn_misc.at-7417-prog.cob:51.19-51.25: 53 03 IN-REC-FORMAT-2 REDEFINES IN-REC-FORMAT-1 >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:51.40-51.43: +syn_misc.at-7454-prog.cob:51.40-51.43: 48 *>or zero for any one that failed the format (PICTURE) test. 49 DESTINATION OUT-WEEK (IN-WEEK-NO). 50 *>The 88-level INVALID entries check for invalid ranges of values. @@ -2632,7 +2632,7 @@ syn_misc.at-7417-prog.cob:51.40-51.43: 53 03 IN-REC-FORMAT-2 REDEFINES IN-REC-FORMAT-1 >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:60.68-60.71: +syn_misc.at-7454-prog.cob:60.68-60.71: 57 *>The 88-level VALID entries check for valid ranges of values; 58 *>the condition-name, if present, may be used in the usual way. 59 *>The following assume that DECIMAL POINT IS COMMA is not specified. @@ -2642,7 +2642,7 @@ syn_misc.at-7417-prog.cob:60.68-60.71: 62 88 VALUES "20,000.01" THRU "30,000.00" ARE VALID >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:62.19: +syn_misc.at-7454-prog.cob:62.19: 59 *>The following assume that DECIMAL POINT IS COMMA is not specified. 60 88 IN-PAY-OK VALUES "10,000.00" THRU "20,000.00" ARE VALID. 61 *>88-level entries may also have a condition attached. @@ -2652,7 +2652,7 @@ syn_misc.at-7417-prog.cob:62.19: 64 *>exceptional cases can be specified using PRESENT WHEN >> Hint: Missing -syn_misc.at-7417-prog.cob:62.39-62.45: +syn_misc.at-7454-prog.cob:62.39-62.45: 59 *>The following assume that DECIMAL POINT IS COMMA is not specified. 60 88 IN-PAY-OK VALUES "10,000.00" THRU "20,000.00" ARE VALID. 61 *>88-level entries may also have a condition attached. @@ -2662,7 +2662,7 @@ syn_misc.at-7417-prog.cob:62.39-62.45: 64 *>exceptional cases can be specified using PRESENT WHEN >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:62.75-62.78: +syn_misc.at-7454-prog.cob:62.75-62.78: 59 *>The following assume that DECIMAL POINT IS COMMA is not specified. 60 88 IN-PAY-OK VALUES "10,000.00" THRU "20,000.00" ARE VALID. 61 *>88-level entries may also have a condition attached. @@ -2672,7 +2672,7 @@ syn_misc.at-7417-prog.cob:62.75-62.78: 64 *>exceptional cases can be specified using PRESENT WHEN >> Error: Invalid syntax -syn_misc.at-7417-prog.cob:63.43: +syn_misc.at-7454-prog.cob:63.43: 60 88 IN-PAY-OK VALUES "10,000.00" THRU "20,000.00" ARE VALID. 61 *>88-level entries may also have a condition attached. 62 88 VALUES "20,000.01" THRU "30,000.00" ARE VALID @@ -2682,7 +2682,7 @@ syn_misc.at-7417-prog.cob:63.43: 65 05 IN-CODE PIC AX(3)9(4) >> Hint: Missing FALSE -syn_misc.at-7417-prog.cob:63.44-63.51: +syn_misc.at-7454-prog.cob:63.44-63.51: 60 88 IN-PAY-OK VALUES "10,000.00" THRU "20,000.00" ARE VALID. 61 *>88-level entries may also have a condition attached. 62 88 VALUES "20,000.01" THRU "30,000.00" ARE VALID @@ -2692,8 +2692,8 @@ syn_misc.at-7417-prog.cob:63.44-63.51: 65 05 IN-CODE PIC AX(3)9(4) >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7524:0 -syn_misc.at-7524-prog.cob:79.45-79.47: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7561:0 +syn_misc.at-7561-prog.cob:79.45-79.47: 76 01 x-rms. 77 05 x-rms-a pic x(01) value space. 78 01 filler redefines x-rms pic x(01). @@ -2703,7 +2703,7 @@ syn_misc.at-7524-prog.cob:79.45-79.47: 81 local-storage section. >> Error: Invalid syntax -syn_misc.at-7524-prog.cob:79.61-79.63: +syn_misc.at-7561-prog.cob:79.61-79.63: 76 01 x-rms. 77 05 x-rms-a pic x(01) value space. 78 01 filler redefines x-rms pic x(01). @@ -2713,11 +2713,11 @@ syn_misc.at-7524-prog.cob:79.61-79.63: 81 local-storage section. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7712:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7729:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7772:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7801:0 -syn_misc.at-7801-prog.cob:4.18-4.27: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7749:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7766:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7809:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7838:0 +syn_misc.at-7838-prog.cob:4.18-4.27: 1 2 CONTROL DIVISION. 3 DEFAULT SECTION. @@ -2727,9 +2727,9 @@ syn_misc.at-7801-prog.cob:4.18-4.27: 6 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7828:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7842:0 -syn_misc.at-7842-empty0.cob:5.18-5.27: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7865:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7879:0 +syn_misc.at-7879-empty0.cob:5.18-5.27: 2 CONTROL DIVISION. 3 SUBSTITUTION SECTION. 4 DEFAULT SECTION. @@ -2739,9 +2739,9 @@ syn_misc.at-7842-empty0.cob:5.18-5.27: 7 IDENTIFICATION DIVISION. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7861:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7885:0 -syn_misc.at-7885-prog.cob:8.18-8.27: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7898:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7922:0 +syn_misc.at-7922-prog.cob:8.18-8.27: 5 TERM BY TERMINAL 6 "KO" BY "OK". 7 DEFAULT SECTION. @@ -2751,8 +2751,8 @@ syn_misc.at-7885-prog.cob:8.18-8.27: 10 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7918:0 -syn_misc.at-7918-prog.cob:9.17-9.26: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:7955:0 +syn_misc.at-7955-prog.cob:9.17-9.26: 6 TERM BY TERMINAL 7 "KO" BY "OK". 8 DEFAULT SECTION. @@ -2762,9 +2762,9 @@ syn_misc.at-7918-prog.cob:9.17-9.26: 11 . >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8018:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8056:0 -syn_misc.at-8056-prog.cob:2.7-2.8: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8055:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8093:0 +syn_misc.at-8093-prog.cob:2.7-2.8: 1 2 > $SET NO-AREA-CHECK ---- ^ @@ -2772,7 +2772,7 @@ syn_misc.at-8056-prog.cob:2.7-2.8: 4 PROGRAM-ID. prog. >> Error: Invalid syntax -syn_misc.at-8056-prog.cob:10.7-10.8: +syn_misc.at-8093-prog.cob:10.7-10.8: 7 PROCEDURE DIVISION. 8 MAIN-1 SECTION. 9 DISPLAY "SOMETHING". @@ -2782,7 +2782,7 @@ syn_misc.at-8056-prog.cob:10.7-10.8: 12 CONTINUE. >> Error: Invalid syntax -syn_misc.at-8056-prog.cob:10.22: +syn_misc.at-8093-prog.cob:10.22: 7 PROCEDURE DIVISION. 8 MAIN-1 SECTION. 9 DISPLAY "SOMETHING". @@ -2792,7 +2792,7 @@ syn_misc.at-8056-prog.cob:10.22: 12 CONTINUE. >> Hint: Missing ATTRIBUTE . -syn_misc.at-8056-prog.cob:11.7-11.13: +syn_misc.at-8093-prog.cob:11.7-11.13: 8 MAIN-1 SECTION. 9 DISPLAY "SOMETHING". 10 $SET AREA-CHECK @@ -2802,8 +2802,8 @@ syn_misc.at-8056-prog.cob:11.7-11.13: 13 CONTINUE. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8158:0 -syn_misc.at-8158-cobol85.cob:2.31: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8195:0 +syn_misc.at-8195-cobol85.cob:2.31: 1 2 > IDENTIFICATION DIVISION ---- ^ @@ -2811,7 +2811,7 @@ syn_misc.at-8158-cobol85.cob:2.31: 4 DATA DIVISION >> Hint: Missing . -syn_misc.at-8158-cobol85.cob:3.7-3.17: +syn_misc.at-8195-cobol85.cob:3.7-3.17: 1 2 IDENTIFICATION DIVISION 3 > PROGRAM-ID. cobol85. @@ -2820,7 +2820,7 @@ syn_misc.at-8158-cobol85.cob:3.7-3.17: 5 WORKING-STORAGE SECTION >> Warning: Invalid syntax -syn_misc.at-8158-cobol85.cob:4.31: +syn_misc.at-8195-cobol85.cob:4.31: 1 2 IDENTIFICATION DIVISION 3 PROGRAM-ID. cobol85. @@ -2830,7 +2830,7 @@ syn_misc.at-8158-cobol85.cob:4.31: 6 01 X PIC X *> dot optional here because of cobol85 format >> Hint: Missing . -syn_misc.at-8158-cobol85.cob:5.7-5.22: +syn_misc.at-8195-cobol85.cob:5.7-5.22: 2 IDENTIFICATION DIVISION 3 PROGRAM-ID. cobol85. 4 DATA DIVISION @@ -2840,7 +2840,7 @@ syn_misc.at-8158-cobol85.cob:5.7-5.22: 7 01 Y PIC X. >> Warning: Invalid syntax -syn_misc.at-8158-cobol85.cob:5.30: +syn_misc.at-8195-cobol85.cob:5.30: 2 IDENTIFICATION DIVISION 3 PROGRAM-ID. cobol85. 4 DATA DIVISION @@ -2850,7 +2850,7 @@ syn_misc.at-8158-cobol85.cob:5.30: 7 01 Y PIC X. >> Hint: Missing . -syn_misc.at-8158-cobol85.cob:6.7-6.9: +syn_misc.at-8195-cobol85.cob:6.7-6.9: 3 PROGRAM-ID. cobol85. 4 DATA DIVISION 5 WORKING-STORAGE SECTION @@ -2860,7 +2860,7 @@ syn_misc.at-8158-cobol85.cob:6.7-6.9: 8 PROCEDURE DIVISION. >> Warning: Invalid syntax -syn_misc.at-8158-cobol85.cob:6.17: +syn_misc.at-8195-cobol85.cob:6.17: 3 PROGRAM-ID. cobol85. 4 DATA DIVISION 5 WORKING-STORAGE SECTION @@ -2870,7 +2870,7 @@ syn_misc.at-8158-cobol85.cob:6.17: 8 PROCEDURE DIVISION. >> Hint: Missing . -syn_misc.at-8158-cobol85.cob:7.7-7.9: +syn_misc.at-8195-cobol85.cob:7.7-7.9: 4 DATA DIVISION 5 WORKING-STORAGE SECTION 6 01 X PIC X *> dot optional here because of cobol85 format @@ -2880,7 +2880,7 @@ syn_misc.at-8158-cobol85.cob:7.7-7.9: 9 MAIN SECTION. >> Error: Invalid syntax -syn_misc.at-8158-cobol85.cob:11.19: +syn_misc.at-8195-cobol85.cob:11.19: 8 PROCEDURE DIVISION. 9 MAIN SECTION. 10 PERFORM P @@ -2890,7 +2890,7 @@ syn_misc.at-8158-cobol85.cob:11.19: 13 GOBACK >> Hint: Missing . -syn_misc.at-8158-cobol85.cob:12.7-12.8: +syn_misc.at-8195-cobol85.cob:12.7-12.8: 9 MAIN SECTION. 10 PERFORM P 11 STOP RUN *> dot optional here because of cobol85 format @@ -2899,7 +2899,7 @@ syn_misc.at-8158-cobol85.cob:12.7-12.8: 13 GOBACK >> Warning: Invalid syntax -syn_misc.at-8158-cobol85.cob:13.17: +syn_misc.at-8195-cobol85.cob:13.17: 10 PERFORM P 11 STOP RUN *> dot optional here because of cobol85 format 12 P. @@ -2907,14 +2907,14 @@ syn_misc.at-8158-cobol85.cob:13.17: ---- ^ >> Hint: Missing . -syn_misc.at-8158-cobol85.cob:14.0: +syn_misc.at-8195-cobol85.cob:14.0: 11 STOP RUN *> dot optional here because of cobol85 format 12 P. 13 GOBACK >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8135:0 -syn_misc.at-8135-prog.cob:2.31: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8172:0 +syn_misc.at-8172-prog.cob:2.31: 1 2 > IDENTIFICATION DIVISION ---- ^ @@ -2922,7 +2922,7 @@ syn_misc.at-8135-prog.cob:2.31: 4 DATA DIVISION >> Hint: Missing . -syn_misc.at-8135-prog.cob:3.7-3.17: +syn_misc.at-8172-prog.cob:3.7-3.17: 1 2 IDENTIFICATION DIVISION 3 > PROGRAM-ID. prog. @@ -2931,7 +2931,7 @@ syn_misc.at-8135-prog.cob:3.7-3.17: 5 WORKING-STORAGE SECTION. >> Warning: Invalid syntax -syn_misc.at-8135-prog.cob:4.31: +syn_misc.at-8172-prog.cob:4.31: 1 2 IDENTIFICATION DIVISION 3 PROGRAM-ID. prog. @@ -2941,7 +2941,7 @@ syn_misc.at-8135-prog.cob:4.31: 6 01 X PIC X. >> Hint: Missing . -syn_misc.at-8135-prog.cob:5.7-5.22: +syn_misc.at-8172-prog.cob:5.7-5.22: 2 IDENTIFICATION DIVISION 3 PROGRAM-ID. prog. 4 DATA DIVISION @@ -2951,7 +2951,7 @@ syn_misc.at-8135-prog.cob:5.7-5.22: 7 01 Y PIC X. >> Warning: Invalid syntax -syn_misc.at-8135-prog.cob:13.17: +syn_misc.at-8172-prog.cob:13.17: 10 PERFORM P 11 STOP RUN. 12 P. @@ -2959,14 +2959,14 @@ syn_misc.at-8135-prog.cob:13.17: ---- ^ >> Hint: Missing . -syn_misc.at-8135-prog.cob:14.0: +syn_misc.at-8172-prog.cob:14.0: 11 STOP RUN. 12 P. 13 GOBACK >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8199:0 -syn_misc.at-8199-prog.cob:2.30: +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8236:0 +syn_misc.at-8236-prog.cob:2.30: 1 2 > IDENTIFICATION DIVISION ---- ^ @@ -2974,7 +2974,7 @@ syn_misc.at-8199-prog.cob:2.30: 4 DATA DIVISION >> Hint: Missing . -syn_misc.at-8199-prog.cob:3.7-3.17: +syn_misc.at-8236-prog.cob:3.7-3.17: 1 2 IDENTIFICATION DIVISION 3 > PROGRAM-ID. prog. @@ -2983,7 +2983,7 @@ syn_misc.at-8199-prog.cob:3.7-3.17: 5 WORKING-STORAGE SECTION >> Warning: Invalid syntax -syn_misc.at-8199-prog.cob:4.20: +syn_misc.at-8236-prog.cob:4.20: 1 2 IDENTIFICATION DIVISION 3 PROGRAM-ID. prog. @@ -2993,7 +2993,7 @@ syn_misc.at-8199-prog.cob:4.20: 6 77 PMODE PIC X >> Hint: Missing . -syn_misc.at-8199-prog.cob:5.7-5.22: +syn_misc.at-8236-prog.cob:5.7-5.22: 2 IDENTIFICATION DIVISION 3 PROGRAM-ID. prog. 4 DATA DIVISION @@ -3003,7 +3003,7 @@ syn_misc.at-8199-prog.cob:5.7-5.22: 7 PROCEDURE DIVISION. >> Warning: Invalid syntax -syn_misc.at-8199-prog.cob:5.30: +syn_misc.at-8236-prog.cob:5.30: 2 IDENTIFICATION DIVISION 3 PROGRAM-ID. prog. 4 DATA DIVISION @@ -3013,7 +3013,7 @@ syn_misc.at-8199-prog.cob:5.30: 7 PROCEDURE DIVISION. >> Hint: Missing . -syn_misc.at-8199-prog.cob:6.7-6.9: +syn_misc.at-8236-prog.cob:6.7-6.9: 3 PROGRAM-ID. prog. 4 DATA DIVISION 5 WORKING-STORAGE SECTION @@ -3023,7 +3023,7 @@ syn_misc.at-8199-prog.cob:6.7-6.9: 8 STOP RUN. >> Warning: Invalid syntax -syn_misc.at-8199-prog.cob:6.23: +syn_misc.at-8236-prog.cob:6.23: 3 PROGRAM-ID. prog. 4 DATA DIVISION 5 WORKING-STORAGE SECTION @@ -3033,7 +3033,7 @@ syn_misc.at-8199-prog.cob:6.23: 8 STOP RUN. >> Hint: Missing . -syn_misc.at-8199-prog.cob:7.7-7.16: +syn_misc.at-8236-prog.cob:7.7-7.16: 4 DATA DIVISION 5 WORKING-STORAGE SECTION 6 77 PMODE PIC X @@ -3042,8 +3042,8 @@ syn_misc.at-8199-prog.cob:7.7-7.16: 8 STOP RUN. >> Error: Invalid syntax -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8235:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8284:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8286:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8283:0 -Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8340:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8272:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8321:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8323:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8320:0 +Considering: import/gnucobol/tests/testsuite.src/syn_misc.at:8377:0 diff --git a/test/output-tests/syn_refmod.expected b/test/output-tests/syn_refmod.expected index 5feb92357..14f1557c7 100644 --- a/test/output-tests/syn_refmod.expected +++ b/test/output-tests/syn_refmod.expected @@ -1,3 +1,3 @@ Considering: import/gnucobol/tests/testsuite.src/syn_refmod.at:48:0 Considering: import/gnucobol/tests/testsuite.src/syn_refmod.at:147:0 -Considering: import/gnucobol/tests/testsuite.src/syn_refmod.at:181:0 +Considering: import/gnucobol/tests/testsuite.src/syn_refmod.at:185:0 diff --git a/test/output-tests/syn_screen.expected b/test/output-tests/syn_screen.expected index d91c32751..1153b6880 100644 --- a/test/output-tests/syn_screen.expected +++ b/test/output-tests/syn_screen.expected @@ -529,3 +529,4 @@ syn_screen.at-880-prog.cob:7.19-7.23: 8 STOP RUN. >> Error: Invalid syntax +Considering: import/gnucobol/tests/testsuite.src/syn_screen.at:905:0 diff --git a/test/output-tests/used_binaries.expected b/test/output-tests/used_binaries.expected index af09dcb9d..e1e59e9e1 100644 --- a/test/output-tests/used_binaries.expected +++ b/test/output-tests/used_binaries.expected @@ -1,7 +1,7 @@ -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:71:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:193:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:254:0 -used_binaries.at-254-prog.cob:10.8-10.18: +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:69:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:206:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:259:0 +used_binaries.at-259-prog.cob:10.8-10.18: 7 PROCEDURE DIVISION. 8 MAIN-PROC SECTION. 9 00. @@ -13,7 +13,7 @@ used_binaries.at-254-prog.cob:10.8-10.18: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" -used_binaries.at-254-prog.cob:12.8-12.28: +used_binaries.at-259-prog.cob:12.8-12.28: 9 00. 10 COPY PROC. 11 END-PROC SECTION. @@ -25,31 +25,32 @@ used_binaries.at-254-prog.cob:12.8-12.28: - search path: ./sub - filename extensions: "cpy" "cbl" "cob" "cbx" -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:277:0 -Fatal: used_binaries.at-277-sub/copy/PROC.cpy: No such file or directory -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:315:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:343:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:390:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:421:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:439:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:533:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:534:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:602:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:603:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:610:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:654:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:655:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:706:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:707:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:743:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:743:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:826:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:844:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:865:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:882:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:911:0 -Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:944:0 -used_binaries.at-944-progprep.cob:5.36-5.37: +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:286:0 +Fatal: used_binaries.at-286-sub/copy/PROC.cpy: No such file or directory +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:324:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:361:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:399:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:430:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:463:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:519:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:613:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:614:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:682:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:683:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:690:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:734:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:735:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:786:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:787:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:823:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:823:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:906:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:924:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:945:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:962:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:991:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:1024:0 +used_binaries.at-1024-progprep.cob:5.36-5.37: 2 IDENTIFICATION DIVISION. 3 PROGRAM-ID. prog. 4 DATA DIVISION. @@ -59,7 +60,7 @@ used_binaries.at-944-progprep.cob:5.36-5.37: 7 COPY 'CRUD.CPY'. >> Error: Invalid syntax -used_binaries.at-944-progprep.cob:7.7-7.23: +used_binaries.at-1024-progprep.cob:7.7-7.23: 4 DATA DIVISION. 5 WORKING-STORAGE SECTION. # 6 01 TEST-VAR PIC 9(2) VALUE 'A'. @@ -71,3 +72,79 @@ used_binaries.at-944-progprep.cob:7.7-7.23: - search path: - filename extensions: "cpy" "cbl" "cob" "cbx" +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:1167:0 +used_binaries.at-1167-f.copy:8.54: + 5 LINKAGE SECTION. + 6 01 a PIC X(20). + 7 01 b BINARY-C-LONG. + 8 > PROCEDURE DIVISION USING a BY VALUE b RETURNING OMITTED. +---- ^ + 9 END PROGRAM f. +>> Hint: Missing + +used_binaries.at-1167-f.copy:8.55-8.62: + 5 LINKAGE SECTION. + 6 01 a PIC X(20). + 7 01 b BINARY-C-LONG. + 8 > PROCEDURE DIVISION USING a BY VALUE b RETURNING OMITTED. +---- ^^^^^^^ + 9 END PROGRAM f. +>> Error: Invalid syntax + +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:1136:0 +used_binaries.at-1136-filec.c:2.7-2.21: + 1 + 2 > /* for COB_EXT_EXPORT */ +---- ^^^^^^^^^^^^^^ + 3 #include + 4 COB_EXT_EXPORT void f (char *str, long num) {}; +>> Error: Invalid syntax + +used_binaries.at-1136-filec.c:4.6-4.7: + 1 + 2 /* for COB_EXT_EXPORT */ + 3 #include + 4 > COB_EXT_EXPORT void f (char *str, long num) {}; +---- ^ +>> Error: Unexpected indicator: `T' + +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:1140:0 +used_binaries.at-1140-filec.h:2.6-2.7: + 1 + 2 > /* COB_EXT_IMPORT will be defined by libcob.h up-front */ +---- ^ + 3 COB_EXT_IMPORT void f (char *, long); +>> Error: Unexpected indicator: `_' + +used_binaries.at-1140-filec.h:2.7-2.17: + 1 + 2 > /* COB_EXT_IMPORT will be defined by libcob.h up-front */ +---- ^^^^^^^^^^ + 3 COB_EXT_IMPORT void f (char *, long); +>> Error: Invalid syntax + +used_binaries.at-1140-filec.h:3.6-3.7: + 1 + 2 /* COB_EXT_IMPORT will be defined by libcob.h up-front */ + 3 > COB_EXT_IMPORT void f (char *, long); +---- ^ +>> Error: Unexpected indicator: `T' + +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:1112:0 +Considering: import/gnucobol/tests/testsuite.src/used_binaries.at:1140:0 +used_binaries.at-1140-prog2.cob:8.57: + 5 WORKING-STORAGE SECTION. + 6 01 long USAGE BINARY-C-LONG. + 7 PROCEDURE DIVISION. + 8 > CALL "f" USING "Hello" BY VALUE long RETURNING NOTHING. +---- ^ +>> Hint: Missing + +used_binaries.at-1140-prog2.cob:8.58-8.65: + 5 WORKING-STORAGE SECTION. + 6 01 long USAGE BINARY-C-LONG. + 7 PROCEDURE DIVISION. + 8 > CALL "f" USING "Hello" BY VALUE long RETURNING NOTHING. +---- ^^^^^^^ +>> Error: Invalid syntax +