Data update

Task/Loops-Infinite/Ada/loops-infinite.adb

@@ -0,0 +1,3 @@
+loop
+   Put_Line("SPAM");
+end loop;

Task/Loops-Infinite/COBOL/loops-infinite.cob

@@ -0,0 +1,10 @@
+       IDENTIFICATION DIVISION.
+       PROGRAM-ID. Spam.
+
+       PROCEDURE DIVISION.
+           PERFORM UNTIL 1 <> 1
+               DISPLAY "SPAM"
+           END-PERFORM
+
+           GOBACK
+           .

Task/Loops-Infinite/Chapel/loops-infinite.chpl

@@ -0,0 +1 @@
+while true do writeln("SPAM");

Task/Loops-Infinite/Emacs-Lisp/loops-infinite.el

@@ -0,0 +1,2 @@
+(while t
+  (message "SPAM"))

Task/Loops-Infinite/Euphoria/loops-infinite.eu

@@ -0,0 +1,3 @@
+while 1 do
+    puts(1, "SPAM\n")
+end while

Task/Loops-Infinite/Haxe/loops-infinite.hx

@@ -0,0 +1,2 @@
+while (true)
+  Sys.println("SPAM");

Task/Loops-Infinite/Jactl/loops-infinite-1.jactl

@@ -0,0 +1,3 @@
+while (true) {
+  println 'SPAM'
+}

Task/Loops-Infinite/Jactl/loops-infinite-2.jactl

@@ -0,0 +1,3 @@
+for (;;) {
+  println 'SPAM'
+}

Task/Loops-Infinite/Janet/loops-infinite.janet

@@ -0,0 +1 @@
+(forever (print "SPAM"))

Task/Loops-Infinite/Oberon/loops-infinite-1.oberon

@@ -0,0 +1,8 @@
+MODULE InfiniteLoop;
+IMPORT
+  Out;
+BEGIN
+  WHILE TRUE DO
+    Out.String("SPAM");Out.Ln
+  END
+END InfiniteLoop.

Task/Loops-Infinite/Oberon/loops-infinite-2.oberon

@@ -0,0 +1,8 @@
+MODULE InfiniteLoop;
+IMPORT
+  Out;
+BEGIN
+  LOOP
+    Out.String("SPAM");Out.Ln
+  END
+END InfiniteLoop.

Task/Loops-Infinite/PowerShell/loops-infinite.ps1

@@ -0,0 +1,3 @@
+for () {
+    "SPAM"
+}

Task/Loops-Infinite/ReScript/loops-infinite-1.res

@@ -0,0 +1,3 @@
+while true {
+  Js.log("SPAM")
+}

Task/Loops-Infinite/ReScript/loops-infinite-2.res

@@ -0,0 +1,4 @@
+let rec inf_loop = () => {
+  Js.log("SPAM")
+  inf_loop()
+}

Task/Loops-Infinite/Rebol/loops-infinite-1.rebol

@@ -0,0 +1 @@
+forever [print "SPAM"]

Task/Loops-Infinite/Rebol/loops-infinite-2.rebol

@@ -0,0 +1 @@
+until [print "SPAM" false]

Task/Loops-Infinite/Rebol/loops-infinite-3.rebol

@@ -0,0 +1 @@
+while[true][print "SPAM"]

Task/Loops-Infinite/Rye/loops-infinite.rye

@@ -0,0 +1 @@
+forever { print "SPAM" }

Task/Loops-Infinite/SIL/loops-infinite.sil

@@ -0,0 +1,3 @@
+lblstart
+printLine SPAM
+GOTO start

Task/Loops-Infinite/VBScript/loops-infinite.vbs

@@ -0,0 +1,3 @@
+Do
+    WScript.Echo("SPAM")
+Loop