Refactor machines

2022-07-24 20:55:44 +01:00
parent d6a94ec4bc
commit 24531b75a1
10 changed files with 110 additions and 59 deletions
@@ -45,8 +45,7 @@ defaultMachine :: Machine
 defaultMachine = Machine
    { _mcID = 0
    , _mcWallIDs = mempty
--    , _mcUpdate = defaultMachineUpdate
-    , _mcDraw = const mempty
+    , _mcDraw = MachineDrawMempty
    , _mcColor = white
    , _mcPos = V2 0 0
    , _mcDir = 0