neopragma/cobol-unit-test

Remove FALSE from 88-level items

Closed this issue · 1 comments

neopragma commented

Some mainframe compilers don't recognize FALSE. Thought this was fixed earlier, but the fix must have been overwritten.

neopragma commented

Changed this sort of code:

05  FOO PIC X.
    88  BAR VALUE 'Y', FALSE SPACE.
. . .
    SET BAR TO FALSE

to this sort of code:

05  FOO PIC X.
    88  NOT-BAR VALUE 'N'.
    88  BAR VALUE 'Y'.
. . .
    SET NOT-BAR TO TRUE