Logo

Programming-Idioms

History of Idiom 50 > diff from v51 to v52

Edit summary for version 52 by Roie8:
New Cobol implementation by user [Roie8]

Version 51

2019-09-27, 00:50:43

Version 52

2019-09-27, 20:21:44

Idiom #50 Make an infinite loop

Write a loop which has no end clause.

Idiom #50 Make an infinite loop

Write a loop which has no end clause.

Code
IDENTIFICATION DIVISION.
PROGRAM-ID. hello 10 times.
PROCEDURE DIVISION.
PERFORM UNTIL 1 < 0
   DISPLAY "Something"
END-PERFORM
STOP RUN.