tentatively refactor quad tree to make it more succinct + eliminate a class of potential bugs (passing wrong quad values through recursion)

2025-01-27 23:27:52 +00:00
parent 42b42220d0
commit 6369be21fa
14 changed files with 393 additions and 1051 deletions
--- a/fcore/platform.sml
+++ b/fcore/platform.sml
@@ -11,8 +11,8 @@ struct
    else
      let
        val {id, x, y, width} = Vector.sub (platVec, pos)
-        val acc = QuadTree.insert
-          (x, y, width, platHeight, 0, 0, 1920, 1080, id, acc)
+        val acc = QuadHelp.insert
+          (x, y, width, platHeight, id, acc)
      in
        helpGenerateTree (pos + 1, platVec, acc)
      end