p_bool :: CharParser () Bool
p_bool =     True <$ string "true"
         <|> False <$ string "false"
p_bool :: CharParser () Bool
p_bool =     True <$ string "true"
         <|> False <$ string "false"
p_bool =     True <$ string "true"
         <|> False <$ string "false"