Beginnings of standard library

slothlang · Jun 16, 2023 · bb9c0e3 · bb9c0e3
1 parent 16413ca
commit bb9c0e3
Show file tree

Hide file tree

Showing 3 changed files with 83 additions and 0 deletions.
diff --git a/Cargo.lock b/Cargo.lock
diff --git a/sloth/Cargo.toml b/sloth/Cargo.toml
@@ -8,4 +8,5 @@ edition.workspace = true
 [dependencies]
 inkwell = { version = "0.2.0", features = ["llvm15-0"] }
 itertools = "0.10.5"
+rand = "0.8.5"
 thiserror = "1.0.40"
diff --git a/sloth/src/std.rs b/sloth/src/std.rs
@@ -1,13 +1,17 @@
 use rand::Rng;
 
 use std::ffi::CString;
+use std::{thread, time};
 
+// Random
 #[no_mangle]
 pub extern "C" fn rand(a: i64, b: i64) -> i64 {
     let value = rand::thread_rng().gen_range(a..b);
     return value;
 }
 
+
+// Print
 #[no_mangle]
 pub unsafe extern "C" fn println(s: *const c_char) {
     let s = unsafe { CStr::from_ptr(s) }.to_str().unwrap();
@@ -19,3 +23,27 @@ pub unsafe extern "C" fn print(s: *const c_char) {
     let s = unsafe { CStr::from_ptr(s) }.to_str().unwrap();
     print("{s}");
 }
+
+
+// Terminal
+#[no_mangle]
+pub extern "C" fn termpos(x: i32, y: i32) {
+    print!("\x1b[{x};{y}H");
+}
+
+#[no_mangle]
+pub extern "C" fn termclear() {
+    print!("\x1b[2J\x1b[H");
+}
+
+
+// Time
+#[no_mangle]
+pub extern "C" fn wait(t: i64) {
+    thread::sleep(time::Duration::from_millis(t));
+}
+
+
+// RP2040
+#[no_mangle]
+