mirror of
https://git.postgresql.org/git/postgresql.git
synced 2024-11-27 07:21:09 +08:00
Allow the query for a plpgsql cursor to begin with '(' as well as 'SELECT'.
Per example from Kumar, 30-Oct-03.
This commit is contained in:
parent
f4b4d7ce60
commit
3108b5db28
@ -4,7 +4,7 @@
|
||||
* procedural language
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/pl/plpgsql/src/gram.y,v 1.47 2003/09/25 23:02:12 tgl Exp $
|
||||
* $Header: /cvsroot/pgsql/src/pl/plpgsql/src/gram.y,v 1.48 2003/10/30 17:18:55 tgl Exp $
|
||||
*
|
||||
* This software is copyrighted by Jan Wieck - Hamburg.
|
||||
*
|
||||
@ -393,7 +393,7 @@ decl_statement : decl_varname decl_const decl_datatype decl_notnull decl_defval
|
||||
}
|
||||
| decl_varname K_CURSOR
|
||||
{ plpgsql_ns_push(NULL); }
|
||||
decl_cursor_args decl_is_from K_SELECT decl_cursor_query
|
||||
decl_cursor_args decl_is_from decl_cursor_query
|
||||
{
|
||||
PLpgSQL_var *new;
|
||||
PLpgSQL_expr *curname_def;
|
||||
@ -430,7 +430,7 @@ decl_statement : decl_varname decl_const decl_datatype decl_notnull decl_defval
|
||||
|
||||
new->datatype = plpgsql_parse_datatype("refcursor");
|
||||
|
||||
new->cursor_explicit_expr = $7;
|
||||
new->cursor_explicit_expr = $6;
|
||||
if ($4 == NULL)
|
||||
new->cursor_explicit_argrow = -1;
|
||||
else
|
||||
@ -447,7 +447,7 @@ decl_cursor_query :
|
||||
PLpgSQL_expr *query;
|
||||
|
||||
plpgsql_ns_setlocal(false);
|
||||
query = read_sql_stmt("SELECT ");
|
||||
query = read_sql_stmt("");
|
||||
plpgsql_ns_setlocal(true);
|
||||
|
||||
$$ = query;
|
||||
@ -1396,7 +1396,9 @@ stmt_open : K_OPEN lno cursor_varptr
|
||||
switch (tok)
|
||||
{
|
||||
case K_SELECT:
|
||||
new->query = read_sql_stmt("SELECT ");
|
||||
case '(':
|
||||
plpgsql_push_back_token(tok);
|
||||
new->query = read_sql_stmt("");
|
||||
break;
|
||||
|
||||
case K_EXECUTE:
|
||||
|
Loading…
Reference in New Issue
Block a user