ModuleAgda-2.7.0.1Haskell2010

Agda.Syntax.Parser.LookAhead

When lexing by hand (for instance string literals) we need to do some looking ahead. The LookAhead monad keeps track of the position we are currently looking at, and provides facilities to synchronise the look-ahead position with the actual position of the Parser monad (see sync and rollback).

1 type
11 values

PackageAgda-2.7.0.1
Exports12
LanguageHaskell2010
LicenceMIT
SourceLookAhead.hs

The LookAhead monad

2 declarations

newtypenewtype LookAhead a

The LookAhead monad is basically a state monad keeping with an extra AlexInput, wrapped around the Parser monad.

Instances3Monad, Functor, Applicative

Monad LookAheadDefined in Agda-2.7.0.1 · Agda.Syntax.Parser.LookAhead
Functor LookAheadDefined in Agda-2.7.0.1 · Agda.Syntax.Parser.LookAhead
Applicative LookAheadDefined in Agda-2.7.0.1 · Agda.Syntax.Parser.LookAhead

valuerunLookAhead :: (forall b. String -> LookAhead b) -> LookAhead a -> Parser a

Run a LookAhead computation. The first argument is the error function.

Operations

10 declarations

valuelookAheadError :: String -> LookAhead a

Throw an error message according to the supplied method.

valuegetInput :: LookAhead AlexInput

Get the current look-ahead position.

valuesetInput :: AlexInput -> LookAhead ()

Set the look-ahead position.

valueliftP :: Parser a -> LookAhead a

Lift a computation in the Parser monad to the LookAhead monad.

valuenextChar :: LookAhead Char

Look at the next character. Fails if there are no more characters.

valueeatNextChar :: LookAhead Char

Consume the next character. Does nextChar followed by sync.

valuesync :: LookAhead ()

Consume all the characters up to the current look-ahead position.

valuerollback :: LookAhead ()

Undo look-ahead. Restores the input from the ParseState.

valuematch :: [(String, LookAhead a)] -> LookAhead a -> LookAhead a

Do a case on the current input string. If any of the given strings match we move past it and execute the corresponding action. If no string matches, we execute a default action, advancing the input one character. This function only affects the look-ahead position.

valuematch' :: Char -> [(String, LookAhead a)] -> LookAhead a -> LookAhead a

Same as match but takes the initial character from the first argument instead of reading it from the input. Consequently, in the default case the input is not advanced.