From fff25999c9f0eedfca678f8c99eb89a69f69ada4 Mon Sep 17 00:00:00 2001
From: Rhiannon Morris <rhi@rhiannon.website>
Date: Fri, 7 May 2021 14:14:01 +0200
Subject: [PATCH] rename a variable

---
 src/IPS/Parse.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/IPS/Parse.hs b/src/IPS/Parse.hs
index 228fe76..4088bb3 100644
--- a/src/IPS/Parse.hs
+++ b/src/IPS/Parse.hs
@@ -28,12 +28,12 @@ parseBody = uncurry Vector.fromListN <$> go where
 parseChunk :: Parser Chunk
 parseChunk = do
   offset <- parseWord24
-  size₀  <- parseWord16
+  size   <- parseWord16
   body   <-
-    if size₀ == 0 then
+    if size == 0 then
       liftA2 RLE parseWord16 Parse.anyWord8
     else
-      Normal . makeBytes <$> Parse.take (fromIntegral size₀)
+      Normal . makeBytes <$> Parse.take (fromIntegral size)
   pure $ Chunk {offset, body}
 
 parseWord16 :: Parser Word16