cont stack example

2026-07-14 17:35:37 -06:00
parent cd56b176af
commit 42f17c0dac
3 changed files with 119 additions and 0 deletions
@@ -0,0 +1,21 @@
+import Development.Shake
+import Development.Shake.Command
+import Development.Shake.FilePath
+import Development.Shake.Util
+
+main = shakeArgs shakeOptions $ do
+  -- action $ do
+  --   sourceFiles <- getDirectoryFiles "" ["//*.luasm"]
+  --   need $ (-<.> "luac") <$> sourceFiles
+  want ["cont-stack.wasm"]
+  alternatives $ do
+    "*.wasm" %> \out -> do
+        let wat = out -<.> "wat"
+        need [wat]
+        cmd_ "wasm-tools parse" [wat] "-o" [out]
+  phony "run" $ do
+    need ["cont-stack.wasm"]
+    cmd_ "./run.js"
+  phony "clean" $ do
+    removeFilesAfter ".shake" ["//*"]
+    liftIO $ removeFiles "." ["*.wasm"]