The only language I can think of off-hand that doesn't require some sort of END
to close a DO (I'm sure there are others) is ISPF. But, in REXX at least, I
never use single-statement DOs. I see them all the time, and I don't get it.
Like this:
if x=0 then do
x=x+1
end
Or, more painfully:
select
when idx="T" then
do
countt=countt+1
end
when idx="U" then
do
countu=countu+1
end
when idx="V" then
do
countv=countv+1
end
when idx="W" then
do
countw=countw+1
end
otherwise
do
countx=countx+1
end
end
Why? If it were easier to read, I might sympathize. But it's harder, not
easier.
---
Bob Bridges, [email protected], cell 336 382-7313
/* It's a good thing Lincoln wrote the Gettysburg Address the year that he did,
or else that "fourscore and seven years" part would have just been plain wrong.
-Paul Paternoster */
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Paul Gilmartin
Sent: Saturday, June 6, 2020 14:40
But in Rexx similarly, END is required even for a single-statement DO.
Good for Rexx. I like strong closure.
>--- On 6 Jun 2020 10:53:44 -0700, (Bob Bridges) wrote:
>>Oh, you need an END-IF even for a single-statement IF? I forgot; I've been
>>thinking in REXX too long. In that case you're close; I guess I really meant
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
