From 9aa7e77fa117393b60c87faaa4693c7e7a738a82 Mon Sep 17 00:00:00 2001 From: Javier Sagredo Date: Thu, 17 Oct 2024 16:00:29 +0200 Subject: [PATCH] Expose `openHandles` --- fs-sim/CHANGELOG.md | 6 ++++++ fs-sim/src/System/FS/Sim/MockFS.hs | 1 + 2 files changed, 7 insertions(+) diff --git a/fs-sim/CHANGELOG.md b/fs-sim/CHANGELOG.md index 5fa04ad..c0d4697 100644 --- a/fs-sim/CHANGELOG.md +++ b/fs-sim/CHANGELOG.md @@ -1,5 +1,11 @@ # Revision history for fs-sim +## Next version -- ????-??-?? + +### Non-breaking + +* Expose `openHandles` for testing. + ## 0.3.0.1 -- 2024-10-02 ### Patch diff --git a/fs-sim/src/System/FS/Sim/MockFS.hs b/fs-sim/src/System/FS/Sim/MockFS.hs index 8687d51..8b0ab99 100644 --- a/fs-sim/src/System/FS/Sim/MockFS.hs +++ b/fs-sim/src/System/FS/Sim/MockFS.hs @@ -22,6 +22,7 @@ module System.FS.Sim.MockFS ( , example , handleIsOpen , numOpenHandles + , openHandles , pretty -- * Debugging , dumpState