COBOL now has: PERFORM UNTIL EXIT [...] END-PERFORM
And it has finally been implemented in Enterprise COBOL (v6.4; backported to v6.3 on my request!). ________________________________ From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Andrew Rowley <and...@blackhillsoftware.com> Sent: Tuesday, March 28, 2023 5:02 AM To: IBM-MAIN@LISTSERV.UA.EDU <IBM-MAIN@LISTSERV.UA.EDU> Subject: Re: Stop the ragging on COBOL please [was: RE: ASM call by value] On 28/03/2023 9:34 pm, Seymour J Metz wrote: > I once found myself defending the common idiom > > for (;;) { > foo; > } > > as a perfectly clear DO FOREVER. I'm not sure that it is completely clear, it depends on knowledge if whether the empty statement evaluates as true or false - or just a guess that do forever is more likely than do never... Personally, I prefer something like: while (TRUE) { } -- Andrew Rowley Black Hill Software ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN