From 64ccf5d20f2e3b0cb260e1954275fb27aea036ef Mon Sep 17 00:00:00 2001
From: konsumlamm <konsumlamm@gmail.com>
Date: Sat, 9 Sep 2023 22:01:25 +0200
Subject: [PATCH 1/2] Import `Data.Array.ST` instead of `Data.Array.ST.Safe`

---
 containers/src/Data/Graph.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/containers/src/Data/Graph.hs b/containers/src/Data/Graph.hs
index 2c3b2cd7e..7bc4593c9 100644
--- a/containers/src/Data/Graph.hs
+++ b/containers/src/Data/Graph.hs
@@ -108,11 +108,11 @@ import Utils.Containers.Internal.Prelude
 import Prelude ()
 #if USE_ST_MONAD
 import Control.Monad.ST
-import Data.Array.ST.Safe (newArray, readArray, writeArray)
+import Data.Array.ST (newArray, readArray, writeArray)
 # if USE_UNBOXED_ARRAYS
-import Data.Array.ST.Safe (STUArray)
+import Data.Array.ST (STUArray)
 # else
-import Data.Array.ST.Safe (STArray)
+import Data.Array.ST (STArray)
 # endif
 #else
 import Data.IntSet (IntSet)

From 6fc7eb2ce49167598596b0c4c0c9dba249d4ddef Mon Sep 17 00:00:00 2001
From: konsumlamm <konsumlamm@gmail.com>
Date: Sun, 30 Aug 2026 14:02:50 +0200
Subject: [PATCH 2/2] Mark `Data.Graph` as `Trustworthy`

---
 containers/src/Data/Graph.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/containers/src/Data/Graph.hs b/containers/src/Data/Graph.hs
index 7bc4593c9..88472ab3c 100644
--- a/containers/src/Data/Graph.hs
+++ b/containers/src/Data/Graph.hs
@@ -6,8 +6,10 @@
 {-# LANGUAGE DeriveGeneric #-}
 {-# LANGUAGE DeriveLift #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE Safe #-}
 {-# LANGUAGE TemplateHaskellQuotes #-}
+#if !MIN_VERSION_array(0,5,7)
+{-# LANGUAGE Trustworthy #-}
+#endif
 #endif
 #ifdef DEFINE_PATTERN_SYNONYMS
 {-# LANGUAGE PatternSynonyms #-}