Pass ammo magazine items to held item use chain

This commit is contained in:
2024-06-25 15:50:22 +01:00
parent c723d1b1e1
commit 009a6cd30f
7 changed files with 289 additions and 238 deletions
+40 -1
View File
@@ -1 +1,40 @@
All good (615 modules, at 16:17:36)
/home/justin/Haskell/loop/src/Dodge/Item/Weapon/TriggerType.hs:76:1: warning: [-Wunused-imports]
The qualified import of IntMapHelp is redundant
|
76 | import qualified IntMapHelp as IM
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Item/Weapon/TriggerType.hs:349:5: warning: [-Wunused-matches]
Defined but not used: x
|
349 | x <- ams ^? ix 0 . itUse . amagLoadStatus . iaLoaded
| ^
/home/justin/Haskell/loop/src/Dodge/Item/Weapon/BatteryGuns.hs:128:12: warning: [-Wunused-matches]
Defined but not used: ams
|
128 | shootLaser ams it cr =
| ^^^
/home/justin/Haskell/loop/src/Dodge/Bullet.hs:63:5: warning: [-Wunused-matches]
Defined but not used: invid
|
63 | invid <- it ^? itLocation . ipInvID
| ^^^^^
/home/justin/Haskell/loop/src/Dodge/HeldUse.hs:410:18: warning: [-Wunused-matches]
Defined but not used: ams
|
410 | usePjCreationX i ams itm cr =
| ^^^
/home/justin/Haskell/loop/src/Dodge/HeldUse.hs:472:21: warning: [-Wunused-matches]
Defined but not used: it
|
472 | useGasParams nz ams it cr =
| ^^
/home/justin/Haskell/loop/src/Dodge/HeldUse.hs:486:17: warning: [-Wunused-matches]
Defined but not used: ams
|
486 | fireRemoteShell ams it cr w =
| ^^^
/home/justin/Haskell/loop/src/Dodge/HeldUse.hs:542:15: warning: [-Wunused-matches]
Defined but not used: ams
|
542 | shootTeslaArc ams it cr w =
| ^^^