commit 148d5582275a0c3046d6d231079459515910c286
Author: Xavier Del Campo Romero <[email protected]>
Date: Tue Sep 29 23:47:03 2026 +0200
cobol: Check COBRT-FILE-STATUS definition against its prototype
libgcobol/ChangeLog:
* compat/gnu/lib/cobrt-file-status.cbl: COPY prototype.
commit 2724766a111e3e422dda4fa94bca9e754af02af8
Author: Xavier Del Campo Romero <[email protected]>
Date: Tue Sep 29 23:45:09 2026 +0200
cobol: Remove unused argument ERRNO-VAL
This was a leftover from previous iterations of the COBRT-FILE-STATUS
function.
libgcobol/ChangeLog:
* compat/gnu/cpy/cblproto.cpy: Remove unused parameter.
* compat/gnu/lib/CBL_CLOSE_FILE.cbl: Likewise.
* compat/gnu/lib/CBL_CREATE_FILE.cbl: Likewise.
* compat/gnu/lib/CBL_DELETE_FILE.cbl: Likewise.
* compat/gnu/lib/CBL_READ_FILE.cbl: Likewise.
* compat/gnu/lib/CBL_WRITE_FILE.cbl: Likewise.
* compat/gnu/lib/cobrt-file-status.cbl: Likewise.
commit f32d925b9b770c7264aeb5a59e67843342efbfc4
Author: Xavier Del Campo Romero <[email protected]>
Date: Tue Sep 29 23:22:23 2026 +0200
cobol: Do not add 78-level entries to groups
Previously, a 78-level entry appearing after a group definition would
be
also included into the group, therefore incorrectly increasing the
LENGTH OF the group itself.
On the other hand, if a 78-level entry appeared between group item
subordinates, the one below the 78-level entry was rejected because it
was assigned no parent.
Now, 78-level entries do not affect groups in any way.
gcc/cobol/ChangeLog:
* symbols.cc (calculate_capacity): Exclude 78-level entries.
(symbol_field_parent_set): Likewise.
gcc/testsuite/ChangeLog:
*
cobol.dg/group2/LENGTH_OF_FILLER_GROUP_with_MF_constants.cob: New test.
* cobol.dg/group2/LENGTH_OF_GROUP_with_MF_constants.cob: New
test.
commit 3b67b356f650e817e69cdcd441f80cee697d8f7a
Author: James K. Lowden <[email protected]>
Date: Tue Sep 29 15:29:01 2026 -0400
cobol: Add Werrno to warn about errno, and refine syslog priority.
If the COBOL program uses "error" as a data-item name, Werrno emits a
diagnositic indicating that it does not reference the errno C
variable.
Instead of LOG_INFO for all messages regarding an unhandled error
condition, use LOG_ERR for fatal EC and LOG_WARNING for nonfatal. Any
EC that is unimplemented or not recognized continues to use LOG_INFO.
Correct EC processing to work for last statement in program.
gcc/cobol/ChangeLog:
* cbldiag.h (enum cbl_diag_id_t): Define ParErrno.
* cobol1.cc (cobol_langhook_handle_option): Handle Werrno.
* lang-specs.h: Accept Werrno.
* lang.opt: Define Werrno.
* messages.cc (struct cbl_diag_t): Add Werrno to warning
table.
(kind_of): Whitespace.
(cobol_warning): Same.
(option_of): Same.
(cbl_message): Same.
(dialect_ok): Same.
* parse.y: Issue Werrno diagnostic, and handle end-of-program
EC.
libgcobol/ChangeLog:
* ec.h (enum ec_type_t): Whitespace.
* libgcobol.cc (ec_priority): New function.
(default_exception_handler): use ec_priority.
