Strings galore!

This commit is contained in:
gingerBill
2016-08-05 21:07:25 +01:00
parent 4a303b5c3e
commit ba238c569a
12 changed files with 473 additions and 312 deletions
+7 -7
View File
@@ -1,23 +1,23 @@
putchar :: proc(c : i32) -> i32 #foreign
putchar :: proc(c: i32) -> i32 #foreign
print_string :: proc(s : string) {
print_string :: proc(s: string) {
for i := 0; i < len(s); i++ {
c := cast(i32)s[i];
putchar(c);
}
}
string_byte_reverse :: proc(s : string) {
string_byte_reverse :: proc(s: string) {
n := len(s);
for i := 0; i < n/2; i++ {
s[i], s[n-1-i] = s[n-1-i], s[i];
}
}
print_int :: proc(i : int, base : int) {
NUM_TO_CHAR_TABLE := "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz@$";
print_int :: proc(i, base: int) {
NUM_TO_CHAR_TABLE :: "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz@$";
buf : [21]byte;
buf: [21]u8;
len := 0;
negative := false;
if i < 0 {
@@ -26,7 +26,7 @@ print_int :: proc(i : int, base : int) {
}
if i > 0 {
for i > 0 {
c : byte = NUM_TO_CHAR_TABLE[i % base];
c : u8 = NUM_TO_CHAR_TABLE[i % base];
buf[len] = c;
len++;
i /= base;
+260 -143
View File
@@ -4,16 +4,132 @@
define void @main() {
"entry - 0":
call void @print_int(i64 123, i64 10)
%0 = getelementptr inbounds [1 x i8], [1 x i8]* @.str0, i64 0, i64 0
%1 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %1
%2 = getelementptr inbounds %-string, %-string* %1, i64 0, i32 0
%3 = getelementptr inbounds %-string, %-string* %1, i64 0, i32 1
store i8* %0, i8** %2
store i64 1, i64* %3
%4 = load %-string, %-string* %1
call void @print_string(%-string %4)
%0 = alloca i64, align 8 ; a
store i64 zeroinitializer, i64* %0
%1 = getelementptr inbounds [6 x i8], [6 x i8]* @.str0, i64 0, i64 0
%2 = getelementptr i8, i8* %1, i64 1
%3 = load i8, i8* %2
%4 = zext i8 %3 to i64
store i64 %4, i64* %0
%5 = load i64, i64* %0
call void @print_int(i64 %5, i64 10)
%6 = getelementptr inbounds [1 x i8], [1 x i8]* @.str1, i64 0, i64 0
%7 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %7
%8 = getelementptr inbounds %-string, %-string* %7, i64 0, i32 0
%9 = getelementptr inbounds %-string, %-string* %7, i64 0, i32 1
store i8* %6, i8** %8
store i64 1, i64* %9
%10 = load %-string, %-string* %7
call void @print_string(%-string %10)
%11 = getelementptr inbounds [23 x i8], [23 x i8]* @.str2, i64 0, i64 0
%12 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %12
%13 = getelementptr inbounds %-string, %-string* %12, i64 0, i32 0
%14 = getelementptr inbounds %-string, %-string* %12, i64 0, i32 1
store i8* %11, i8** %13
store i64 23, i64* %14
%15 = load %-string, %-string* %12
call void @print_string(%-string %15)
%16 = getelementptr inbounds [21 x i8], [21 x i8]* @.str3, i64 0, i64 0
%17 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %17
%18 = getelementptr inbounds %-string, %-string* %17, i64 0, i32 0
%19 = getelementptr inbounds %-string, %-string* %17, i64 0, i32 1
store i8* %16, i8** %18
store i64 21, i64* %19
%20 = load %-string, %-string* %17
call void @print_string(%-string %20)
%21 = getelementptr inbounds [22 x i8], [22 x i8]* @.str4, i64 0, i64 0
%22 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %22
%23 = getelementptr inbounds %-string, %-string* %22, i64 0, i32 0
%24 = getelementptr inbounds %-string, %-string* %22, i64 0, i32 1
store i8* %21, i8** %23
store i64 22, i64* %24
%25 = load %-string, %-string* %22
call void @print_string(%-string %25)
%26 = getelementptr inbounds [23 x i8], [23 x i8]* @.str5, i64 0, i64 0
%27 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %27
%28 = getelementptr inbounds %-string, %-string* %27, i64 0, i32 0
%29 = getelementptr inbounds %-string, %-string* %27, i64 0, i32 1
store i8* %26, i8** %28
store i64 23, i64* %29
%30 = load %-string, %-string* %27
call void @print_string(%-string %30)
%31 = getelementptr inbounds [20 x i8], [20 x i8]* @.str6, i64 0, i64 0
%32 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %32
%33 = getelementptr inbounds %-string, %-string* %32, i64 0, i32 0
%34 = getelementptr inbounds %-string, %-string* %32, i64 0, i32 1
store i8* %31, i8** %33
store i64 20, i64* %34
%35 = load %-string, %-string* %32
call void @print_string(%-string %35)
%36 = getelementptr inbounds [37 x i8], [37 x i8]* @.str7, i64 0, i64 0
%37 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %37
%38 = getelementptr inbounds %-string, %-string* %37, i64 0, i32 0
%39 = getelementptr inbounds %-string, %-string* %37, i64 0, i32 1
store i8* %36, i8** %38
store i64 37, i64* %39
%40 = load %-string, %-string* %37
call void @print_string(%-string %40)
%41 = getelementptr inbounds [21 x i8], [21 x i8]* @.str8, i64 0, i64 0
%42 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %42
%43 = getelementptr inbounds %-string, %-string* %42, i64 0, i32 0
%44 = getelementptr inbounds %-string, %-string* %42, i64 0, i32 1
store i8* %41, i8** %43
store i64 21, i64* %44
%45 = load %-string, %-string* %42
call void @print_string(%-string %45)
%46 = getelementptr inbounds [33 x i8], [33 x i8]* @.str9, i64 0, i64 0
%47 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %47
%48 = getelementptr inbounds %-string, %-string* %47, i64 0, i32 0
%49 = getelementptr inbounds %-string, %-string* %47, i64 0, i32 1
store i8* %46, i8** %48
store i64 33, i64* %49
%50 = load %-string, %-string* %47
call void @print_string(%-string %50)
%51 = getelementptr inbounds [29 x i8], [29 x i8]* @.stra, i64 0, i64 0
%52 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %52
%53 = getelementptr inbounds %-string, %-string* %52, i64 0, i32 0
%54 = getelementptr inbounds %-string, %-string* %52, i64 0, i32 1
store i8* %51, i8** %53
store i64 29, i64* %54
%55 = load %-string, %-string* %52
call void @print_string(%-string %55)
%56 = getelementptr inbounds [24 x i8], [24 x i8]* @.strb, i64 0, i64 0
%57 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %57
%58 = getelementptr inbounds %-string, %-string* %57, i64 0, i32 0
%59 = getelementptr inbounds %-string, %-string* %57, i64 0, i32 1
store i8* %56, i8** %58
store i64 24, i64* %59
%60 = load %-string, %-string* %57
call void @print_string(%-string %60)
%61 = getelementptr inbounds [42 x i8], [42 x i8]* @.strc, i64 0, i64 0
%62 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %62
%63 = getelementptr inbounds %-string, %-string* %62, i64 0, i32 0
%64 = getelementptr inbounds %-string, %-string* %62, i64 0, i32 1
store i8* %61, i8** %63
store i64 42, i64* %64
%65 = load %-string, %-string* %62
call void @print_string(%-string %65)
%66 = getelementptr inbounds [21 x i8], [21 x i8]* @.strd, i64 0, i64 0
%67 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %67
%68 = getelementptr inbounds %-string, %-string* %67, i64 0, i32 0
%69 = getelementptr inbounds %-string, %-string* %67, i64 0, i32 1
store i8* %66, i8** %68
store i64 21, i64* %69
%70 = load %-string, %-string* %67
call void @print_string(%-string %70)
ret void
}
@@ -32,10 +148,10 @@ define void @print_string(%-string %s) {
"for.body - 1":
%2 = alloca i32, align 4 ; c
store i32 zeroinitializer, i32* %2
%3 = load i64, i64* %1
%4 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%5 = load i8*, i8** %4
%6 = getelementptr i8, i8* %5, i64 %3
%3 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%4 = load i8*, i8** %3
%5 = load i64, i64* %1
%6 = getelementptr i8, i8* %4, i64 %5
%7 = load i8, i8* %6
%8 = zext i8 %7 to i32
store i32 %8, i32* %2
@@ -76,29 +192,29 @@ define void @string_byte_reverse(%-string %s) {
br label %"for.loop - 2"
"for.body - 1":
%5 = load i64, i64* %4
%6 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%7 = load i8*, i8** %6
%8 = getelementptr i8, i8* %7, i64 %5
%9 = load i64, i64* %4
%10 = load i64, i64* %1
%11 = sub i64 %10, 1
%12 = sub i64 %11, %9
%13 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%14 = load i8*, i8** %13
%15 = getelementptr i8, i8* %14, i64 %12
%16 = load i64, i64* %4
%17 = load i64, i64* %1
%18 = sub i64 %17, 1
%19 = sub i64 %18, %16
%20 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%21 = load i8*, i8** %20
%22 = getelementptr i8, i8* %21, i64 %19
%5 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%6 = load i8*, i8** %5
%7 = load i64, i64* %4
%8 = getelementptr i8, i8* %6, i64 %7
%9 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%10 = load i8*, i8** %9
%11 = load i64, i64* %4
%12 = load i64, i64* %1
%13 = sub i64 %12, 1
%14 = sub i64 %13, %11
%15 = getelementptr i8, i8* %10, i64 %14
%16 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%17 = load i8*, i8** %16
%18 = load i64, i64* %4
%19 = load i64, i64* %1
%20 = sub i64 %19, 1
%21 = sub i64 %20, %18
%22 = getelementptr i8, i8* %17, i64 %21
%23 = load i8, i8* %22
%24 = load i64, i64* %4
%25 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%26 = load i8*, i8** %25
%27 = getelementptr i8, i8* %26, i64 %24
%24 = getelementptr inbounds %-string, %-string* %0, i64 0, i32 0
%25 = load i8*, i8** %24
%26 = load i64, i64* %4
%27 = getelementptr i8, i8* %25, i64 %26
%28 = load i8, i8* %27
store i8 %23, i8* %8
store i8 %28, i8* %15
@@ -129,139 +245,140 @@ define void @print_int(i64 %i, i64 %base) {
%1 = alloca i64, align 8 ; base
store i64 zeroinitializer, i64* %1
store i64 %base, i64* %1
%2 = alloca %-string, align 8 ; NUM_TO_CHAR_TABLE
store %-string zeroinitializer, %-string* %2
%3 = getelementptr inbounds [64 x i8], [64 x i8]* @.str1, i64 0, i64 0
%4 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %4
%5 = getelementptr inbounds %-string, %-string* %4, i64 0, i32 0
%6 = getelementptr inbounds %-string, %-string* %4, i64 0, i32 1
store i8* %3, i8** %5
store i64 64, i64* %6
%7 = load %-string, %-string* %4
store %-string %7, %-string* %2
%8 = alloca [21 x i8], align 1 ; buf
store [21 x i8] zeroinitializer, [21 x i8]* %8
%9 = alloca i64, align 8 ; len
store i64 zeroinitializer, i64* %9
store i64 0, i64* %9
%10 = alloca i1, align 1 ; negative
store i1 zeroinitializer, i1* %10
store i1 false, i1* %10
%11 = load i64, i64* %0
%12 = icmp slt i64 %11, 0
br i1 %12, label %"if.then - 1", label %"if.done - 2"
%2 = alloca [21 x i8], align 1 ; buf
store [21 x i8] zeroinitializer, [21 x i8]* %2
%3 = alloca i64, align 8 ; len
store i64 zeroinitializer, i64* %3
store i64 0, i64* %3
%4 = alloca i1, align 1 ; negative
store i1 zeroinitializer, i1* %4
store i1 false, i1* %4
%5 = load i64, i64* %0
%6 = icmp slt i64 %5, 0
br i1 %6, label %"if.then - 1", label %"if.done - 2"
"if.then - 1":
store i1 true, i1* %10
%13 = load i64, i64* %0
%14 = sub i64 0, %13
store i64 %14, i64* %0
store i1 true, i1* %4
%7 = load i64, i64* %0
%8 = sub i64 0, %7
store i64 %8, i64* %0
br label %"if.done - 2"
"if.done - 2":
%15 = load i64, i64* %0
%16 = icmp sgt i64 %15, 0
br i1 %16, label %"if.then - 3", label %"if.else - 4"
%9 = load i64, i64* %0
%10 = icmp sgt i64 %9, 0
br i1 %10, label %"if.then - 3", label %"if.else - 4"
"if.then - 3":
br label %"for.loop - 6"
"if.else - 4":
%17 = load i64, i64* %9
%18 = getelementptr inbounds [21 x i8], [21 x i8]* %8, i64 0, i64 0
%19 = getelementptr i8, i8* %18, i64 %17
store i8 0, i8* %19
%20 = load i64, i64* %9
%21 = add i64 %20, 1
store i64 %21, i64* %9
%11 = getelementptr inbounds [21 x i8], [21 x i8]* %2, i64 0, i64 0
%12 = load i64, i64* %3
%13 = getelementptr i8, i8* %11, i64 %12
store i8 0, i8* %13
%14 = load i64, i64* %3
%15 = add i64 %14, 1
store i64 %15, i64* %3
br label %"if.done - 8"
"for.body - 5":
%22 = alloca i8, align 1 ; c
store i8 zeroinitializer, i8* %22
%23 = load i64, i64* %1
%24 = load i64, i64* %0
%25 = srem i64 %24, %23
%26 = getelementptr inbounds %-string, %-string* %2, i64 0, i32 0
%27 = load i8*, i8** %26
%28 = getelementptr i8, i8* %27, i64 %25
%29 = load i8, i8* %28
store i8 %29, i8* %22
%30 = load i64, i64* %9
%31 = getelementptr inbounds [21 x i8], [21 x i8]* %8, i64 0, i64 0
%32 = getelementptr i8, i8* %31, i64 %30
%33 = load i8, i8* %22
store i8 %33, i8* %32
%34 = load i64, i64* %9
%35 = add i64 %34, 1
store i64 %35, i64* %9
%36 = load i64, i64* %1
%37 = load i64, i64* %0
%38 = sdiv i64 %37, %36
store i64 %38, i64* %0
%16 = alloca i8, align 1 ; c
store i8 zeroinitializer, i8* %16
%17 = getelementptr inbounds [64 x i8], [64 x i8]* @.stre, i64 0, i64 0
%18 = load i64, i64* %1
%19 = load i64, i64* %0
%20 = srem i64 %19, %18
%21 = getelementptr i8, i8* %17, i64 %20
%22 = load i8, i8* %21
store i8 %22, i8* %16
%23 = getelementptr inbounds [21 x i8], [21 x i8]* %2, i64 0, i64 0
%24 = load i64, i64* %3
%25 = getelementptr i8, i8* %23, i64 %24
%26 = load i8, i8* %16
store i8 %26, i8* %25
%27 = load i64, i64* %3
%28 = add i64 %27, 1
store i64 %28, i64* %3
%29 = load i64, i64* %1
%30 = load i64, i64* %0
%31 = sdiv i64 %30, %29
store i64 %31, i64* %0
br label %"for.loop - 6"
"for.loop - 6":
%39 = load i64, i64* %0
%40 = icmp sgt i64 %39, 0
br i1 %40, label %"for.body - 5", label %"for.done - 7"
%32 = load i64, i64* %0
%33 = icmp sgt i64 %32, 0
br i1 %33, label %"for.body - 5", label %"for.done - 7"
"for.done - 7":
br label %"if.done - 8"
"if.done - 8":
%41 = load i1, i1* %10
br i1 %41, label %"if.then - 9", label %"if.done - 10"
%34 = load i1, i1* %4
br i1 %34, label %"if.then - 9", label %"if.done - 10"
"if.then - 9":
%42 = load i64, i64* %9
%43 = getelementptr inbounds [21 x i8], [21 x i8]* %8, i64 0, i64 0
%44 = getelementptr i8, i8* %43, i64 %42
store i8 0, i8* %44
%45 = load i64, i64* %9
%46 = add i64 %45, 1
store i64 %46, i64* %9
%35 = getelementptr inbounds [21 x i8], [21 x i8]* %2, i64 0, i64 0
%36 = load i64, i64* %3
%37 = getelementptr i8, i8* %35, i64 %36
store i8 0, i8* %37
%38 = load i64, i64* %3
%39 = add i64 %38, 1
store i64 %39, i64* %3
br label %"if.done - 10"
"if.done - 10":
%47 = alloca %-string, align 8 ; str
store %-string zeroinitializer, %-string* %47
%48 = load i64, i64* %9
%49 = sub i64 %48, 0
%50 = sub i64 21, 0
%51 = getelementptr inbounds [21 x i8], [21 x i8]* %8, i64 0, i64 0
%52 = getelementptr i8, i8* %51, i64 0
%53 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %53
%54 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %53, i64 0, i32 0
store i8* %52, i8** %54
%55 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %53, i64 0, i32 1
store i64 %49, i64* %55
%56 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %53, i64 0, i32 2
store i64 %50, i64* %56
%57 = load {i8*, i64, i64}, {i8*, i64, i64}* %53
%58 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %58
store {i8*, i64, i64} %57, {i8*, i64, i64}* %58
%59 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %58, i64 0, i32 0
%60 = load i8*, i8** %59
%61 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %58, i64 0, i32 1
%62 = load i64, i64* %61
%63 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %63
%64 = getelementptr inbounds %-string, %-string* %63, i64 0, i32 0
%65 = getelementptr inbounds %-string, %-string* %63, i64 0, i32 1
store i8* %60, i8** %64
store i64 %62, i64* %65
%66 = load %-string, %-string* %63
store %-string %66, %-string* %47
%67 = load %-string, %-string* %47
call void @string_byte_reverse(%-string %67)
%68 = load %-string, %-string* %47
call void @print_string(%-string %68)
%40 = alloca %-string, align 8 ; str
store %-string zeroinitializer, %-string* %40
%41 = load i64, i64* %3
%42 = sub i64 %41, 0
%43 = sub i64 21, 0
%44 = getelementptr inbounds [21 x i8], [21 x i8]* %2, i64 0, i64 0
%45 = getelementptr i8, i8* %44, i64 0
%46 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %46
%47 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %46, i64 0, i32 0
store i8* %45, i8** %47
%48 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %46, i64 0, i32 1
store i64 %42, i64* %48
%49 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %46, i64 0, i32 2
store i64 %43, i64* %49
%50 = load {i8*, i64, i64}, {i8*, i64, i64}* %46
%51 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %51
store {i8*, i64, i64} %50, {i8*, i64, i64}* %51
%52 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %51, i64 0, i32 0
%53 = load i8*, i8** %52
%54 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %51, i64 0, i32 1
%55 = load i64, i64* %54
%56 = alloca %-string, align 8
store %-string zeroinitializer, %-string* %56
%57 = getelementptr inbounds %-string, %-string* %56, i64 0, i32 0
%58 = getelementptr inbounds %-string, %-string* %56, i64 0, i32 1
store i8* %53, i8** %57
store i64 %55, i64* %58
%59 = load %-string, %-string* %56
store %-string %59, %-string* %40
%60 = load %-string, %-string* %40
call void @string_byte_reverse(%-string %60)
%61 = load %-string, %-string* %40
call void @print_string(%-string %61)
ret void
}
@.str0 = global [1 x i8] c"\0A"
@.str1 = global [64 x i8] c"0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz\40$"
@.str0 = global [6 x i8] c"Hello\0A"
@.str1 = global [1 x i8] c"\0A"
@.str2 = global [23 x i8] c"Chinese\20-\20\E4\BD\A0\E5\A5\BD\E4\B8\96\E7\95\8C\0A"
@.str3 = global [21 x i8] c"Dutch\20-\20Hello\20wereld\0A"
@.str4 = global [22 x i8] c"English\20-\20Hello\20world\0A"
@.str5 = global [23 x i8] c"French\20-\20Bonjour\20monde\0A"
@.str6 = global [20 x i8] c"German\20-\20Hallo\20Welt\0A"
@.str7 = global [37 x i8] c"Greek\20-\20\CE\B3\CE\B5\CE\B9\CE\AC\20\CF\83\CE\BF\CF\85\20\CE\BA\CF\8C\CF\83\CE\BC\CE\BF\CF\82\0A"
@.str8 = global [21 x i8] c"Italian\20-\20Ciao\20mondo\0A"
@.str9 = global [33 x i8] c"Japanese\20-\20\E3\81\93\E3\82\93\E3\81\AB\E3\81\A1\E3\81\AF\E4\B8\96\E7\95\8C\0A"
@.stra = global [29 x i8] c"Korean\20-\20\EC\97\AC\EB\B3\B4\EC\84\B8\EC\9A\94\20\EC\84\B8\EA\B3\84\0A"
@.strb = global [24 x i8] c"Portuguese\20-\20Ol\C3\A1\20mundo\0A"
@.strc = global [42 x i8] c"Russian\20-\20\D0\97\D0\B4\D1\80\D0\B0\D0\B2\D1\81\D1\82\D0\B2\D1\83\D0\BB\D1\82\D0\B5\20\D0\BC\D0\B8\D1\80\0A"
@.strd = global [21 x i8] c"Spanish\20-\20Hola\20mundo\0A"
@.stre = global [64 x i8] c"0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz\40$"
+15 -1
View File
@@ -1,6 +1,20 @@
import "basic"
main :: proc() {
print_int(123, 10);
a := cast(int)"Hello\n"[1];
print_int(a, 10);
print_string("\n");
print_string("Chinese - 你好世界\n");
print_string("Dutch - Hello wereld\n");
print_string("English - Hello world\n");
print_string("French - Bonjour monde\n");
print_string("German - Hallo Welt\n");
print_string("Greek - γειά σου κόσμος\n");
print_string("Italian - Ciao mondo\n");
print_string("Japanese - こんにちは世界\n");
print_string("Korean - 여보세요 세계\n");
print_string("Portuguese - Olá mundo\n");
print_string("Russian - Здравствулте мир\n");
print_string("Spanish - Hola mundo\n");
}