From 23ec60e44d893864f61793a2e03d6bcc2f15cd2a Mon Sep 17 00:00:00 2001
From: ctsk <9384305+ctsk@users.noreply.github.com>
Date: Sat, 23 Sep 2023 07:55:47 +0200
Subject: [PATCH] (D8) use unsafeFreeze

---
 src/Days/D08.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/Days/D08.hs b/src/Days/D08.hs
index aa6032d..5fb5695 100644
--- a/src/Days/D08.hs
+++ b/src/Days/D08.hs
@@ -106,11 +106,11 @@ process bs =
                         )
                 )
 
-            lf <- VS.freeze l
-            rf <- VS.freeze r
-            uf <- VS.freeze u
-            df <- VS.freeze d
-            vf <- VS.freeze v
+            lf <- VS.unsafeFreeze l
+            rf <- VS.unsafeFreeze r
+            uf <- VS.unsafeFreeze u
+            df <- VS.unsafeFreeze d
+            vf <- VS.unsafeFreeze v
 
             return (Intermediate{h = h, w = w, u = uf, d = df, l = lf, r = rf, v = vf})