parser.hs

coreExprParser :: Parser CoreExpr
coreExprParser =
  -- I was having some backtracking
  -- issues so now we "try" every parser.
  choice [
    Var <$> string "wtfd",
    Var <$> string "wtf",
    letRecParser,
    letParser,
    constrParser,
    variableParser,
    numParser
  ]