On Fri, 1 Mar 2019 08:30:22 -0800, Charles Mills wrote:

>Assembler, allegedly the model for JCL, gets both of those right.
>
>(From memory)
>
>&FOO SETC 'Don''t'
>X    DC   C'&FOO'
> 
>Gives you a constant of "Don't" (and no syntax error).
>
I don't believe that works; I think you need the DOUBLE BiF:
         START
&FOO    ` SETC 'Don''t'
&DFOO    SETC DOUBLE('&FOO')
X        DC   C'&DFOO'
         END

JCL sorely lacks DOUBLE.

(It would be nice to be able to do it without the additional SETC.)

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to