diff --git a/kotstd/include/Console.kt b/kotstd/include/Console.kt new file mode 100644 index 00000000000..0e0b5a4657c --- /dev/null +++ b/kotstd/include/Console.kt @@ -0,0 +1,113 @@ +/* +* Library for console interaction +*/ + +external fun kotlinclib_print_int(message: Int) +external fun kotlinclib_print_long(message: Long) +external fun kotlinclib_print_byte(message: Byte) +external fun kotlinclib_print_short(message: Short) +external fun kotlinclib_print_char(message: Char) +external fun kotlinclib_print_boolean(message: Boolean) +external fun kotlinclib_print_float(message: Float) +external fun kotlinclib_print_double(message: Double) +external fun kotlinclib_print_string(message: String) +external fun kotlinclib_println_int(message: Int) +external fun kotlinclib_println_long(message: Long) +external fun kotlinclib_println_byte(message: Byte) +external fun kotlinclib_println_short(message: Short) +external fun kotlinclib_println_char(message: Char) +external fun kotlinclib_println_boolean(message: Boolean) +external fun kotlinclib_println_float(message: Float) +external fun kotlinclib_println_double(message: Double) +external fun kotlinclib_println_string(message: String) + +/** Prints the given message to the standard output stream. */ +fun print(message: Int) { + kotlinclib_print_int(message) +} + +/** Prints the given message to the standard output stream. */ +fun print(message: Long) { + kotlinclib_print_long(message) +} + +/** Prints the given message to the standard output stream. */ +fun print(message: Byte) { + kotlinclib_print_byte(message) +} + +/** Prints the given message to the standard output stream. */ +fun print(message: Short) { + kotlinclib_print_short(message) +} + +/** Prints the given message to the standard output stream. */ +fun print(message: Char) { + kotlinclib_print_char(message) +} + +/** Prints the given message to the standard output stream. */ +fun print(message: Boolean) { + kotlinclib_print_boolean(message) +} + +/** Prints the given message to the standard output stream. */ +fun print(message: Float) { + kotlinclib_print_float(message) +} + +/** Prints the given message to the standard output stream. */ +fun print(message: Double) { + kotlinclib_print_double(message) +} + +/** Prints the given message to the standard output stream. */ +fun print(message: String) { + kotlinclib_print_string(message) +} + + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: Int) { + kotlinclib_println_int(message) +} + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: Long) { + kotlinclib_println_long(message) +} + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: Byte) { + kotlinclib_println_byte(message) +} + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: Short) { + kotlinclib_println_short(message) +} + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: Char) { + kotlinclib_println_char(message) +} + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: Boolean) { + kotlinclib_println_boolean(message) +} + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: Float) { + kotlinclib_println_float(message) +} + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: Double) { + kotlinclib_println_double(message) +} + +/** Prints the given message and newline to the standard output stream. */ +fun println(message: String) { + kotlinclib_println_string(message) +} diff --git a/kotstd/lib/arm/console_c.ll b/kotstd/lib/arm/console_c.ll new file mode 100644 index 00000000000..66865ff8647 --- /dev/null +++ b/kotstd/lib/arm/console_c.ll @@ -0,0 +1,138 @@ +; ModuleID = 'console_arm.c' +target datalayout = "e-m:e-p:32:32-i64:64-v128:64:128-a:0:32-n32-S64" +target triple = "thumbv7m-none--eabi" + +; Function Attrs: nounwind +define void @kotlinclib_print_int(i32 %message) #0 { + %1 = alloca i32, align 4 + store i32 %message, i32* %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_print_long(i32 %message) #0 { + %1 = alloca i32, align 4 + store i32 %message, i32* %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_print_byte(i8 zeroext %message) #0 { + %1 = alloca i8, align 1 + store i8 %message, i8* %1, align 1 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_print_short(i16 signext %message) #0 { + %1 = alloca i16, align 2 + store i16 %message, i16* %1, align 2 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_print_char(i8 zeroext %message) #0 { + %1 = alloca i8, align 1 + store i8 %message, i8* %1, align 1 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_print_boolean(i1 %message) #0 { + %1 = alloca i1, align 4 + store i1 %message, i1* %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_print_float(float %message) #0 { + %1 = alloca float, align 4 + store float %message, float* %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_print_double(double %message) #0 { + %1 = alloca double, align 8 + store double %message, double* %1, align 8 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_print_string(i8* %message) #0 { + %1 = alloca i8*, align 4 + store i8* %message, i8** %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_int(i32 %message) #0 { + %1 = alloca i32, align 4 + store i32 %message, i32* %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_long(i32 %message) #0 { + %1 = alloca i32, align 4 + store i32 %message, i32* %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_byte(i8 zeroext %message) #0 { + %1 = alloca i8, align 1 + store i8 %message, i8* %1, align 1 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_short(i16 signext %message) #0 { + %1 = alloca i16, align 2 + store i16 %message, i16* %1, align 2 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_char(i8 zeroext %message) #0 { + %1 = alloca i8, align 1 + store i8 %message, i8* %1, align 1 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_boolean(i1 %message) #0 { + %1 = alloca i1, align 4 + store i1 %message, i1* %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_float(float %message) #0 { + %1 = alloca float, align 4 + store float %message, float* %1, align 4 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_double(double %message) #0 { + %1 = alloca double, align 8 + store double %message, double* %1, align 8 + ret void +} + +; Function Attrs: nounwind +define void @kotlinclib_println_string(i8* %message) #0 { + %1 = alloca i8*, align 4 + store i8* %message, i8** %1, align 4 + ret void +} + +attributes #0 = { nounwind "less-precise-fpmad"="false" "no-frame-pointer-elim"="true" "no-frame-pointer-elim-non-leaf" "no-infs-fp-math"="false" "no-nans-fp-math"="false" "stack-protector-buffer-size"="8" "unsafe-fp-math"="false" "use-soft-float"="false" } + +!llvm.module.flags = !{!0, !1} +!llvm.ident = !{!2} + +!0 = !{i32 1, !"wchar_size", i32 4} +!1 = !{i32 1, !"min_enum_size", i32 4} +!2 = !{!"Ubuntu clang version 3.6.2-3ubuntu2 (tags/RELEASE_362/final) (based on LLVM 3.6.2)"} diff --git a/kotstd/lib/x86/console_c.ll b/kotstd/lib/x86/console_c.ll new file mode 100644 index 00000000000..0ee8fecbb4d --- /dev/null +++ b/kotstd/lib/x86/console_c.ll @@ -0,0 +1,207 @@ +; ModuleID = 'console.c' +target datalayout = "e-m:e-i64:64-f80:128-n8:16:32:64-S128" +target triple = "x86_64-pc-linux-gnu" + +@.str = private unnamed_addr constant [3 x i8] c"%d\00", align 1 +@.str1 = private unnamed_addr constant [4 x i8] c"%ld\00", align 1 +@.str2 = private unnamed_addr constant [3 x i8] c"%c\00", align 1 +@.str3 = private unnamed_addr constant [6 x i8] c"false\00", align 1 +@.str4 = private unnamed_addr constant [5 x i8] c"true\00", align 1 +@.str5 = private unnamed_addr constant [3 x i8] c"%f\00", align 1 +@.str6 = private unnamed_addr constant [4 x i8] c"%lf\00", align 1 +@.str7 = private unnamed_addr constant [3 x i8] c"%s\00", align 1 + +; Function Attrs: nounwind uwtable +define void @kotlinclib_print_int(i32 %message) #0 { + %1 = alloca i32, align 4 + store i32 %message, i32* %1, align 4 + %2 = load i32* %1, align 4 + %3 = call i32 (i8*, ...)* @printf(i8* getelementptr inbounds ([3 x i8]* @.str, i32 0, i32 0), i32 %2) + ret void +} + +declare i32 @printf(i8*, ...) #1 + +; Function Attrs: nounwind uwtable +define void @kotlinclib_print_long(i64 %message) #0 { + %1 = alloca i64, align 8 + store i64 %message, i64* %1, align 8 + %2 = load i64* %1, align 8 + %3 = call i32 (i8*, ...)* @printf(i8* getelementptr inbounds ([4 x i8]* @.str1, i32 0, i32 0), i64 %2) + ret void +} + +; Function Attrs: nounwind uwtable +define void @kotlinclib_print_byte(i8 signext %message) #0 { + %1 = alloca i8, align 1 + store i8 %message, i8* %1, align 1 + %2 = load i8* %1, align 1 + %3 = sext i8 %2 to i32 + %4 = call i32 (i8*, ...)* @printf(i8* getelementptr inbounds ([3 x i8]* @.str, i32 0, i32 0), i32 %3) + ret void +} + +; Function Attrs: nounwind uwtable +define void @kotlinclib_print_short(i16 signext %message) #0 { + %1 = alloca i16, align 2 + store i16 %message, i16* %1, align 2 + %2 = load i16* %1, align 2 + %3 = sext i16 %2 to i32 + %4 = call i32 (i8*, ...)* @printf(i8* getelementptr inbounds ([3 x i8]* @.str, i32 0, i32 0), i32 %3) + ret void +} + +; Function Attrs: nounwind uwtable +define void @kotlinclib_print_char(i8 signext %message) #0 { + %1 = alloca i8, align 1 + store i8 %message, i8* %1, align 1 + %2 = load i8* %1, align 1 + %3 = sext i8 %2 to i32 + %4 = call i32 (i8*, ...)* @printf(i8* getelementptr inbounds ([3 x i8]* @.str2, i32 0, i32 0), i32 %3) + ret void +} + +; Function Attrs: nounwind uwtable +define void @kotlinclib_print_boolean(i1 %message) #0 { + %1 = alloca i1, align 4 + store i1 %message, i1* %1, align 4 + %2 = load i1* %1, align 4 + %3 = icmp eq i1 %2, 0 + br i1 %3, label %4, label %6 + +;