diff --git a/library/StmHamt/SizedHamt.hs b/library/StmHamt/SizedHamt.hs
--- a/library/StmHamt/SizedHamt.hs
+++ b/library/StmHamt/SizedHamt.hs
@@ -14,11 +14,13 @@
     reset,
     unfoldlM,
     listT,
+    listTNonAtomic,
   )
 where
 
 import qualified Focus as Focus
 import qualified StmHamt.Hamt as Hamt
+import qualified StmHamt.ListT as ListT
 import StmHamt.Prelude hiding (delete, fold, insert, lookup, null)
 import StmHamt.Types
 
@@ -77,3 +79,7 @@
 {-# INLINE listT #-}
 listT :: SizedHamt a -> ListT STM a
 listT (SizedHamt _ hamt) = Hamt.listT hamt
+
+{-# INLINE listTNonAtomic #-}
+listTNonAtomic :: SizedHamt a -> ListT IO a
+listTNonAtomic (SizedHamt _ hamt) = ListT.hamtElementsNonAtomic hamt
diff --git a/stm-hamt.cabal b/stm-hamt.cabal
--- a/stm-hamt.cabal
+++ b/stm-hamt.cabal
@@ -1,6 +1,6 @@
 cabal-version: 3.0
 name: stm-hamt
-version: 1.2.1.1
+version: 1.2.2
 synopsis: STM-specialised Hash Array Mapped Trie
 description:
   A low-level data-structure,