From 9dab94c7f70b26ae61b6209f72eeba4c49c3d66b Mon Sep 17 00:00:00 2001 From: Vesa Karvonen Date: Sun, 24 Nov 2024 23:26:47 +0200 Subject: [PATCH] Don't refer to `caml_ml_domain_id` on OCaml 4 See #332 Co-authored-by: Hugo Heuzard --- lib/picos.thread/thread.ocaml4.js | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lib/picos.thread/thread.ocaml4.js b/lib/picos.thread/thread.ocaml4.js index 8a1c7636..57f23a3d 100644 --- a/lib/picos.thread/thread.ocaml4.js +++ b/lib/picos.thread/thread.ocaml4.js @@ -7,10 +7,8 @@ function caml_thread_initialize(unit) { var caml_thread = [0, 0, 0, 0] //Provides: caml_thread_self -//Requires: caml_ml_domain_id, caml_failwith, caml_thread function caml_thread_self(unit) { - if (caml_ml_domain_id(unit) != caml_thread[1]) - caml_failwith('caml_thread_self: spawning of domains is not supported') + // There are no threads other than the main thread. return caml_thread }