justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Continue hud/mouse refactor

Browse Source
This commit is contained in:
justin
2024-11-16 15:06:05 +00:00
parent 0621709f7b
commit 5efc9220e0
6 changed files with 184 additions and 226 deletions
Download Patch File Download Diff File Expand all files Collapse all files
ghcidOutput
+2 -54
View File
@@ -1,57 +1,5 @@
/home/justin/Haskell/loop/src/Dodge/Render/Picture.hs:100:1-19: warning: [-Wunused-top-binds]
Defined but not used: ‘determineTermCursor’
|
100 | determineTermCursor tmid u = fromMaybe (drawPlus 5) $ do
| ^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Render/Picture.hs:100:21-24: warning: [-Wunused-matches]
/home/justin/Haskell/loop/src/Dodge/Update.hs:416:9-12: warning: [-Wunused-matches]
Defined but not used: ‘tmid’
|
100 | determineTermCursor tmid u = fromMaybe (drawPlus 5) $ do
| ^^^^
/home/justin/Haskell/loop/src/Dodge/Render/Picture.hs:100:26: warning: [-Wunused-matches]
Defined but not used: ‘u’
|
100 | determineTermCursor tmid u = fromMaybe (drawPlus 5) $ do
| ^
/home/justin/Haskell/loop/src/Dodge/Render/Picture.hs:113:1-18: warning: [-Wunused-top-binds]
Defined but not used: ‘drawWireRectCursor’
|
113 | drawWireRectCursor = scale 0.1 0.1 $ text [cWireRect]
| ^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Update.hs:306:1-27: warning: [-Wunused-top-binds]
Defined but not used: ‘updateMouseInventoryEffects’
|
306 | updateMouseInventoryEffects cfig w = w
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Update.hs:306:29-32: warning: [-Wunused-matches]
Defined but not used: ‘cfig’
|
306 | updateMouseInventoryEffects cfig w = w
| ^^^^
/home/justin/Haskell/loop/src/Dodge/Update.hs:419:9-12: warning: [-Wunused-matches]
Defined but not used: ‘tmid’
|
419 | tmid <- w ^? hud . hudElement . subInventory . termID
416 | tmid <- w ^? hud . hudElement . subInventory . termID
| ^^^^
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:(121,24)-(128,71): warning: [GHC-62161] [-Wincomplete-patterns]
Pattern match(es) are non-exhaustive
In a case alternative:
Patterns of type ‘MouseContext’ not matched:
NoMouseContext
MouseAiming
OverInvSelect _
OverInvFilt _
...
|
121 | trydocombination = case w ^. input . mouseContext of
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^...
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:126:26: warning: [-Wunused-matches]
Defined but not used: ‘i’
|
126 | OverCombCombine (i,j) -> (worldEventFlags . at InventoryChange ?~ ()) . maybeExitCombine $
| ^
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:126:28: warning: [-Wunused-matches]
Defined but not used: ‘j’
|
126 | OverCombCombine (i,j) -> (worldEventFlags . at InventoryChange ?~ ()) . maybeExitCombine $
| ^