ed/Odin
1
0
Fork 0
mirror of https://github.com/Ed94/Odin.git synced 2026-07-28 10:20:05 +00:00
Code Issues Packages Projects Releases Wiki Activity

copy(...)

Browse Source
This commit is contained in:
gingerBill
2016-08-10 20:07:24 +01:00
parent 153c27c755
commit 4c467b118d
10 changed files with 710 additions and 337 deletions
Download Patch File Download Diff File Expand all files Collapse all files
examples/basic.odin
+19 -17
View File
@@ -14,17 +14,18 @@ string_byte_reverse :: proc(s: string) {
}
}
encode_rune :: proc(buf : []u8, r : rune) -> int {
encode_rune :: proc(r : rune) -> ([4]u8, int) {
buf : [4]u8;
i := cast(u32)r;
mask : u8 : 0x3f;
if i <= 1<<7-1 {
buf[0] = cast(u8)r;
return 1;
return buf, 1;
}
if i <= 1<<11-1 {
buf[0] = 0xc0 | cast(u8)(r>>6);
buf[1] = 0x80 | cast(u8)(r)&mask;
return 2;
return buf, 2;
}
// Invalid or Surrogate range
@@ -37,26 +38,28 @@ encode_rune :: proc(buf : []u8, r : rune) -> int {
buf[0] = 0xe0 | cast(u8)(r>>12);
buf[1] = 0x80 | cast(u8)(r>>6)&mask;
buf[2] = 0x80 | cast(u8)(r)&mask;
return 3;
return buf, 3;
}
buf[0] = 0xf0 | cast(u8)(r>>18);
buf[1] = 0x80 | cast(u8)(r>>12)&mask;
buf[2] = 0x80 | cast(u8)(r>>6)&mask;
buf[3] = 0x80 | cast(u8)(r)&mask;
return 4;
return buf, 4;
}
print_rune :: proc(r : rune) {
buf : [4]u8;
n := encode_rune(buf[:], r);
buf, n := encode_rune(r);
str := cast(string)buf[:n];
print_string(str);
}
print_int :: proc(i, base : int) {
print_int :: proc(i : int) {
print_int_base(i, 10);
}
print_int_base :: proc(i, base : int) {
NUM_TO_CHAR_TABLE :: "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz@$";
NEG :: "-";
buf: [21]u8;
len := 0;
@@ -65,17 +68,16 @@ print_int :: proc(i, base : int) {
negative = true;
i = -i;
}
if i > 0 {
for i > 0 {
c : u8 = NUM_TO_CHAR_TABLE[i % base];
buf[len] = c;
len++;
i /= base;
}
} else {
if i == 0 {
buf[len] = '0';
len++;
}
for i > 0 {
c : u8 = NUM_TO_CHAR_TABLE[i % base];
buf[len] = c;
len++;
i /= base;
}
if negative {
buf[len] = '-';
examples/main.ll
+394 -225
View File
@@ -2,56 +2,197 @@
%.rawptr = type i8* ; Basic_rawptr
define {i64, i64} @tuple() {
"entry - 0":
%0 = alloca {i64, i64}, align 8
store {i64, i64} zeroinitializer, {i64, i64}* %0
%1 = getelementptr inbounds {i64, i64}, {i64, i64}* %0, i64 0, i32 0
store i64 1, i64* %1
%2 = getelementptr inbounds {i64, i64}, {i64, i64}* %0, i64 0, i32 1
store i64 2, i64* %2
%3 = load {i64, i64}, {i64, i64}* %0
ret {i64, i64} %3
}
declare void @llvm.memmove.p0i8.p0i8.i64(i8*, i8*, i64, i32, i1)
define void @main() {
"entry - 0":
%0 = alloca i64, align 8 ; a
store i64 zeroinitializer, i64* %0
%1 = alloca i64, align 8 ; b
store i64 zeroinitializer, i64* %1
%2 = call {i64, i64} @tuple()
%3 = alloca {i64, i64}, align 8
store {i64, i64} zeroinitializer, {i64, i64}* %3
store {i64, i64} %2, {i64, i64}* %3
%4 = getelementptr inbounds {i64, i64}, {i64, i64}* %3, i64 0, i32 0
%5 = load i64, i64* %4
%6 = getelementptr inbounds {i64, i64}, {i64, i64}* %3, i64 0, i32 1
%7 = load i64, i64* %6
store i64 %5, i64* %0
store i64 %7, i64* %1
%8 = load i64, i64* %0
call void @print_int(i64 %8, i64 10)
%9 = getelementptr inbounds [1 x i8], [1 x i8]* @.str0, i64 0, i64 0
%10 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %10
%11 = getelementptr inbounds %.string, %.string* %10, i64 0, i32 0
%12 = getelementptr inbounds %.string, %.string* %10, i64 0, i32 1
store i8* %9, i8** %11
store i64 1, i64* %12
%13 = load %.string, %.string* %10
call void @print_string(%.string %13)
%14 = load i64, i64* %1
call void @print_int(i64 %14, i64 10)
%15 = getelementptr inbounds [1 x i8], [1 x i8]* @.str1, i64 0, i64 0
%16 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %16
%17 = getelementptr inbounds %.string, %.string* %16, i64 0, i32 0
%18 = getelementptr inbounds %.string, %.string* %16, i64 0, i32 1
store i8* %15, i8** %17
store i64 1, i64* %18
%19 = load %.string, %.string* %16
call void @print_string(%.string %19)
%0 = alloca [4 x i64], align 8 ; dst
store [4 x i64] zeroinitializer, [4 x i64]* %0
%1 = alloca [2 x i64], align 8 ; src
store [2 x i64] zeroinitializer, [2 x i64]* %1
%2 = getelementptr inbounds [2 x i64], [2 x i64]* %1, i64 0, i64 0
%3 = getelementptr i64, i64* %2, i64 0
store i64 7, i64* %3
%4 = getelementptr inbounds [2 x i64], [2 x i64]* %1, i64 0, i64 0
%5 = getelementptr i64, i64* %4, i64 1
store i64 5, i64* %5
%6 = sub i64 4, 1
%7 = sub i64 4, 1
%8 = getelementptr inbounds [4 x i64], [4 x i64]* %0, i64 0, i64 0
%9 = getelementptr i64, i64* %8, i64 1
%10 = alloca {i64*, i64, i64}, align 8
store {i64*, i64, i64} zeroinitializer, {i64*, i64, i64}* %10
%11 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %10, i64 0, i32 0
store i64* %9, i64** %11
%12 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %10, i64 0, i32 1
store i64 %6, i64* %12
%13 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %10, i64 0, i32 2
store i64 %7, i64* %13
%14 = sub i64 2, 0
%15 = sub i64 2, 0
%16 = getelementptr inbounds [2 x i64], [2 x i64]* %1, i64 0, i64 0
%17 = getelementptr i64, i64* %16, i64 0
%18 = alloca {i64*, i64, i64}, align 8
store {i64*, i64, i64} zeroinitializer, {i64*, i64, i64}* %18
%19 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %18, i64 0, i32 0
store i64* %17, i64** %19
%20 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %18, i64 0, i32 1
store i64 %14, i64* %20
%21 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %18, i64 0, i32 2
store i64 %15, i64* %21
%22 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %10, i64 0, i32 0
%23 = load i64*, i64** %22
%24 = bitcast i64* %23 to %.rawptr
%25 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %18, i64 0, i32 0
%26 = load i64*, i64** %25
%27 = bitcast i64* %26 to %.rawptr
%28 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %10, i64 0, i32 1
%29 = load i64, i64* %28
%30 = getelementptr inbounds {i64*, i64, i64}, {i64*, i64, i64}* %18, i64 0, i32 1
%31 = load i64, i64* %30
%32 = icmp slt i64 %29, %31
%33 = select i1 %32, i64 %29, i64 %31
%34 = mul i64 %33, 8
call void @llvm.memmove.p0i8.p0i8.i64(i8* %24, i8* %27, i64 %34, i32 8, i1 false)
%35 = alloca i64, align 8 ; i
store i64 zeroinitializer, i64* %35
store i64 0, i64* %35
br label %"for.loop - 2"
"for.body - 1":
%36 = getelementptr inbounds [4 x i64], [4 x i64]* %0, i64 0, i64 0
%37 = load i64, i64* %35
%38 = getelementptr i64, i64* %36, i64 %37
%39 = load i64, i64* %38
call void @print_int(i64 %39)
br label %"for.post - 3"
"for.loop - 2":
%40 = load i64, i64* %35
%41 = icmp slt i64 %40, 4
br i1 %41, label %"for.body - 1", label %"for.done - 4"
"for.post - 3":
%42 = load i64, i64* %35
%43 = add i64 %42, 1
store i64 %43, i64* %35
br label %"for.loop - 2"
"for.done - 4":
br i1 false, label %"if.then - 5", label %"if.done - 6"
"if.then - 5":
%44 = getelementptr inbounds [26 x i8], [26 x i8]* @.str0, i64 0, i64 0
%45 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %45
%46 = getelementptr inbounds %.string, %.string* %45, i64 0, i32 0
%47 = getelementptr inbounds %.string, %.string* %45, i64 0, i32 1
store i8* %44, i8** %46
store i64 26, i64* %47
%48 = load %.string, %.string* %45
call void @print_string(%.string %48)
%49 = getelementptr inbounds [26 x i8], [26 x i8]* @.str1, i64 0, i64 0
%50 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %50
%51 = getelementptr inbounds %.string, %.string* %50, i64 0, i32 0
%52 = getelementptr inbounds %.string, %.string* %50, i64 0, i32 1
store i8* %49, i8** %51
store i64 26, i64* %52
%53 = load %.string, %.string* %50
call void @print_string(%.string %53)
%54 = getelementptr inbounds [25 x i8], [25 x i8]* @.str2, i64 0, i64 0
%55 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %55
%56 = getelementptr inbounds %.string, %.string* %55, i64 0, i32 0
%57 = getelementptr inbounds %.string, %.string* %55, i64 0, i32 1
store i8* %54, i8** %56
store i64 25, i64* %57
%58 = load %.string, %.string* %55
call void @print_string(%.string %58)
%59 = getelementptr inbounds [27 x i8], [27 x i8]* @.str3, i64 0, i64 0
%60 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %60
%61 = getelementptr inbounds %.string, %.string* %60, i64 0, i32 0
%62 = getelementptr inbounds %.string, %.string* %60, i64 0, i32 1
store i8* %59, i8** %61
store i64 27, i64* %62
%63 = load %.string, %.string* %60
call void @print_string(%.string %63)
%64 = getelementptr inbounds [24 x i8], [24 x i8]* @.str4, i64 0, i64 0
%65 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %65
%66 = getelementptr inbounds %.string, %.string* %65, i64 0, i32 0
%67 = getelementptr inbounds %.string, %.string* %65, i64 0, i32 1
store i8* %64, i8** %66
store i64 24, i64* %67
%68 = load %.string, %.string* %65
call void @print_string(%.string %68)
%69 = getelementptr inbounds [42 x i8], [42 x i8]* @.str5, i64 0, i64 0
%70 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %70
%71 = getelementptr inbounds %.string, %.string* %70, i64 0, i32 0
%72 = getelementptr inbounds %.string, %.string* %70, i64 0, i32 1
store i8* %69, i8** %71
store i64 42, i64* %72
%73 = load %.string, %.string* %70
call void @print_string(%.string %73)
%74 = getelementptr inbounds [24 x i8], [24 x i8]* @.str6, i64 0, i64 0
%75 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %75
%76 = getelementptr inbounds %.string, %.string* %75, i64 0, i32 0
%77 = getelementptr inbounds %.string, %.string* %75, i64 0, i32 1
store i8* %74, i8** %76
store i64 24, i64* %77
%78 = load %.string, %.string* %75
call void @print_string(%.string %78)
%79 = getelementptr inbounds [35 x i8], [35 x i8]* @.str7, i64 0, i64 0
%80 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %80
%81 = getelementptr inbounds %.string, %.string* %80, i64 0, i32 0
%82 = getelementptr inbounds %.string, %.string* %80, i64 0, i32 1
store i8* %79, i8** %81
store i64 35, i64* %82
%83 = load %.string, %.string* %80
call void @print_string(%.string %83)
%84 = getelementptr inbounds [33 x i8], [33 x i8]* @.str8, i64 0, i64 0
%85 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %85
%86 = getelementptr inbounds %.string, %.string* %85, i64 0, i32 0
%87 = getelementptr inbounds %.string, %.string* %85, i64 0, i32 1
store i8* %84, i8** %86
store i64 33, i64* %87
%88 = load %.string, %.string* %85
call void @print_string(%.string %88)
%89 = getelementptr inbounds [24 x i8], [24 x i8]* @.str9, i64 0, i64 0
%90 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %90
%91 = getelementptr inbounds %.string, %.string* %90, i64 0, i32 0
%92 = getelementptr inbounds %.string, %.string* %90, i64 0, i32 1
store i8* %89, i8** %91
store i64 24, i64* %92
%93 = load %.string, %.string* %90
call void @print_string(%.string %93)
%94 = getelementptr inbounds [45 x i8], [45 x i8]* @.stra, i64 0, i64 0
%95 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %95
%96 = getelementptr inbounds %.string, %.string* %95, i64 0, i32 0
%97 = getelementptr inbounds %.string, %.string* %95, i64 0, i32 1
store i8* %94, i8** %96
store i64 45, i64* %97
%98 = load %.string, %.string* %95
call void @print_string(%.string %98)
%99 = getelementptr inbounds [24 x i8], [24 x i8]* @.strb, i64 0, i64 0
%100 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %100
%101 = getelementptr inbounds %.string, %.string* %100, i64 0, i32 0
%102 = getelementptr inbounds %.string, %.string* %100, i64 0, i32 1
store i8* %99, i8** %101
store i64 24, i64* %102
%103 = load %.string, %.string* %100
call void @print_string(%.string %103)
br label %"if.done - 6"
"if.done - 6":
ret void
}
@@ -159,143 +300,164 @@ define void @string_byte_reverse(%.string %s) {
ret void
}
define i64 @encode_rune({i8*, i64, i64} %buf, i32 %r) {
define {[4 x i8], i64} @encode_rune(i32 %r) {
"entry - 0":
%0 = alloca {i8*, i64, i64}, align 8 ; buf
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %0
store {i8*, i64, i64} %buf, {i8*, i64, i64}* %0
%1 = alloca i32, align 4 ; r
store i32 zeroinitializer, i32* %1
store i32 %r, i32* %1
%0 = alloca i32, align 4 ; r
store i32 zeroinitializer, i32* %0
store i32 %r, i32* %0
%1 = alloca [4 x i8], align 1 ; buf
store [4 x i8] zeroinitializer, [4 x i8]* %1
%2 = alloca i32, align 4 ; i
store i32 zeroinitializer, i32* %2
%3 = load i32, i32* %1
%3 = load i32, i32* %0
store i32 %3, i32* %2
%4 = load i32, i32* %2
%5 = icmp ule i32 %4, 127
br i1 %5, label %"if.then - 1", label %"if.done - 2"
"if.then - 1":
%6 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%7 = load i8*, i8** %6
%8 = getelementptr i8, i8* %7, i64 0
%9 = load i32, i32* %1
%10 = trunc i32 %9 to i8
store i8 %10, i8* %8
ret i64 1
%6 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%7 = getelementptr i8, i8* %6, i64 0
%8 = load i32, i32* %0
%9 = trunc i32 %8 to i8
store i8 %9, i8* %7
%10 = alloca {[4 x i8], i64}, align 8
store {[4 x i8], i64} zeroinitializer, {[4 x i8], i64}* %10
%11 = load [4 x i8], [4 x i8]* %1
%12 = getelementptr inbounds {[4 x i8], i64}, {[4 x i8], i64}* %10, i64 0, i32 0
store [4 x i8] %11, [4 x i8]* %12
%13 = getelementptr inbounds {[4 x i8], i64}, {[4 x i8], i64}* %10, i64 0, i32 1
store i64 1, i64* %13
%14 = load {[4 x i8], i64}, {[4 x i8], i64}* %10
ret {[4 x i8], i64} %14
"if.done - 2":
%11 = load i32, i32* %2
%12 = icmp ule i32 %11, 2047
br i1 %12, label %"if.then - 3", label %"if.done - 4"
%15 = load i32, i32* %2
%16 = icmp ule i32 %15, 2047
br i1 %16, label %"if.then - 3", label %"if.done - 4"
"if.then - 3":
%13 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%14 = load i8*, i8** %13
%15 = getelementptr i8, i8* %14, i64 0
%16 = load i32, i32* %1
%17 = lshr i32 %16, 6
%18 = trunc i32 %17 to i8
%19 = or i8 192, %18
store i8 %19, i8* %15
%20 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%21 = load i8*, i8** %20
%22 = getelementptr i8, i8* %21, i64 1
%23 = load i32, i32* %1
%24 = trunc i32 %23 to i8
%25 = and i8 %24, 63
%26 = or i8 128, %25
store i8 %26, i8* %22
ret i64 2
%17 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%18 = getelementptr i8, i8* %17, i64 0
%19 = load i32, i32* %0
%20 = lshr i32 %19, 6
%21 = trunc i32 %20 to i8
%22 = or i8 192, %21
store i8 %22, i8* %18
%23 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%24 = getelementptr i8, i8* %23, i64 1
%25 = load i32, i32* %0
%26 = trunc i32 %25 to i8
%27 = and i8 %26, 63
%28 = or i8 128, %27
store i8 %28, i8* %24
%29 = alloca {[4 x i8], i64}, align 8
store {[4 x i8], i64} zeroinitializer, {[4 x i8], i64}* %29
%30 = load [4 x i8], [4 x i8]* %1
%31 = getelementptr inbounds {[4 x i8], i64}, {[4 x i8], i64}* %29, i64 0, i32 0
store [4 x i8] %30, [4 x i8]* %31
%32 = getelementptr inbounds {[4 x i8], i64}, {[4 x i8], i64}* %29, i64 0, i32 1
store i64 2, i64* %32
%33 = load {[4 x i8], i64}, {[4 x i8], i64}* %29
ret {[4 x i8], i64} %33
"if.done - 4":
%27 = load i32, i32* %2
%28 = icmp ugt i32 %27, 1114111
br i1 %28, label %"if.then - 5", label %"cmp-or - 6"
%34 = load i32, i32* %2
%35 = icmp ugt i32 %34, 1114111
br i1 %35, label %"if.then - 5", label %"cmp-or - 6"
"if.then - 5":
store i32 65533, i32* %1
store i32 65533, i32* %0
br label %"if.done - 8"
"cmp-or - 6":
%29 = load i32, i32* %2
%30 = icmp uge i32 %29, 55296
br i1 %30, label %"cmp-and - 7", label %"if.done - 8"
%36 = load i32, i32* %2
%37 = icmp uge i32 %36, 55296
br i1 %37, label %"cmp-and - 7", label %"if.done - 8"
"cmp-and - 7":
%31 = load i32, i32* %2
%32 = icmp ule i32 %31, 57343
br i1 %32, label %"if.then - 5", label %"if.done - 8"
%38 = load i32, i32* %2
%39 = icmp ule i32 %38, 57343
br i1 %39, label %"if.then - 5", label %"if.done - 8"
"if.done - 8":
%33 = load i32, i32* %2
%34 = icmp ule i32 %33, 65535
br i1 %34, label %"if.then - 9", label %"if.done - 10"
%40 = load i32, i32* %2
%41 = icmp ule i32 %40, 65535
br i1 %41, label %"if.then - 9", label %"if.done - 10"
"if.then - 9":
%35 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%36 = load i8*, i8** %35
%37 = getelementptr i8, i8* %36, i64 0
%38 = load i32, i32* %1
%39 = lshr i32 %38, 12
%40 = trunc i32 %39 to i8
%41 = or i8 224, %40
store i8 %41, i8* %37
%42 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%43 = load i8*, i8** %42
%44 = getelementptr i8, i8* %43, i64 1
%45 = load i32, i32* %1
%46 = lshr i32 %45, 6
%47 = trunc i32 %46 to i8
%48 = and i8 %47, 63
%49 = or i8 128, %48
store i8 %49, i8* %44
%50 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%51 = load i8*, i8** %50
%52 = getelementptr i8, i8* %51, i64 2
%53 = load i32, i32* %1
%54 = trunc i32 %53 to i8
%55 = and i8 %54, 63
%56 = or i8 128, %55
store i8 %56, i8* %52
ret i64 3
%42 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%43 = getelementptr i8, i8* %42, i64 0
%44 = load i32, i32* %0
%45 = lshr i32 %44, 12
%46 = trunc i32 %45 to i8
%47 = or i8 224, %46
store i8 %47, i8* %43
%48 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%49 = getelementptr i8, i8* %48, i64 1
%50 = load i32, i32* %0
%51 = lshr i32 %50, 6
%52 = trunc i32 %51 to i8
%53 = and i8 %52, 63
%54 = or i8 128, %53
store i8 %54, i8* %49
%55 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%56 = getelementptr i8, i8* %55, i64 2
%57 = load i32, i32* %0
%58 = trunc i32 %57 to i8
%59 = and i8 %58, 63
%60 = or i8 128, %59
store i8 %60, i8* %56
%61 = alloca {[4 x i8], i64}, align 8
store {[4 x i8], i64} zeroinitializer, {[4 x i8], i64}* %61
%62 = load [4 x i8], [4 x i8]* %1
%63 = getelementptr inbounds {[4 x i8], i64}, {[4 x i8], i64}* %61, i64 0, i32 0
store [4 x i8] %62, [4 x i8]* %63
%64 = getelementptr inbounds {[4 x i8], i64}, {[4 x i8], i64}* %61, i64 0, i32 1
store i64 3, i64* %64
%65 = load {[4 x i8], i64}, {[4 x i8], i64}* %61
ret {[4 x i8], i64} %65
"if.done - 10":
%57 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%58 = load i8*, i8** %57
%59 = getelementptr i8, i8* %58, i64 0
%60 = load i32, i32* %1
%61 = lshr i32 %60, 18
%62 = trunc i32 %61 to i8
%63 = or i8 240, %62
store i8 %63, i8* %59
%64 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%65 = load i8*, i8** %64
%66 = getelementptr i8, i8* %65, i64 1
%67 = load i32, i32* %1
%68 = lshr i32 %67, 12
%69 = trunc i32 %68 to i8
%70 = and i8 %69, 63
%71 = or i8 128, %70
store i8 %71, i8* %66
%72 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%73 = load i8*, i8** %72
%74 = getelementptr i8, i8* %73, i64 2
%75 = load i32, i32* %1
%76 = lshr i32 %75, 6
%77 = trunc i32 %76 to i8
%78 = and i8 %77, 63
%79 = or i8 128, %78
store i8 %79, i8* %74
%80 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %0, i64 0, i32 0
%81 = load i8*, i8** %80
%82 = getelementptr i8, i8* %81, i64 3
%83 = load i32, i32* %1
%84 = trunc i32 %83 to i8
%85 = and i8 %84, 63
%86 = or i8 128, %85
store i8 %86, i8* %82
ret i64 4
%66 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%67 = getelementptr i8, i8* %66, i64 0
%68 = load i32, i32* %0
%69 = lshr i32 %68, 18
%70 = trunc i32 %69 to i8
%71 = or i8 240, %70
store i8 %71, i8* %67
%72 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%73 = getelementptr i8, i8* %72, i64 1
%74 = load i32, i32* %0
%75 = lshr i32 %74, 12
%76 = trunc i32 %75 to i8
%77 = and i8 %76, 63
%78 = or i8 128, %77
store i8 %78, i8* %73
%79 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%80 = getelementptr i8, i8* %79, i64 2
%81 = load i32, i32* %0
%82 = lshr i32 %81, 6
%83 = trunc i32 %82 to i8
%84 = and i8 %83, 63
%85 = or i8 128, %84
store i8 %85, i8* %80
%86 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%87 = getelementptr i8, i8* %86, i64 3
%88 = load i32, i32* %0
%89 = trunc i32 %88 to i8
%90 = and i8 %89, 63
%91 = or i8 128, %90
store i8 %91, i8* %87
%92 = alloca {[4 x i8], i64}, align 8
store {[4 x i8], i64} zeroinitializer, {[4 x i8], i64}* %92
%93 = load [4 x i8], [4 x i8]* %1
%94 = getelementptr inbounds {[4 x i8], i64}, {[4 x i8], i64}* %92, i64 0, i32 0
store [4 x i8] %93, [4 x i8]* %94
%95 = getelementptr inbounds {[4 x i8], i64}, {[4 x i8], i64}* %92, i64 0, i32 1
store i64 4, i64* %95
%96 = load {[4 x i8], i64}, {[4 x i8], i64}* %92
ret {[4 x i8], i64} %96
}
define void @print_rune(i32 %r) {
@@ -307,59 +469,59 @@ define void @print_rune(i32 %r) {
store [4 x i8] zeroinitializer, [4 x i8]* %1
%2 = alloca i64, align 8 ; n
store i64 zeroinitializer, i64* %2
%3 = sub i64 4, 0
%4 = sub i64 4, 0
%5 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%6 = getelementptr i8, i8* %5, i64 0
%7 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %7
%8 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %7, i64 0, i32 0
store i8* %6, i8** %8
%9 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %7, i64 0, i32 1
store i64 %3, i64* %9
%10 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %7, i64 0, i32 2
store i64 %4, i64* %10
%11 = load {i8*, i64, i64}, {i8*, i64, i64}* %7
%12 = load i32, i32* %0
%13 = call i64 @encode_rune({i8*, i64, i64} %11, i32 %12)
store i64 %13, i64* %2
%14 = alloca %.string, align 8 ; str
store %.string zeroinitializer, %.string* %14
%15 = load i64, i64* %2
%16 = sub i64 %15, 0
%17 = sub i64 4, 0
%18 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%19 = getelementptr i8, i8* %18, i64 0
%20 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %20
%21 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %20, i64 0, i32 0
store i8* %19, i8** %21
%22 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %20, i64 0, i32 1
store i64 %16, i64* %22
%23 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %20, i64 0, i32 2
store i64 %17, i64* %23
%24 = load {i8*, i64, i64}, {i8*, i64, i64}* %20
%25 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %25
store {i8*, i64, i64} %24, {i8*, i64, i64}* %25
%26 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %25, i64 0, i32 0
%27 = load i8*, i8** %26
%28 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %25, i64 0, i32 1
%29 = load i64, i64* %28
%30 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %30
%31 = getelementptr inbounds %.string, %.string* %30, i64 0, i32 0
%32 = getelementptr inbounds %.string, %.string* %30, i64 0, i32 1
store i8* %27, i8** %31
store i64 %29, i64* %32
%33 = load %.string, %.string* %30
store %.string %33, %.string* %14
%34 = load %.string, %.string* %14
call void @print_string(%.string %34)
%3 = load i32, i32* %0
%4 = call {[4 x i8], i64} @encode_rune(i32 %3)
%5 = extractvalue {[4 x i8], i64} %4, 0
%6 = extractvalue {[4 x i8], i64} %4, 1
store [4 x i8] %5, [4 x i8]* %1
store i64 %6, i64* %2
%7 = alloca %.string, align 8 ; str
store %.string zeroinitializer, %.string* %7
%8 = load i64, i64* %2
%9 = sub i64 %8, 0
%10 = sub i64 4, 0
%11 = getelementptr inbounds [4 x i8], [4 x i8]* %1, i64 0, i64 0
%12 = getelementptr i8, i8* %11, i64 0
%13 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %13
%14 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %13, i64 0, i32 0
store i8* %12, i8** %14
%15 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %13, i64 0, i32 1
store i64 %9, i64* %15
%16 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %13, i64 0, i32 2
store i64 %10, i64* %16
%17 = load {i8*, i64, i64}, {i8*, i64, i64}* %13
%18 = alloca {i8*, i64, i64}, align 8
store {i8*, i64, i64} zeroinitializer, {i8*, i64, i64}* %18
store {i8*, i64, i64} %17, {i8*, i64, i64}* %18
%19 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %18, i64 0, i32 0
%20 = load i8*, i8** %19
%21 = getelementptr inbounds {i8*, i64, i64}, {i8*, i64, i64}* %18, i64 0, i32 1
%22 = load i64, i64* %21
%23 = alloca %.string, align 8
store %.string zeroinitializer, %.string* %23
%24 = getelementptr inbounds %.string, %.string* %23, i64 0, i32 0
%25 = getelementptr inbounds %.string, %.string* %23, i64 0, i32 1
store i8* %20, i8** %24
store i64 %22, i64* %25
%26 = load %.string, %.string* %23
store %.string %26, %.string* %7
%27 = load %.string, %.string* %7
call void @print_string(%.string %27)
ret void
}
define void @print_int(i64 %i, i64 %base) {
define void @print_int(i64 %i) {
"entry - 0":
%0 = alloca i64, align 8 ; i
store i64 zeroinitializer, i64* %0
store i64 %i, i64* %0
%1 = load i64, i64* %0
call void @print_int_base(i64 %1, i64 10)
ret void
}
define void @print_int_base(i64 %i, i64 %base) {
"entry - 0":
%0 = alloca i64, align 8 ; i
store i64 zeroinitializer, i64* %0
@@ -388,26 +550,26 @@ define void @print_int(i64 %i, i64 %base) {
"if.done - 2":
%9 = load i64, i64* %0
%10 = icmp sgt i64 %9, 0
br i1 %10, label %"if.then - 3", label %"if.else - 4"
%10 = icmp eq i64 %9, 0
br i1 %10, label %"if.then - 3", label %"if.done - 4"
"if.then - 3":
br label %"for.loop - 6"
"if.else - 4":
%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
store i8 48, i8* %13
%14 = load i64, i64* %3
%15 = add i64 %14, 1
store i64 %15, i64* %3
br label %"if.done - 8"
br label %"if.done - 4"
"if.done - 4":
br label %"for.loop - 6"
"for.body - 5":
%16 = alloca i8, align 1 ; c
store i8 zeroinitializer, i8* %16
%17 = getelementptr inbounds [64 x i8], [64 x i8]* @.str2, i64 0, i64 0
%17 = getelementptr inbounds [64 x i8], [64 x i8]* @.strc, i64 0, i64 0
%18 = load i64, i64* %1
%19 = load i64, i64* %0
%20 = srem i64 %19, %18
@@ -434,23 +596,20 @@ define void @print_int(i64 %i, i64 %base) {
br i1 %33, label %"for.body - 5", label %"for.done - 7"
"for.done - 7":
br label %"if.done - 8"
"if.done - 8":
%34 = load i1, i1* %4
br i1 %34, label %"if.then - 9", label %"if.done - 10"
br i1 %34, label %"if.then - 8", label %"if.done - 9"
"if.then - 9":
"if.then - 8":
%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
store i8 45, i8* %37
%38 = load i64, i64* %3
%39 = add i64 %38, 1
store i64 %39, i64* %3
br label %"if.done - 10"
br label %"if.done - 9"
"if.done - 10":
"if.done - 9":
%40 = alloca %.string, align 8 ; str
store %.string zeroinitializer, %.string* %40
%41 = load i64, i64* %3
@@ -489,6 +648,16 @@ define void @print_int(i64 %i, i64 %base) {
ret void
}
@.str0 = global [1 x i8] c"\0A"
@.str1 = global [1 x i8] c"\0A"
@.str2 = global [64 x i8] c"0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz\40$"
@.str0 = global [26 x i8] c"Chinese\20\20\20\20-\20\E4\BD\A0\E5\A5\BD\E4\B8\96\E7\95\8C\0A"
@.str1 = global [26 x i8] c"Dutch\20\20\20\20\20\20-\20Hello\20wereld\0A"
@.str2 = global [25 x i8] c"English\20\20\20\20-\20Hello\20world\0A"
@.str3 = global [27 x i8] c"French\20\20\20\20\20-\20Bonjour\20monde\0A"
@.str4 = global [24 x i8] c"German\20\20\20\20\20-\20Hallo\20Welt\0A"
@.str5 = global [42 x i8] c"Greek\20\20\20\20\20\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"
@.str6 = global [24 x i8] c"Italian\20\20\20\20-\20Ciao\20mondo\0A"
@.str7 = global [35 x i8] c"Japanese\20\20\20-\20\E3\81\93\E3\82\93\E3\81\AB\E3\81\A1\E3\81\AF\E4\B8\96\E7\95\8C\0A"
@.str8 = global [33 x i8] c"Korean\20\20\20\20\20-\20\EC\97\AC\EB\B3\B4\EC\84\B8\EC\9A\94\20\EC\84\B8\EA\B3\84\0A"
@.str9 = global [24 x i8] c"Portuguese\20-\20Ol\C3\A1\20mundo\0A"
@.stra = global [45 x i8] c"Russian\20\20\20\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"
@.strb = global [24 x i8] c"Spanish\20\20\20\20-\20Hola\20mundo\0A"
@.strc = global [64 x i8] c"0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz\40$"
examples/main.odin
+23 -23
View File
@@ -2,31 +2,31 @@ import "basic"
TWO_HEARTS :: '💕';
tuple :: proc() -> (int, int) {
return 1, 2;
}
main :: proc() {
a, b : int = tuple();
dst : [4]int;
src : [2]int;
src[0] = 7;
src[1] = 5;
print_int(a, 10);
print_string("\n");
print_int(b, 10);
print_string("\n");
_ = copy(dst[1:], src[:]);
/*
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");
*/
for i := 0; i < len(dst); i++ {
print_int(dst[i]);
}
if false {
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");
}
}