[open-cobol-list] SUBTRACT and std=mf option Was : About the Overflow

[Peg]

Hello Alain Lucari,
Hello all,

Alain Lucari wrote:
> I am not able to see that : I use Linux and an old
> version of Open-Cobol without "flavours".
> Perhaps you can try some others flavours ?
Sorry, My English is not fluent.
Is this a meaning "Please test in two or more environments" ?

I moved the following codes by two or more environment and version.

------------------------------
 IDENTIFICATION DIVISION.
 PROGRAM-ID. TESTSUB.
 DATA DIVISION.
 WORKING-STORAGE SECTION.
 01 DATA1 PIC 9(2) VALUE 5.
 01 DATA2 PIC 9(2) VALUE 5.
 PROCEDURE DIVISION.
 COMPUTE DATA1 = DATA1 - 1.
 SUBTRACT 1 FROM DATA2.
 DISPLAY DATA1 " " DATA2.
------------------------------

This is a result.
It seems to obtain a normal result in OpenCOBOL 0.30.

DebianLinux 2.4.24 (OpenCOBOL 0.32)
$ cobc TESTFLOW.COB -free -std=mf
$ ./TESTFLOW
04 96                           <- NG

VineLinux 3.0 (OpenCOBOL 0.30)
$ cobc TESTFLOW.COB -free -std=mf
$ ./TESTFLOW
04 96                           <- OK

Cygwin 1.5.17 (OpenCOBOL 0.33 CVS 20050601)
$ cobc TESTFLOW.COB -free -std=mf
$ ./TESTFLOW
04 96                           <- NG

Cygwin 1.5.17 (OpenCOBOL 0.32)
$ cobc TESTFLOW.COB -free -std=mf
$ ./TESTFLOW
04 96                           <- NG

Cygwin 1.5.17 (OpenCOBOL 0.31)
$ cobc TESTFLOW.COB -free -std=mf
$ ./TESTFLOW
04 96                           <- NG

Cygwin 1.5.17 (OpenCOBOL 0.30)
$ cobc TESTFLOW.COB -free -std=mf
$ ./TESTFLOW
04 04                           <- OK

Best regards,

-- 
Peg, PegStyle mailto:address@hidden
http://members8.tsukaeru.net/pegstyle/