Rename Mima.Parser to Mima.Parse

This commit is contained in:
Joscha 2019-11-14 23:46:48 +00:00
parent 4b4c0605b5
commit c91d3f23e9
5 changed files with 9 additions and 9 deletions

View file

@ -1,30 +0,0 @@
module Mima.Parser.Lexeme
( space
, lexeme
, symbol
, lNewline
, lNewlines
) where
import Control.Monad
import qualified Data.Text as T
import Text.Megaparsec
import qualified Text.Megaparsec.Char as C
import qualified Text.Megaparsec.Char.Lexer as L
import Mima.Parser.Common
space :: Parser ()
space = L.space (void whitespace) empty empty
lexeme :: Parser a -> Parser a
lexeme = L.lexeme space
symbol :: T.Text -> Parser T.Text
symbol = L.symbol space
lNewline :: Parser ()
lNewline = void $ lexeme C.newline
lNewlines :: Parser ()
lNewlines = void (some lNewline) <|> eof