diff --git a/gcc/cobol/UAT/failsuite.src/typedef.at b/gcc/cobol/UAT/failsuite.src/typedef.at index 7bf6a29234a4deb4e1ce0eeccb594b3c64339899..9cc7be01fd92e9bc9de5b4b3d7cfde7b8a7b626f 100644 --- a/gcc/cobol/UAT/failsuite.src/typedef.at +++ b/gcc/cobol/UAT/failsuite.src/typedef.at @@ -214,7 +214,7 @@ AT_DATA([badprog.cob], [ AT_CHECK([$COMPILE_ONLY -dialect mf badprog.cob], [1], [], [badprog.cob:8: error: 02 F1 may not reference itself as part of 01 MESSAGE-TEXT-2T at 'MESSAGE-TEXT-2T' badprog.cob:10: error: F1 created with SAME AS or TYPE TO, cannot have new member FILLER at 'FILLER' -badprog.cob:10: error: 05 FILLER on is not part of an 01 record at 'FILLER' +badprog.cob:10: error: 05 FILLER is not part of an 01 record at 'FILLER' badprog.cob:12: error: PIC incompatible with TYPE TO badprog.cob:12: error: 77 OUTPUT-NAME TYPE TO MESSAGE-TEXT-2T must be an elementary item at 'MESSAGE-TEXT-2T' .:13: 5 errors in DATA DIVISION, compilation ceases detected at end of file