From c803ecf4213487591e75f66a6f1c1b0ac1ea4f5e Mon Sep 17 00:00:00 2001
From: Lucas Fryzek <lucas.fryzek@fryzekconcepts.com>
Date: Sun, 23 Mar 2025 22:38:25 +0000
Subject: Get threading of world working

---
 main.rhm | 23 +++++++++++++----------
 1 file changed, 13 insertions(+), 10 deletions(-)

(limited to 'main.rhm')

diff --git a/main.rhm b/main.rhm
index c49216b..da4701d 100644
--- a/main.rhm
+++ b/main.rhm
@@ -5,26 +5,29 @@ import:
     lib("web-server/servlet.rkt") open
     lib("web-server/servlet-env.rkt") open
     "thread/thread.rhm" open
+    "src/world.rhm"
 
 fun start(req):
+    println(#{request-method}(req))
+    println(#{request-post-data/raw}(req))
     #{response/xexpr}("Hello world!")
 
-//#{serve/servlet}(start, #{#:launch-browser?}: #false, #{#:servlet-path}: "/game")
 
 fun loop():
     println("Hello World!")
     sleep(1)
     loop()
 
-fun hello():
-    let thread_evt = thread_receive_evt()
-    let sync_res = sync_timeout(1/500, thread_evt)
-    if !sync_res
-    | println("No sync result")
-    | println("Got message " +& thread_receive())
+fun sim_world():
+    let wrld = world.World()
+    wrld.simulate()
+
 
 println("Creating thread")
-def thr: thread(hello)
-thread_send(thr, "Hello")
+def thr: thread(sim_world)
+
+// Create webserver
+#{serve/servlet}(start, #{#:launch-browser?}: #false, #{#:servlet-path}: "/game")
+
+// Wait on world simulation thread so we don't kill the world before it has cleanly exited
 thread_wait(thr)
-println("Thread done")
-- 
cgit v1.2.3