X-Git-Url: https://git.njae.me.uk/?p=advent-of-code-20.git;a=blobdiff_plain;f=advent08%2Fsrc%2Fadvent08.hs;h=ba8134ce5708b31e9bad6ec36bfca5cc5d294dfe;hp=dab483e3df52f786c71d904a112a64a84c9104a9;hb=fb79b0c5e699d81d19698d34b72e5151fcfcf0ef;hpb=90918214710d0fc62c1f70114b15aa677223494b

diff --git a/advent08/src/advent08.hs b/advent08/src/advent08.hs
index dab483e..ba8134c 100644
--- a/advent08/src/advent08.hs
+++ b/advent08/src/advent08.hs
@@ -47,13 +47,6 @@ part2 program = filter terminates $ map runProgram programs
 
 
 executeMany visited machine
-  -- if currentIP `S.member` visited
-  -- then Looped (machineAcc machine)
-  -- else if currentIP == programSize
-  --      then Terminated (machineAcc machine)
-  --      else if currentIP > programSize
-  --           then OutOfBounds (machineAcc machine) currentIP
-  --           else executeMany visited' machine'
   | currentIP `S.member` visited = Looped (machineAcc machine)
   | currentIP == programSize     = Terminated (machineAcc machine)
   | currentIP > programSize      = OutOfBounds (machineAcc machine) currentIP