modularize

1 files changed, 34 insertions, 0 deletions

diff --git a/init.moon b/init.moon
new file mode 100644
index 0000000..c028e50
--- /dev/null
+++ b/init.moon
@@ -0,0 +1,34 @@
+import Registry from require 'registry'
+
+env = Registry!
+env\add_module 'math'
+env\add_module 'time'
+env\add_module 'util'
+env\add_module 'debug'
+
+if ... == 'init'
+  return env
+
+-- run from CLI
+import clock_gettime, nanosleep, CLOCK_MONOTONIC from require 'posix.time'
+import Copilot from require 'copilot'
+
+delta = do
+  gettime = ->
+    spec = clock_gettime CLOCK_MONOTONIC
+    spec.tv_sec + spec.tv_nsec * 1e-9
+
+  local last, time
+  ->
+    time = gettime!
+    with time - (last or time)
+      last = time
+
+copilot = Copilot arg[1], env
+while true
+  copilot\poll!
+
+  dt = delta!
+  env\update dt
+
+  assert nanosleep tv_sec: 0, tv_nsec: math.floor 1e9 / 60