aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2026-02-01 16:33:20 -08:00
parent 5150844a7d
commit 4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Task/Loops-Infinite/Ada/loops-infinite.ada
View file

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

10
Task/Loops-Infinite/COBOL/loops-infinite.cobol
View file

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

1
Task/Loops-Infinite/Chapel/loops-infinite.chapel
View file

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

4
Task/Loops-Infinite/Elena/loops-infinite.elena
View file

@ -1,7 +1,7 @@
public program()
public Program()
{
while (true)
{
console.writeLine("spam")
Console.writeLine("spam")
}
}

2
Task/Loops-Infinite/Emacs-Lisp/loops-infinite.l
View file

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

3
Task/Loops-Infinite/Euphoria/loops-infinite.ex
View file

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

2
Task/Loops-Infinite/Haxe/loops-infinite.haxe
View file

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

8
Task/Loops-Infinite/Oberon/loops-infinite.oberon
View file

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

3
Task/Loops-Infinite/PowerShell/loops-infinite.psh
View file

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

1
Task/Loops-Infinite/REBOL/loops-infinite-1.rebol
View file

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

1
Task/Loops-Infinite/REBOL/loops-infinite-2.rebol
View file

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

1
Task/Loops-Infinite/REBOL/loops-infinite-3.rebol
View file

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

3
Task/Loops-Infinite/ReScript/loops-infinite-1.re
View file

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

4
Task/Loops-Infinite/ReScript/loops-infinite-2.re
View file

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

3
Task/Loops-Infinite/VBScript/loops-infinite.vb
View file

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