{-| Use this to match the prefix of a string

>>> match         "A"  "ABC"
[]
>>> match (prefix "A") "ABC"
["A"]
-}
prefix :: Pattern a -> Pattern a
prefix p = p <* chars
prefix :: Pattern a -> Pattern a
prefix p = p <* chars
prefix p = p <* chars