Menu ▾ ▴

#172 2002 STANDARD +: Implement boolean picture

unclassified
accepted
nobody
None
5 - default
2017-12-03
2016-09-27
No

We already have a boolean category and class. The necessary changes for the first implementation of boolean picture PIC 1 is:

  • tree.c:
  • #define PIC_BOOLEAN 0x16
  • in cb_build_picture() check '1', set PIC_BOOLEAN, add tests
  • check for support of boolean(and national) picture
  • config.def:
  • change cb_numeric_boolean and cb_national_literals to include the picture for them
  • change _("hexadecimal-boolean literals (b'A')") to _("hexadecimal-boolean literals (bx'A')")
  • testsuite:
  • adjust for the changed configuration flags
  • add checks for configuration of national/boolean picture and for syntax
  • general: check if boolean data works and either set as PENDING or UNFINISHED

Related

Bugs: #321
Discussion: 2002 Standard and BOOLEAN

Discussion

  • Simon Sobisch

    Simon Sobisch - 2016-12-16

    Additional information (applies to MF only): when PIC 1 is found the BINLIT directive is automatically set to "BOOLEAN". Equivalent in GnuCOBOL: set numeric-boolean to 0)

     
  • Simon Sobisch

    Simon Sobisch - 2017-12-03
    • assigned_to: Simon Sobisch --> nobody
    • Group: GC 2.2 --> unclassified
     

Log in to post a comment.