/home/justin/Haskell/loop/src/Dodge/Item/Held.hs:(26,23)-(68,28): warning: [-Wincomplete-patterns]
    Pattern match(es) are non-exhaustive
    In a case alternative: Patterns not matched: FORCEFIELDGUN
   |
26 | itemFromHeldType ht = case ht of
   |                       ^^^^^^^^^^...
/home/justin/Haskell/loop/src/Dodge/HeldUse.hs:(186,66)-(194,53): warning: [-Wincomplete-patterns]
    Pattern match(es) are non-exhaustive
    In a case alternative: Patterns not matched: MuzzleForceField
    |
186 |     removeAmmoFromMag x mid cr . makeMuzzleFlare mz itmtree cr $ case _mzEffect mz of
    |                                                                  ^^^^^^^^^^^^^^^^^^^^...