langs a-z

This commit is contained in:
Ingy döt Net 2013-04-10 22:43:41 -07:00
parent db842d013d
commit d066446780
11389 changed files with 98361 additions and 1020 deletions

View file

@ -0,0 +1 @@
void main() writeln "Goodbye, World!";

View file

@ -0,0 +1,7 @@
class Hello
{
static Main () : void
{
System.Console.WriteLine ("Goodbye, World!");
}
}

View file

@ -0,0 +1 @@
System.Console.WriteLine("Goodbye, World!");

View file

@ -0,0 +1 @@
say 'Goodbye, World!'

View file

@ -0,0 +1 @@
echo("Goodbye, World!")

View file

@ -0,0 +1 @@
print_endline "Goodbye, World!"

View file

@ -0,0 +1,3 @@
main: func {
"Goodbye, World!" println()
}

View file

@ -0,0 +1,9 @@
MODULE Goodbye;
IMPORT Out;
PROCEDURE World*;
BEGIN
Out.String("Goodbye, World!");Out.Ln
END World;
BEGIN
World;
END Goodbye.

View file

@ -0,0 +1,5 @@
class Hello {
function : Main(args : String[]) ~ Nil {
"Goodbye, World!"->PrintLine();
}
}

View file

@ -0,0 +1 @@
printf("Goodbye, World!");

View file

@ -0,0 +1 @@
printf("%s", [@"Goodbye, World!" UTF8String]);

View file

@ -0,0 +1 @@
[@"Goodbye, World!" writeToFile:@"/dev/stdout" atomically:NO encoding:NSUTF8StringEncoding error:NULL];

View file

@ -0,0 +1 @@
[[NSFileHandle fileHandleWithStandardOutput] writeData:[@"Goodbye, World!" dataUsingEncoding:NSUTF8StringEncoding]];

View file

@ -0,0 +1 @@
NSLog(@"Goodbye, World!");

View file

@ -0,0 +1,4 @@
#USE "course.lib"
PROC main (CHAN BYTE screen!)
out.string("Goodbye, World!*c*n", 0, screen)
:

View file

@ -0,0 +1 @@
disp("Goodbye, World!");

View file

@ -0,0 +1 @@
printf("Goodbye, World!");

View file

@ -0,0 +1 @@
`Goodbye, World!\n' print

View file

@ -0,0 +1 @@
echo("Goodbye, World!");

View file

@ -0,0 +1,18 @@
namespace HelloWorld;
interface
type
HelloClass = class
public
class method Main;
end;
implementation
class method HelloClass.Main;
begin
System.Console.WriteLine('Goodbye, World!');
end;
end.

View file

@ -0,0 +1 @@
{Show "Goodbye, World!"}

View file

@ -0,0 +1 @@
print("Goodbye, World!")

View file

@ -0,0 +1,2 @@
print "Goodbye, World!\n"
end

View file

@ -0,0 +1,11 @@
.globl start
.text
start:
mov $1,r0
sys 4; outtext; outlen
sys 1
rts pc
.data
outtext: <Goodbye, World!\n>
outlen = . - outtext

View file

@ -0,0 +1 @@
put ('Goodbye, World!');

View file

@ -0,0 +1,4 @@
program byeworld;
begin
writeln('Goodbye, World!');
end.

View file

@ -0,0 +1 @@
say 'Goodbye, World!';

View file

@ -0,0 +1,3 @@
int main(){
write("Goodbye, World!\n");
}

View file

@ -0,0 +1 @@
printf('Goodbye, World!\n');

View file

@ -0,0 +1 @@
(Goodbye, World!) ==

View file

@ -0,0 +1 @@
(Goodbye, World!) =

View file

@ -0,0 +1 @@
(Goodbye, World!) print

View file

@ -0,0 +1,4 @@
Write-Host "Goodbye, World!"
# For extra flair, you can specify colored output
Write-Host "Goodbye, World!" -foregroundcolor red

View file

@ -0,0 +1 @@
printline Goodbye, World!

View file

@ -0,0 +1,3 @@
using system;
puts "Goodbye, World!\n" ;

View file

@ -0,0 +1,3 @@
OpenConsole()
PrintN("Goodbye, World!")
Input() ; Wait for enter

View file

@ -0,0 +1 @@
"Goodbye, World!" print

View file

@ -0,0 +1,4 @@
Function Run(args() as String) As Integer
Print "Goodbye, World!"
Quit
End Function

View file

@ -0,0 +1 @@
print "Goodbye, World!"

View file

@ -0,0 +1,12 @@
TITLE Goodbye World;
LET NL=10;
EXT PROC(REF ARRAY BYTE) TWRT;
ENT PROC INT RRJOB();
TWRT("Goodbye, World!#NL#");
RETURN(1);
ENDPROC;

View file

@ -0,0 +1 @@
'Goodbye, World!' print

View file

@ -0,0 +1 @@
"Goodbye, World!" puts

View file

@ -0,0 +1 @@
print "Goodbye, World!"

View file

@ -0,0 +1,3 @@
fn main() {
io::println("Goodbye, World!");
}

View file

@ -0,0 +1,4 @@
/* Using a data step. Will print the string in the log window */
data _null_;
put "Goodbye, World!";
run;

View file

@ -0,0 +1,2 @@
function main()
end function "Goodbye, World!{d}{a}"

View file

@ -0,0 +1,2 @@
OUTPUT = "Goodbye, World!"
END

View file

@ -0,0 +1 @@
"Goodbye, World!"!

View file

@ -0,0 +1 @@
print("Goodbye, World!\n");

View file

@ -0,0 +1 @@
standard_output.print("Goodbye, World!\n");

View file

@ -0,0 +1,6 @@
$ include "seed7_05.s7i";
const proc: main is func
begin
writeln("Goodbye, World!");
end func;

View file

@ -0,0 +1 @@
'Goodbye, World!' printLine.

View file

@ -0,0 +1 @@
say 'Goodbye, World!'

View file

@ -0,0 +1,10 @@
define main
% Sisal doesn't yet have a string built-in.
% Let's define one as an array of characters.
type string = array[character];
function main(returns string)
"Goodbye, World!"
end function

View file

@ -0,0 +1 @@
inform: 'Goodbye, World!'.

View file

@ -0,0 +1 @@
print "Goodbye, World!\n"

View file

@ -0,0 +1 @@
Print("Goodbye, World!")

View file

@ -0,0 +1 @@
Disp "Goodbye, World!"

View file

@ -0,0 +1 @@
Goodbye, World!

View file

@ -0,0 +1,2 @@
$$ MODE TUSCRIPT
PRINT "Goodbye, World!"

View file

@ -0,0 +1 @@
^AGoodbye, World^A$$

View file

@ -0,0 +1 @@
echo("Goodbye, World!");

View file

@ -0,0 +1 @@
PRINT "Goodbye, World!"

View file

@ -0,0 +1 @@
"Goodbye, World!" print

View file

@ -0,0 +1,2 @@
#!/bin/sh
echo "Goodbye, World!"

View file

@ -0,0 +1,2 @@
#!/bin/csh -f
echo "Goodbye, World\!"

View file

@ -0,0 +1 @@
`r``````````````.G.o.o.d.b.y.e.,. .W.o.r.l.di

View file

@ -0,0 +1,3 @@
#show+
main = -[Goodbye, World!]-

View file

@ -0,0 +1,5 @@
#import std
#executable ('parameterized','')
main = <file[contents: -[Goodbye, World!]-]>!

View file

@ -0,0 +1 @@
"Goodbye, World!" puts

View file

@ -0,0 +1 @@
WScript.Echo("Goodbye, World!")

View file

@ -0,0 +1,16 @@
LIBRARY std;
USE std.TEXTIO.all;
entity test is
end entity test;
architecture beh of test is
begin
process
variable line_out : line;
begin
write(line_out, string'("Goodbye, World!"));
writeline(OUTPUT, line_out);
wait; -- needed to stop the execution
end process;
end architecture beh;

View file

@ -0,0 +1,3 @@
void main(){
stdout.printf("Goodbye, World!\n");
}

View file

@ -0,0 +1 @@
Message("Goodbye, World!")

View file

@ -0,0 +1 @@
1 print("Goodbye, World!");

View file

@ -0,0 +1,15 @@
section .data
msg db 'Goodbye, World!', 0AH
len equ $-msg
section .text
global _start
_start: mov edx, len
mov ecx, msg
mov ebx, 1
mov eax, 4
int 80h
mov ebx, 0
mov eax, 1
int 80h

View file

@ -0,0 +1,2 @@
use XL.UI.CONSOLE
WriteLn "Goodbye, World!"

View file

@ -0,0 +1,3 @@
code Text=12;
Text(0, "Goodbye, World!
")

View file

@ -0,0 +1,2 @@
<xsl:text>Goodbye, World!
</xsl:text>

View file

@ -0,0 +1 @@
write, "Goodbye, World!"

View file

@ -0,0 +1,18 @@
org $4000
txt_output: equ $bb5a
push hl
ld hl,world
print: ld a,(hl)
cp 0
jr z,end
call txt_output
inc hl
jr print
end: pop hl
ret
world: defm "Goodbye, World!\r\n\0"