X-Git-Url: https://git.njae.me.uk/?a=blobdiff_plain;f=adventofcode16%2Fapp%2Fadvent23.hs;h=2903967e8b37f64624dd7cc3eea301717050bc0d;hb=HEAD;hp=dfb98cdab1e70e4c81fb3e360fa4fbb7a875e2f8;hpb=eb87b3a000ef3019d99828b71068c8cfcd9d3caa;p=advent-of-code-16.git

diff --git a/adventofcode16/app/advent23.hs b/adventofcode16/app/advent23.hs
index dfb98cd..2903967 100644
--- a/adventofcode16/app/advent23.hs
+++ b/adventofcode16/app/advent23.hs
@@ -21,7 +21,6 @@ data Machine = Machine { a :: Int
                        , instructions :: [Instruction]} 
                deriving (Show, Eq)
 
-
 testInstructions = "cpy 2 a\n\
 \tgl a\n\
 \tgl a\n\
@@ -30,7 +29,6 @@ testInstructions = "cpy 2 a\n\
 \dec a\n\
 \dec a"
 
-
 emptyMachine :: Machine
 emptyMachine = Machine {a=0, b=0, c=0, d=0, pc=0, instructions=[]}
 
@@ -179,4 +177,4 @@ parseIline input = parse instructionLine "(unknown)" input
 
 successfulParse :: Either ParseError [a] -> [a]
 successfulParse (Left _) = []
-successfulParse (Right a) = a
\ No newline at end of file
+successfulParse (Right a) = a