Merge SVN 4011

ddeclerck · Jun 12, 2024 · d34d0aa · d34d0aa
1 parent c194165
commit d34d0aa
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/tests/testsuite.src/syn_copy.at b/tests/testsuite.src/syn_copy.at
@@ -195,7 +195,7 @@ AT_DATA([prog3.cob], [
        PROGRAM-ID.      prog.
        DATA             DIVISION.
        WORKING-STORAGE  SECTION.
-       COPY "subb.inc" OF SUB.
+       COPY "sub.inc" OF SUB.
        PROCEDURE        DIVISION.
            DISPLAY TEST-VAR.
            STOP RUN.
@@ -206,7 +206,7 @@ AT_DATA([prog4.cob], [
        PROGRAM-ID.      prog.
        DATA             DIVISION.
        WORKING-STORAGE  SECTION.
-       COPY "subb" OF SUB.
+       COPY "sub" OF SUB.
        PROCEDURE        DIVISION.
            DISPLAY TEST-VAR.
            STOP RUN.
@@ -217,7 +217,7 @@ AT_DATA([prog5.cob], [
        PROGRAM-ID.      prog.
        DATA             DIVISION.
        WORKING-STORAGE  SECTION.
-       COPY "subb" OF "..".
+       COPY "sub" OF "..".
        PROCEDURE        DIVISION.
            DISPLAY TEST-VAR.
            STOP RUN.
@@ -228,7 +228,7 @@ AT_DATA([prog6.cob], [
        PROGRAM-ID.      prog.
        DATA             DIVISION.
        WORKING-STORAGE  SECTION.
-       COPY "subb".
+       COPY "sub".
        PROCEDURE        DIVISION.
            DISPLAY TEST-VAR.
            STOP RUN.
@@ -238,7 +238,7 @@ AT_DATA([copy.inc], [
        77  TEST-VAR     PIC X VALUE 'V'.
 ])
 AT_CHECK([mkdir -p SUB/OSUB], [0], [], [])
-AT_DATA([SUB/subb.inc], [
+AT_DATA([SUB/sub.inc], [
        77  TEST-VAR     PIC X VALUE 'V'.
 ])