Commit f5810bb8 authored by Bruce Momjian's avatar Bruce Momjian

Add missing trailing semicolons to ecpg rules.

Neil Conway
parent b9c7b0a2
...@@ -387,6 +387,7 @@ prog: statements; ...@@ -387,6 +387,7 @@ prog: statements;
statements: /*EMPTY*/ statements: /*EMPTY*/
| statements statement | statements statement
;
statement: ecpgstart opt_at stmt ';' { connection = NULL; } statement: ecpgstart opt_at stmt ';' { connection = NULL; }
| ecpgstart stmt ';' | ecpgstart stmt ';'
...@@ -1150,9 +1151,11 @@ key_actions: key_delete { $$ = $1; } ...@@ -1150,9 +1151,11 @@ key_actions: key_delete { $$ = $1; }
key_delete: ON DELETE key_reference key_delete: ON DELETE key_reference
{ $$ = cat2_str(make_str("on delete"), $3); } { $$ = cat2_str(make_str("on delete"), $3); }
;
key_update: ON UPDATE key_reference key_update: ON UPDATE key_reference
{ $$ = cat2_str(make_str("on update"), $3); } { $$ = cat2_str(make_str("on update"), $3); }
;
key_reference: NO ACTION { $$ = make_str("no action"); } key_reference: NO ACTION { $$ = make_str("no action"); }
| RESTRICT { $$ = make_str("restrict"); } | RESTRICT { $$ = make_str("restrict"); }
...@@ -1751,6 +1754,7 @@ func_as: StringConst ...@@ -1751,6 +1754,7 @@ func_as: StringConst
{ $$ = $1; } { $$ = $1; }
| StringConst ',' StringConst | StringConst ',' StringConst
{ $$ = cat_str(3, $1, make_str(","), $3); } { $$ = cat_str(3, $1, make_str(","), $3); }
;
func_return: func_type func_return: func_type
{ {
...@@ -3246,6 +3250,7 @@ attrs: attr_name ...@@ -3246,6 +3250,7 @@ attrs: attr_name
opt_empty_parentheses: '(' ')' { $$ = make_str("()"); } opt_empty_parentheses: '(' ')' { $$ = make_str("()"); }
| /*EMPTY*/ { $$ = EMPTY; } | /*EMPTY*/ { $$ = EMPTY; }
;
/***************************************************************************** /*****************************************************************************
...@@ -3412,6 +3417,7 @@ ECPGConnect: SQL_CONNECT TO connection_target opt_connection_name opt_user ...@@ -3412,6 +3417,7 @@ ECPGConnect: SQL_CONNECT TO connection_target opt_connection_name opt_user
/* also allow ORACLE syntax */ /* also allow ORACLE syntax */
| SQL_CONNECT ora_user | SQL_CONNECT ora_user
{ $$ = cat_str(3, make_str("NULL,"), $2, make_str(",NULL")); } { $$ = cat_str(3, make_str("NULL,"), $2, make_str(",NULL")); }
;
connection_target: database_name opt_server opt_port connection_target: database_name opt_server opt_port
{ {
...@@ -3470,6 +3476,7 @@ connection_target: database_name opt_server opt_port ...@@ -3470,6 +3476,7 @@ connection_target: database_name opt_server opt_port
else else
$$ = make3_str(make_str("\""), $1, make_str("\"")); $$ = make3_str(make_str("\""), $1, make_str("\""));
} }
;
db_prefix: ident cvariable db_prefix: ident cvariable
{ {
...@@ -3487,6 +3494,7 @@ db_prefix: ident cvariable ...@@ -3487,6 +3494,7 @@ db_prefix: ident cvariable
$$ = make3_str($1, make_str(":"), $2); $$ = make3_str($1, make_str(":"), $2);
} }
;
server: Op server_name server: Op server_name
{ {
...@@ -3498,22 +3506,28 @@ server: Op server_name ...@@ -3498,22 +3506,28 @@ server: Op server_name
$$ = make2_str($1, $2); $$ = make2_str($1, $2);
} }
;
opt_server: server { $$ = $1; } opt_server: server { $$ = $1; }
| /*EMPTY*/ { $$ = EMPTY; } | /*EMPTY*/ { $$ = EMPTY; }
;
server_name: ColId { $$ = $1; } server_name: ColId { $$ = $1; }
| ColId '.' server_name { $$ = make3_str($1, make_str("."), $3); } | ColId '.' server_name { $$ = make3_str($1, make_str("."), $3); }
| IP { $$ = make_name(); } | IP { $$ = make_name(); }
;
opt_port: ':' PosIntConst { $$ = make2_str(make_str(":"), $2); } opt_port: ':' PosIntConst { $$ = make2_str(make_str(":"), $2); }
| /*EMPTY*/ { $$ = EMPTY; } | /*EMPTY*/ { $$ = EMPTY; }
;
opt_connection_name: AS connection_target { $$ = $2; } opt_connection_name: AS connection_target { $$ = $2; }
| /*EMPTY*/ { $$ = make_str("NULL"); } | /*EMPTY*/ { $$ = make_str("NULL"); }
;
opt_user: USER ora_user { $$ = $2; } opt_user: USER ora_user { $$ = $2; }
| /*EMPTY*/ { $$ = make_str("NULL,NULL"); } | /*EMPTY*/ { $$ = make_str("NULL,NULL"); }
;
ora_user: user_name ora_user: user_name
{ $$ = cat2_str($1, make_str(", NULL")); } { $$ = cat2_str($1, make_str(", NULL")); }
...@@ -3993,6 +4007,7 @@ ECPGDeclare: DECLARE STATEMENT ident ...@@ -3993,6 +4007,7 @@ ECPGDeclare: DECLARE STATEMENT ident
* the exec sql disconnect statement: disconnect from the given database * the exec sql disconnect statement: disconnect from the given database
*/ */
ECPGDisconnect: SQL_DISCONNECT dis_name { $$ = $2; } ECPGDisconnect: SQL_DISCONNECT dis_name { $$ = $2; }
;
dis_name: connection_object { $$ = $1; } dis_name: connection_object { $$ = $1; }
| CURRENT { $$ = make_str("\"CURRENT\""); } | CURRENT { $$ = make_str("\"CURRENT\""); }
...@@ -4081,6 +4096,7 @@ opt_ecpg_into: /*EMPTY*/ { $$ = EMPTY; } ...@@ -4081,6 +4096,7 @@ opt_ecpg_into: /*EMPTY*/ { $$ = EMPTY; }
; ;
variable: civarind | civar variable: civarind | civar
;
variablelist: variable | variable ',' variablelist; variablelist: variable | variable ',' variablelist;
/* /*
...@@ -4906,6 +4922,7 @@ civar: cvariable ...@@ -4906,6 +4922,7 @@ civar: cvariable
; ;
cvariable: CVARIABLE { $$ = $1; } cvariable: CVARIABLE { $$ = $1; }
;
indicator: CVARIABLE { check_indicator((find_variable($1))->type); $$ = $1; } indicator: CVARIABLE { check_indicator((find_variable($1))->type); $$ = $1; }
| SQL_INDICATOR cvariable { check_indicator((find_variable($2))->type); $$ = $2; } | SQL_INDICATOR cvariable { check_indicator((find_variable($2))->type); $$ = $2; }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment