float stuff

slothlang · Aug 20, 2023 · 5cf0b81 · 5cf0b81
1 parent 1e1aeb4
commit 5cf0b81
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 0 deletions.
diff --git a/std/extern.sloth b/std/extern.sloth
@@ -12,7 +12,9 @@ foreign fn slen(str: String) Int;
 foreign fn parse_int(str: String) Int;
 foreign fn termpos(x: Int, y: Int);
 foreign fn as_int(x: Float) Int;
+foreign fn as_float(x: Int) Float;
 foreign fn istr(x: Int) String;
+foreign fn fstr(x: Float) String;
 foreign fn system(cmd: String) Int;
 foreign fn sequals(a: String, b: String) Bool;
 foreign fn termclear() Void;

diff --git a/std/stdlib.c b/std/stdlib.c
@@ -41,6 +41,10 @@ int as_int(float x) {
     return (int) x;
 }
 
+int as_float(int x) {
+    return (float) x;
+}
+
 bool sequals(char* a, char* b) {
     if (strlen(a) != strlen(b)) {
         return false;
@@ -59,3 +63,10 @@ char* istr(int x) {
     //char* result = snum;
     return snum;
 }
+
+char* fstr(float x) {
+    char* snum = malloc(12);
+    sprintf(snum, "%f", x);
+    //char* result = snum;
+    return snum;
+}