e7f1334ad02d4913346238aba58b0025ab7f455c - gcc

commit: e7f1334ad02d4913346238aba58b0025ab7f455c
[log]
author: Robert Dubner <rdubner@symas.com>
Tue May 20 11:49:43 2025 -0400
committer: Robert Dubner <rdubner@symas.com>
Tue Jul 29 12:06:38 2025 -0400
tree: 6b51643a7eeb283decd5e015b1b382905acea156
parent: d33eb8356da0b419ca57185b0b746db7a5f43862 [diff]

cobol: sqrt(0) is not an ec-argument error. [PR119885]

libgcobol

	PR cobol/119885
	* intrinsic.cc: (__gg__sqrt): Change test from <= zero to < zero.

gcc/testsuite

	* cobol.dg/group2/FUNCTION_SQRT__2_.cob: Testcase.
	* cobol.dg/group2/FUNCTION_SQRT__2_.out: Known-good for the testcase.

(cherry picked from commit d44beb132850a8ced1b0614e2724f18465b4a737)

gcc/testsuite/cobol.dg/group2/FUNCTION_SQRT__2_.cob[Added - diff]
gcc/testsuite/cobol.dg/group2/FUNCTION_SQRT__2_.out[Added - diff]
libgcobol/intrinsic.cc[diff]

3 files changed

tree: 6b51643a7eeb283decd5e015b1b382905acea156