{-| Matches the end of input

>>> match eof "1"
[]
>>> match eof ""
[()]
-}
eof :: Pattern ()
eof = Pattern (do
    True <- fmap Text.null get
    return () )
eof :: Pattern ()
eof = Pattern (do
    True <- fmap Text.null get
    return () )
eof = Pattern (do
    True <- fmap Text.null get
    return () )