class sp_expr_lex: public sp_lex_local

{

  Item *m_item;       // The expression

public:

  sp_expr_lex(THD *thd, LEX *oldlex)

   :sp_lex_local(thd, oldlex),

    m_item(NULL)

  { }

  void set_item(Item *item)

  {

    m_item= item;

  }

  Item *get_item() const

  {

    return m_item;

  }

  // The following methods are to be moved from LEX

  bool sp_continue_when_statement(THD *thd);

  bool sp_continue_when_statement(THD *thd, const LEX_CSTRING *label_name);

  int case_stmt_action_expr();

  int case_stmt_action_when(bool simple);

  bool sp_while_loop_expression(THD *thd)

  {

    return LEX::sp_while_loop_expression(thd, get_item());

  }

  // The following methods are new, to simpify the code in *.yy:

  bool sp_repeat_loop_finalize(THD *thd);

  bool sp_if_expr(THD *thd);

};

expr_lex:

          {

            DBUG_ASSERT(Lex->sphead);

            if (unlikely(!($<expr_lex>$= new (thd->mem_root)

                           sp_expr_lex(thd, thd->lex))))

              MYSQL_YYABORT;

            Lex->sphead->reset_lex(thd, $<expr_lex>$);

          }

          expr

          {

            $$= $<expr_lex>1;

            $$->sp_lex_in_use= true;

            $$->set_item($2);

            if ($$->sphead->restore_lex(thd))

              MYSQL_YYABORT;

          }

        ;