https://gcc.gnu.org/g:1095e444a4526f587980bc333a7bfa83d27f0adb
commit r17-4715-g1095e444a4526f587980bc333a7bfa83d27f0adb Author: Xavier Del Campo Romero <[email protected]> Date: Thu Sep 24 14:01:29 2026 +0200 cobol: Fix missing prototype in stored-char-length.cpy This copybook was incorrectly defining a function also called STORED-CHAR-LENGTH with an empty body, rather than its prototype, therefore breaking programs relying on it. libgcobol/ChangeLog: * compat/gnu/cpy/stored-char-length.cpy: Add PROTOTYPE. * compat/gnu/lib/stored-char-length.cbl: Add COPY to validate prototype. Diff: --- libgcobol/compat/gnu/cpy/stored-char-length.cpy | 2 +- libgcobol/compat/gnu/lib/stored-char-length.cbl | 2 ++ 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/libgcobol/compat/gnu/cpy/stored-char-length.cpy b/libgcobol/compat/gnu/cpy/stored-char-length.cpy index e54a9bd32894..cd3d3e19e596 100644 --- a/libgcobol/compat/gnu/cpy/stored-char-length.cpy +++ b/libgcobol/compat/gnu/cpy/stored-char-length.cpy @@ -30,7 +30,7 @@ * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. Identification Division. - Function-ID. STORED-CHAR-LENGTH. + Function-ID. STORED-CHAR-LENGTH PROTOTYPE. Data Division. Linkage Section. 01 Candidate PIC X Any Length. diff --git a/libgcobol/compat/gnu/lib/stored-char-length.cbl b/libgcobol/compat/gnu/lib/stored-char-length.cbl index f60408810f8e..668b7b3fb4aa 100644 --- a/libgcobol/compat/gnu/lib/stored-char-length.cbl +++ b/libgcobol/compat/gnu/lib/stored-char-length.cbl @@ -29,6 +29,8 @@ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + Copy "stored-char-length.cpy". + Identification Division. Function-ID. STORED-CHAR-LENGTH. Data Division.
