Lexer ()
popDisable = maybe (modifyState' tail) (const parserZero) =<< peek

stackNull ::
popDisable :: Lexer ()
popDisable = maybe (modifyState' tail) (const parserZero) =<< peek
popDisable = maybe (modifyState' tail) (const parserZero) =<< peek