Re: Compile failed when try to do return not SUCCESSFUL where SUCCESSFULis declared as const

Hi Lim and the gang -

Hi Lim -

>Go figure these out:
>
>This one failed to compile:
>D ind1            c                   const(*on)
>C                   if        ind1
>C                   endif
>C                   eval      *inlr = *on
>
>This one compiled just fine:
>D ind2            c                   const('1')
>C                   if        ind2
>C                   endif
>C                   eval      *inlr = *on

Perhaps in the first example the compiler is creating a three-byte
character constant that contains either '*ON' or '*on' rather than
interpreting it as a true/false value and creating a one-byte character
constant that contains '1'.

You can test this by creating a three-byte field, eval SUCCESSFUL into it
when defined as const(*on) and see what the value of the field is.

It IS creating an indeterminate length constant, just like *on itself is.

A little testing using direct values rather than named constants showed:

return *on      ====> compiles
return not *on  ====> REJECTED
return '1'      ====> compiles
return not '1'  ====> compiles

Ken
http://www.kensims.net/
Opinions expressed are my own and do not necessarily represent the views
of my employer or anyone in their right mind.