I also like CA-IDEAL. A little bit PL/I like with a nice SELECT statement:

Example:

SELECT TRANS_CODE

WHEN 'A'

DO ADD_RECORD_PROC

WHEN 'D'

DO DEL_RECORD_PROC

WHEN 'P'

 DO PURCHASE_PROC

WHEN 'R'

DO RECEIPT_PROC

WHEN ANY

DO LOG_TRANS

WHEN OTHER

DO INVALID_CODE

ENDSEL




On Thu, Mar 30, 2023 at 11:23 AM Jeremy Nicoll <
[email protected]> wrote:

> On Wed, 29 Mar 2023, at 14:01, Paul Gilmartin wrote:
>
> > Too many languages lack ELSEIF and strong closure.  Fie on
> > the danglig ELSE!
>
> An ALGOL variant (S-ALGOL) that I used at university differentiated
> between, IIRC,
>
>  IF ... THEN ... ELSE
>
> and
>
> IF ... DO
>
> which meant that as soon as the compiler saw THEN or DO it
> knew whether or not there should be an ELSE later on.  It was
> such a simple idea but it worked well for both programmers
> & the compiler.
>
> --
> Jeremy Nicoll - my opinions are my own.
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>


-- 
Wayne V. Bickerdike

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to