Fix indentation in Allocator.cake

src/Allocator.cake

@@ -119,7 +119,7 @@
 ;; Must pass in the first block, not the final chain pointer!
 (defun chain-allocation-free (root (* chain-allocation))
   (each-link-in-chain-allocator root current-link next-link
-                                (free current-link)))
+    (free current-link)))
 
 (defun-local chain-allocate-new-link (last-link-in-chain-in-out (* (* chain-allocation))
                                       requested-size size_t)
@@ -276,8 +276,8 @@
      (var chain-root (* chain-allocation) (chain-allocation-create 64))
      (var chain (* chain-allocation) chain-root)
      (unless chain
-        (fprintf stderr "Expected to successfully create chain, but it failed\n")
-        (return 1))
+       (fprintf stderr "Expected to successfully create chain, but it failed\n")
+       (return 1))
      (unless (chain-allocate-unaligned (addr chain) 32)
        (fprintf stderr "Failed linear allocation\n")
        (chain-allocation-free chain-root)

tools/gamelib.el

@@ -8,6 +8,7 @@
   (put 'each-in-dynarray-reverse 'lisp-indent-function 2)
   (put 'each-item-in-dynarray 'lisp-indent-function 4)
   (put 'each-item-addr-in-dynarray 'lisp-indent-function 4)
+  (put 'each-link-in-chain-allocator 'lisp-indent-function 3)
 
   (put 'imgui-call 'lisp-indent-function 1)