yogsototh/adventofcode
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

small change to help syntax highlighing

Browse source
This commit is contained in:
Yann Esposito (Yogsototh) 2017-12-07 14:03:38 +01:00
parent aed9254393
commit 13663cdea4
Signed by untrusted user who does not match committer: yogsototh
GPG key ID: 7B19A4C650D59646
1 changed files with 14 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
src/Day7.hs
View file

@ -81,21 +81,6 @@ import Protolude
import qualified Data.Set as Set
import Text.Parsec
testInput :: Text
testInput = "pbga (66)\n\
\xhth (57)\n\
\ebii (61)\n\
\havc (66)\n\
\ktlj (57)\n\
\fwft (72) -> ktlj, cntj, xhth\n\
\qoyq (66)\n\
\padx (45) -> pbga, havc, qoyq\n\
\tknk (41) -> ugml, padx, fwft\n\
\jptl (61)\n\
\ugml (68) -> gyxo, ebii, jptl\n\
\gyxo (61)\n\
\cntj (57)"
data Node = Node { name :: Text
, weight :: Int
, sons :: [Text]
@ -133,3 +118,17 @@ parseNode =
<*> (char '(' *> int <* char ')')
<*> sonsP
testInput :: Text
testInput = "pbga (66)\n\
\xhth (57)\n\
\ebii (61)\n\
\havc (66)\n\
\ktlj (57)\n\
\fwft (72) -> ktlj, cntj, xhth\n\
\qoyq (66)\n\
\padx (45) -> pbga, havc, qoyq\n\
\tknk (41) -> ugml, padx, fwft\n\
\jptl (61)\n\
\ugml (68) -> gyxo, ebii, jptl\n\
\gyxo (61)\n\
\cntj (57)\n"