Store paths crossing block walls in block

2022-07-02 15:31:27 +01:00
parent 75a98a572f
commit 3952ec6315
8 changed files with 52 additions and 17 deletions
@@ -15,6 +15,7 @@ defaultBlock = Block
    , _blDraw      = const mempty
    , _blDeath     = makeBlockDebris
    , _blObstructs = []
+    , _blPaths      = []
    }
 defaultDirtBlock :: Block
 defaultDirtBlock = defaultBlock & blHP .~ 50