[Bug cobol/119885] libgcobol: SQRT wrong argument check

[rdubner at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=119885

Robert Dubner <rdubner at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         Resolution|---                         |FIXED
                 CC|                            |rdubner at gcc dot gnu.org
           Assignee|unassigned at gcc dot gnu.org      |rdubner at gcc dot 
gnu.org
             Status|UNCONFIRMED                 |RESOLVED

--- Comment #2 from Robert Dubner <rdubner at gcc dot gnu.org> ---
Fixed by changing

if( value <= GCOB_FP128_LITERAL(0.0) )

to

if( value < GCOB_FP128_LITERAL(0.0) )