Cleanup. Probable leak when inventory is large enough for scrolling

This commit is contained in:
2025-01-01 23:35:36 +00:00
parent adc0878a28
commit 3b60ad6023
9 changed files with 50 additions and 139 deletions
+11 -11
View File
@@ -3367,7 +3367,7 @@ advanceSmoothScroll src/Dodge/SmoothScroll.hs 29;" f
advanceStepCounter src/Dodge/Creature/Impulse/Movement.hs 45;" f
aimDelaySweep src/Dodge/Render/Picture.hs 239;" f
aimStanceInfo src/Dodge/Item/Info.hs 199;" f
aimTurn src/Dodge/Creature/YourControl.hs 160;" f
aimTurn src/Dodge/Creature/YourControl.hs 161;" f
aimingWeaponHandlePos src/Dodge/Item/HeldOffset.hs 69;" f
aimingWeaponZeroPos src/Dodge/Item/HeldOffset.hs 63;" f
airlock src/Dodge/Room/Airlock.hs 19;" f
@@ -4493,7 +4493,7 @@ halfWidth src/Dodge/Base/Window.hs 48;" f
haltSound src/Dodge/SoundLogic.hs 37;" f
hammerCheck src/Dodge/HeldUse.hs 57;" f
handleEvent src/Dodge/Event.hs 27;" f
handleHotkeys src/Dodge/Creature/YourControl.hs 40;" f
handleHotkeys src/Dodge/Creature/YourControl.hs 41;" f
handleKeyboardEvent src/Dodge/Event/Input.hs 22;" f
handleMouseButtonEvent src/Dodge/Event/Input.hs 63;" f
handleMouseMotionEvent src/Dodge/Event/Input.hs 47;" f
@@ -4541,7 +4541,7 @@ holdForm src/Dodge/Creature/Boid.hs 136;" f
holsterWeapon src/Dodge/Creature/Volition.hs 14;" f
homingModule src/Dodge/Item/Scope.hs 44;" f
horPipe src/Dodge/Placement/Instance/Pipe.hs 9;" f
hotkeyToScancode src/Dodge/Creature/YourControl.hs 68;" f
hotkeyToScancode src/Dodge/Creature/YourControl.hs 69;" f
hotkeyToString src/Dodge/Inventory/SelectionList.hs 43;" f
humanoidAIList src/Dodge/Humanoid.hs 181;" f
iShape src/Dodge/Placement/Instance/LightSource.hs 73;" f
@@ -5569,7 +5569,7 @@ scaleMat src/MatrixHelper.hs 59;" f
scaleMatrix src/MatrixHelper.hs 56;" f
scaleSH src/Shape.hs 268;" f
scalp src/Dodge/Creature/Picture.hs 96;" f
scancodeToHotkey src/Dodge/Creature/YourControl.hs 88;" f
scancodeToHotkey src/Dodge/Creature/YourControl.hs 89;" f
scodeToChar src/Dodge/ScodeToChar.hs 6;" f
scorchSPic src/Dodge/Creature/State.hs 116;" f
screenBox src/Dodge/Base/Window.hs 53;" f
@@ -5627,7 +5627,7 @@ sentinelFireType src/Dodge/Creature/SentinelAI.hs 50;" f
setChannelPos src/Sound.hs 149;" f
setClickWorldPos src/Dodge/Update.hs 97;" f
setClusterID src/Dodge/Combine/Graph.hs 115;" f
setCrPosture src/Dodge/Creature/YourControl.hs 170;" f
setCrPosture src/Dodge/Creature/YourControl.hs 171;" f
setDepth src/Picture/Base.hs 128;" f
setDirPS src/Dodge/PlacementSpot.hs 49;" f
setFallback src/Dodge/PlacementSpot.hs 127;" f
@@ -6070,7 +6070,7 @@ truncFaces src/Polyhedra/Geodesic.hs 53;" f
truncate src/Polyhedra/Geodesic.hs 38;" f
trunkDepth src/TreeHelp.hs 161;" f
tryAttachItems src/Dodge/Item/Grammar.hs 22;" f
tryClickUse src/Dodge/Creature/YourControl.hs 175;" f
tryClickUse src/Dodge/Creature/YourControl.hs 176;" f
tryCombine src/Dodge/Update/Input/InGame.hs 596;" f
tryDropSelected src/Dodge/Update/Input/InGame.hs 123;" f
tryGetChannel src/Sound.hs 96;" f
@@ -6257,7 +6257,7 @@ useC src/Dodge/Cuse.hs 8;" f
useC' src/Dodge/Cuse.hs 13;" f
useE src/Dodge/Euse.hs 34;" f
useGasParams src/Dodge/HeldUse.hs 532;" f
useHotkey src/Dodge/Creature/YourControl.hs 63;" f
useHotkey src/Dodge/Creature/YourControl.hs 64;" f
useItem src/Dodge/Creature/Impulse/UseItem.hs 20;" f
useItemLoc src/Dodge/Creature/Impulse/UseItem.hs 27;" f
useLnkRoomPos src/Dodge/PlacementSpot.hs 244;" f
@@ -6319,12 +6319,12 @@ wallLine src/Dodge/Placement/Instance/Wall.hs 71;" f
wallsFromRooms src/Dodge/Layout.hs 146;" f
wallsToDraw src/Dodge/Render/Walls.hs 17;" f
warningRooms src/Dodge/Room/Warning.hs 27;" f
wasdAim src/Dodge/Creature/YourControl.hs 122;" f
wasdAim src/Dodge/Creature/YourControl.hs 123;" f
wasdDir src/Dodge/WASD.hs 17;" f
wasdM src/Dodge/WASD.hs 9;" f
wasdMovement src/Dodge/Creature/YourControl.hs 148;" f
wasdTwist src/Dodge/Creature/YourControl.hs 130;" f
wasdWithAiming src/Dodge/Creature/YourControl.hs 112;" f
wasdMovement src/Dodge/Creature/YourControl.hs 149;" f
wasdTwist src/Dodge/Creature/YourControl.hs 131;" f
wasdWithAiming src/Dodge/Creature/YourControl.hs 113;" f
watchCombinations src/Dodge/Combine/Combinations.hs 15;" f
watchUpdateStrat src/Dodge/Creature/ReaderUpdate.hs 177;" f
weakenMatS src/Dodge/Material/Sound.hs 18;" f