From c455e7b67d2e55e6ed03e3449203d4e307f5a7dd Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Fri, 13 Sep 2024 20:18:08 -0400
Subject: Rename builtins/ -> stdlib/

---
 stdlib/threads.c | 55 +++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 55 insertions(+)
 create mode 100644 stdlib/threads.c

(limited to 'stdlib/threads.c')

diff --git a/stdlib/threads.c b/stdlib/threads.c
new file mode 100644
index 00000000..74e73832
--- /dev/null
+++ b/stdlib/threads.c
@@ -0,0 +1,55 @@
+// Logic for the Thread type, representing a pthread
+
+#include <ctype.h>
+#include <err.h>
+#include <gc.h>
+#include <math.h>
+#include <stdbool.h>
+#include <stdint.h>
+#include <stdlib.h>
+#include <pthread.h>
+#include <sys/param.h>
+
+#include "arrays.h"
+#include "text.h"
+#include "types.h"
+#include "util.h"
+
+public pthread_t *Thread$new(Closure_t fn)
+{
+    pthread_t *thread = new(pthread_t);
+    pthread_create(thread, NULL, fn.fn, fn.userdata);
+    return thread;
+}
+
+public void Thread$join(pthread_t *thread)
+{
+    pthread_join(*thread, NULL);
+}
+
+public void Thread$cancel(pthread_t *thread)
+{
+    pthread_cancel(*thread);
+}
+
+public void Thread$detach(pthread_t *thread)
+{
+    pthread_detach(*thread);
+}
+
+Text_t Thread$as_text(const pthread_t **thread, bool colorize, const TypeInfo *type)
+{
+    (void)type;
+    if (!thread) {
+        return colorize ? Text("\x1b[34;1mThread\x1b[m") : Text("Thread");
+    }
+    return Text$format(colorize ? "\x1b[34;1mThread(%p)\x1b[m" : "Thread(%p)", *thread);
+}
+
+public const TypeInfo Thread = {
+    .size=sizeof(pthread_t*), .align=__alignof(pthread_t*),
+    .tag=CustomInfo,
+    .CustomInfo={.as_text=(void*)Thread$as_text},
+};
+
+// vim: ts=4 sw=0 et cino=L2,l1,(0,W4,m1,\:0
-- 
cgit v1.2.3