Method parse_on

core/src/parser.rs:1554–1585

Parses an `ON ERROR` statement. Only `ON` has been consumed so far.

(&mut self, pos: LineCol)

    /// Parses an `ON ERROR` statement.  Only `ON` has been consumed so far.
    fn parse_on(&mut self, pos: LineCol) -> Result<Statement> {
        self.expect_and_consume(Token::Error, "Expected ERROR after ON")?;

        let token_span = self.lexer.read()?;
        match token_span.token {
            Token::Goto => {
                let token_span = self.lexer.read()?;
                match token_span.token {
                    Token::Integer(0) => Ok(Statement::OnError(OnErrorSpan::Reset(pos))),
                    Token::Integer(i) => Ok(Statement::OnError(OnErrorSpan::Goto(
                        GotoSpan { target: format!("{}", i), target_pos: token_span.pos },
                        pos,
                    ))),
                    Token::Label(target) => Ok(Statement::OnError(OnErrorSpan::Goto(
                        GotoSpan { target, target_pos: token_span.pos },
                        pos,
                    ))),
                    _ => Err(Error::Bad(
                        token_span.pos,
                        "Expected label name or 0 after ON ERROR GOTO".to_owned(),
                    )),
                }
            }
            Token::Resume => {
                self.expect_and_consume(Token::Next, "Expected NEXT after ON ERROR RESUME")?;
                Ok(Statement::OnError(OnErrorSpan::ResumeNext(pos)))
            }
            _ => {
                Err(Error::Bad(token_span.pos, "Expected GOTO or RESUME after ON ERROR".to_owned()))
            }
        }
    }

    /// Parses the guards after a `CASE` keyword.
    fn parse_case_guards(&mut self) -> Result<Vec<CaseGuardSpan>> {