If i compile nubmer_validation with -ftrace i don't have it in trace, last line there is CALL to this function in calling cobol module. I don't even have Source: line in cbltrace.log for this module.
I have docker container with centos, gnucobol, and some c/cobol/python programs in it (CentOS 7 EPEL x86_64 libcob-3.1.2-1.el7.x86_64). Docker image is installed on two different systems: both OS RedHat 7.8 but different hardware, some OS tweaks may differ too. I have a problem on one of host systems, while debugging my problem i encountered this in gdb: Program terminated with signal 11, Segmentation fault. #0 0x00007f2e23b0d465 in cob_stack_trace_internal (target=0x7f2e2ccec1c0 <_IO_2_1_stderr_>)...
how sweet
sorry again, my first try to explain reproduce steps where incomprehensible here is second try Micro Focus result 20190913 20190913 20190913 20190913 Micro Focus version cobol v5.1.00 PRN=RXCPV/AAF:9n.u5.51.05 PTI=WrapPack 4 GnuCOBOL result 20190913 020190913 02019091 02019091 GnuCOBOL version cobc (GnuCOBOL) 3.0-rc1.0
sorry again, my first try to explain reproduce steps where incomprehensible here is second try Micro Focus result 20190913 20190913 20190913 20190913 Micro Focus version cobol v5.1.00 PRN=RXCPV/AAF:9n.u5.51.05 PTI=WrapPack 4 GnuCobol result 20190913 020190913 02019091 02019091 GnuCOBOL version cobc (GnuCOBOL) 3.0-rc1.0
sorry again, my first try to explain reproduce steps where incomprehensible here is second try:
output of exactly this test program actually, it does not differ, my fault somehow in logs i get different results on different platforms, but this code sample does not demonstrate this i need to determine a few extra steps to reproduce this
Just out of interest - does anybody know of compilers that would have a different result? Micro Focus. There behaviour looks like during set of numeric variable it is set like it is alphanumeric, and stored padded right spaces. And during get it is (according to target) either moved like stored or converted for computations. GnuCOBOL does not perform any manipulations on get to detect significant digits.