Yeah PROCEDURE is the official word, but if you're gonna low DCL heresy,
might as well throw in PROC.
On Wed, Nov 24, 2021 at 3:28 PM Rob Pike <robpike(a)gmail.com> wrote:
Also isn't it PROCEDURE? I don't remember
PROC.
-rob
On Thu, Nov 25, 2021 at 7:15 AM Rob Pike <robpike(a)gmail.com> wrote:
I thought it was
TRY:PROC OPTIONS(MAIN);
DCL (IF,THEN,ELSE) FIXED BINARY (31);
IF = 1;
THEN = 2;
ELSE = 3;
IF IF = THEN THEN THEN = IF ; ELSE ELSE IF = THEN = ELSE;
END TRY;
But yeah.
Best to Barry.
-rob
On Thu, Nov 25, 2021 at 2:23 AM Richard Salz <rich.salz(a)gmail.com>
wrote:
>
> I asked my pal Barry Shein, who many of you know, if he had his PL/1
syntax
horror lying around, and he did. He said: "this was tested on the
Iron Spring Software PL/1 compiler running on openSuSe Linux (
http://www.iron-spring.com/)"
>
> IBM still uses PL/1. Remember, the main definition of "legacy" is
"revenue-producing."
>
> TRY:PROC OPTIONS(MAIN);
> DCL (IF,THEN,ELSE) FIXED BINARY (31);
>
> IF = 1;
> THEN = 2;
> ELSE = 3;
>
> IF IF = THEN THEN THEN = IF ; ELSE ELSE = THEN;
>
> END TRY;
>