[open-cobol-list] bug in cobol runtime

[David Korn]

Subject:  bug in cobol runtime
--------

The following program subtracts 1 from 13 and displays 88.
This is due to a bug in numeric.c.

=====================cut here=========================
       IDENTIFICATION DIVISION.
       PROGRAM-ID.  prog1
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  WS-MM-VALUE2           PIC 9(2).
       PROCEDURE DIVISION.
          MOVE '13' TO WS-MM-VALUE2
          DISPLAY 'WS-MM-VALUE2=' WS-MM-VALUE2
          SUBTRACT 1 FROM WS-MM-VALUE2
          DISPLAY 'WS-MM-VALUE2=' WS-MM-VALUE2
          GOBACK.
=====================cut here=========================

The fix for this bug is in the package of changes that Bob Sherry is
sending.

David Korn
address@hidden