Idiom #50 Make an infinite loop

Write a loop which has no end clause.

loop
   null;
end loop;

#define forever while(1)

forever {
	// Do something
}

loop:
	goto loop;

while(1){
	// Do something
}

for(;;){
	// 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.

while (true) {
	// Do something
}

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

while (true)
{
    // Do something
}

while (true) { }

for (;;) {}

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
}

import Control.Monad

forever $ pure ()

let x = x in x

import Control.Monad

forever (getLine >>= putStrLn)

while (true) {
	// to infinity
}

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

for(;;){
	// Do something
}

while(true) {
	// Do something	
}

while (true) { }

(loop)

while true do 
	-- Do something
end

for (;;);

while (true) {
    // do something
}

repeat until false;

While True do { nothing };

say "" while True;

while (1) {
   do_stuff();
}

repeat, write("hello\n").

while True:
  a=1

while True:
	pass

loop do
  # endless joy
end

loop {
	// Do something
}

while(true){
  println(3)
}

Public Sub infiloop()
    Do

    Loop
End Sub

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

Idiom created by programming-idioms.org