meaning :: Monad m => LexerT m [Token]
meaning = (mkQuote . showMeaning) <$> (meaningCtrlSeq <|> meaningChar)
meaning :: Monad m => LexerT m [Token]
meaning = (mkQuote . showMeaning) <$> (meaningCtrlSeq <|> meaningChar)
meaning = (mkQuote . showMeaning) <$> (meaningCtrlSeq <|> meaningChar)