Idiom #50 Make an infinite loop

Write a loop that has no end clause.

?- repeat, false.

% repeat/0 is built-in, but could be defined like this:
repeat.
repeat :- repeat.

repeat, write("hello\n").

loop :- loop.

?- loop.

loop
   null;
end loop;

loop:
	goto loop;

#define forever while(1)

forever {
	// Do something
}

for(;;){
	// Do something
}

while(1){
	// Do something
}

(loop []
  ;; do something
  (recur))

IDENTIFICATION DIVISION.
PROGRAM-ID. no end loop.
PROCEDURE DIVISION.
PERFORM UNTIL 1 < 0
   DISPLAY "Something"
END-PERFORM
STOP RUN.

for (;;) {
	/// Do something
}

while (true) {
	// Do something
}

while (true)
{
    // Do something
}

for (;;) {}

while (true) { }

for (;;) {

}

while (true) {
  // do something
}

defmodule Looping do
	def infinite do
		# Write code here	
		infinite
	end
end

loop() ->
	do:something(),
	loop().

do
end do

for {
	// Do something
}

while (true) { }

let x = x in x

import Control.Monad

forever (getLine >>= putStrLn)

import Control.Monad

forever $ pure ()

while (true) {
	// to infinity
}

for(;;) {
	console.log('Oops')
}

for (;;);

for(;;){
	// Do something
}

while (true);

do {} while (true);

while(true) {
	// Do something	
}

while (true) { }

(loop)

(do () (nil)
  (write-line "Control-C to quit this infinite loop")
  (sleep 1))

(defun infinite-loop (x)
  (apply x (infinite-loop x)))

while true do 
	-- Do something
end

repeat
until false

::loop::
goto loop

for (;;);

while (true) {
    // do something
}

repeat until false;

While True do { nothing };

while (1) {
   do_stuff();
}

say "" while True;

while ...:
    ...

while True:
    pass

loop do
  # endless joy
end

loop {
	// Do something
}

while(true){
  println(3)
}

(let forever ()
  (forever))

[] repeat.

Do
    ' Do something
Loop

Do you know the best way to do this in your language ? New implementation...

< > ⌨

Idiom created by programming-idioms.org

History

Issues