diff options
| author | Lucas Fryzek <lucas.fryzek@fryzekconcepts.com> | 2025-03-23 22:38:25 +0000 |
|---|---|---|
| committer | Lucas Fryzek <lucas.fryzek@fryzekconcepts.com> | 2025-03-23 22:38:25 +0000 |
| commit | c803ecf4213487591e75f66a6f1c1b0ac1ea4f5e (patch) | |
| tree | d8d1d3be9b1e57f6ab3d98efbb8a5bf2672b4918 /thread | |
| parent | a2feba2d918db861ea85d22887f73993c173e742 (diff) | |
Get threading of world working
Diffstat (limited to 'thread')
| -rw-r--r-- | thread/thread.rhm | 2 | ||||
| -rw-r--r-- | thread/thread.rkt | 3 |
2 files changed, 4 insertions, 1 deletions
diff --git a/thread/thread.rhm b/thread/thread.rhm index a0c1b18..4bf911e 100644 --- a/thread/thread.rhm +++ b/thread/thread.rhm @@ -11,6 +11,7 @@ export: sleep sync_timeout current_thread + current_timestamp def thread_send: #{thread-send} def thread_receive: #{thread-receive} @@ -18,3 +19,4 @@ def thread_receive_evt: #{thread-receive-evt} def thread_wait: #{thread-wait} def sync_timeout: #{sync/timeout} def current_thread: #{current-thread} +def current_timestamp: #{current-inexact-monotonic-milliseconds} diff --git a/thread/thread.rkt b/thread/thread.rkt index bf7d8eb..6fac881 100644 --- a/thread/thread.rkt +++ b/thread/thread.rkt @@ -7,4 +7,5 @@ thread-wait sleep sync/timeout - current-thread) + current-thread + current-inexact-monotonic-milliseconds) |