pl_scan.c

PostgreSQL 8.1.4的源码 适用于Linux下的开源数据库系统

	YY_BREAK
case 15:
YY_RULE_SETUP
#line 149 "scan.l"
{ return K_ELSIF;           }
	YY_BREAK
case 16:
YY_RULE_SETUP
#line 150 "scan.l"
{ return K_ELSIF;           }
	YY_BREAK
case 17:
YY_RULE_SETUP
#line 151 "scan.l"
{ return K_END;				}
	YY_BREAK
case 18:
YY_RULE_SETUP
#line 152 "scan.l"
{ return K_EXCEPTION;		}
	YY_BREAK
case 19:
YY_RULE_SETUP
#line 153 "scan.l"
{ return K_EXECUTE;			}
	YY_BREAK
case 20:
YY_RULE_SETUP
#line 154 "scan.l"
{ return K_EXIT;			}
	YY_BREAK
case 21:
YY_RULE_SETUP
#line 155 "scan.l"
{ return K_FETCH;			}
	YY_BREAK
case 22:
YY_RULE_SETUP
#line 156 "scan.l"
{ return K_FOR;				}
	YY_BREAK
case 23:
YY_RULE_SETUP
#line 157 "scan.l"
{ return K_FROM;			}
	YY_BREAK
case 24:
YY_RULE_SETUP
#line 158 "scan.l"
{ return K_GET;				}
	YY_BREAK
case 25:
YY_RULE_SETUP
#line 159 "scan.l"
{ return K_IF;				}
	YY_BREAK
case 26:
YY_RULE_SETUP
#line 160 "scan.l"
{ return K_IN;				}
	YY_BREAK
case 27:
YY_RULE_SETUP
#line 161 "scan.l"
{ return K_INFO;			}
	YY_BREAK
case 28:
YY_RULE_SETUP
#line 162 "scan.l"
{ return K_INTO;			}
	YY_BREAK
case 29:
YY_RULE_SETUP
#line 163 "scan.l"
{ return K_IS;				}
	YY_BREAK
case 30:
YY_RULE_SETUP
#line 164 "scan.l"
{ return K_LOG;				}
	YY_BREAK
case 31:
YY_RULE_SETUP
#line 165 "scan.l"
{ return K_LOOP;			}
	YY_BREAK
case 32:
YY_RULE_SETUP
#line 166 "scan.l"
{ return K_NEXT;			}
	YY_BREAK
case 33:
YY_RULE_SETUP
#line 167 "scan.l"
{ return K_NOT;				}
	YY_BREAK
case 34:
YY_RULE_SETUP
#line 168 "scan.l"
{ return K_NOTICE;			}
	YY_BREAK
case 35:
YY_RULE_SETUP
#line 169 "scan.l"
{ return K_NULL;			}
	YY_BREAK
case 36:
YY_RULE_SETUP
#line 170 "scan.l"
{ return K_OPEN;			}
	YY_BREAK
case 37:
YY_RULE_SETUP
#line 171 "scan.l"
{ return K_OR;				}
	YY_BREAK
case 38:
YY_RULE_SETUP
#line 172 "scan.l"
{ return K_PERFORM;			}
	YY_BREAK
case 39:
YY_RULE_SETUP
#line 173 "scan.l"
{ return K_RAISE;			}
	YY_BREAK
case 40:
YY_RULE_SETUP
#line 174 "scan.l"
{ return K_RENAME;			}
	YY_BREAK
case 41:
YY_RULE_SETUP
#line 175 "scan.l"
{ return K_RESULT_OID;		}
	YY_BREAK
case 42:
YY_RULE_SETUP
#line 176 "scan.l"
{ return K_RETURN;			}
	YY_BREAK
case 43:
YY_RULE_SETUP
#line 177 "scan.l"
{ return K_REVERSE;			}
	YY_BREAK
case 44:
YY_RULE_SETUP
#line 178 "scan.l"
{ return K_ROW_COUNT;		}
	YY_BREAK
case 45:
YY_RULE_SETUP
#line 179 "scan.l"
{ return K_SELECT;			}
	YY_BREAK
case 46:
YY_RULE_SETUP
#line 180 "scan.l"
{ return K_THEN;			}
	YY_BREAK
case 47:
YY_RULE_SETUP
#line 181 "scan.l"
{ return K_TO;				}
	YY_BREAK
case 48:
YY_RULE_SETUP
#line 182 "scan.l"
{ return K_TYPE;			}
	YY_BREAK
case 49:
YY_RULE_SETUP
#line 183 "scan.l"
{ return K_WARNING;			}
	YY_BREAK
case 50:
YY_RULE_SETUP
#line 184 "scan.l"
{ return K_WHEN;			}
	YY_BREAK
case 51:
YY_RULE_SETUP
#line 185 "scan.l"
{ return K_WHILE;			}
	YY_BREAK
case 52:
YY_RULE_SETUP
#line 187 "scan.l"
{ return O_OPTION;			}
	YY_BREAK
case 53:
YY_RULE_SETUP
#line 188 "scan.l"
{ return O_DUMP;			}
	YY_BREAK
/* ----------
     * Special word rules
	 *
	 * We set plpgsql_error_lineno in each rule so that errors reported
	 * in the pl_comp.c subroutines will point to the right place.
     * ----------
     */
case 54:
YY_RULE_SETUP
#line 198 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_word(yytext); }
	YY_BREAK
case 55:
YY_RULE_SETUP
#line 201 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_dblword(yytext); }
	YY_BREAK
case 56:
YY_RULE_SETUP
#line 204 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_tripword(yytext); }
	YY_BREAK
case 57:
YY_RULE_SETUP
#line 207 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_wordtype(yytext); }
	YY_BREAK
case 58:
YY_RULE_SETUP
#line 210 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_dblwordtype(yytext); }
	YY_BREAK
case 59:
YY_RULE_SETUP
#line 213 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_tripwordtype(yytext); }
	YY_BREAK
case 60:
YY_RULE_SETUP
#line 216 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_wordrowtype(yytext); }
	YY_BREAK
case 61:
YY_RULE_SETUP
#line 219 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_dblwordrowtype(yytext); }
	YY_BREAK
case 62:
YY_RULE_SETUP
#line 222 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_word(yytext); }
	YY_BREAK
case 63:
YY_RULE_SETUP
#line 225 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_dblword(yytext); }
	YY_BREAK
case 64:
YY_RULE_SETUP
#line 228 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_tripword(yytext); }
	YY_BREAK
case 65:
YY_RULE_SETUP
#line 231 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_wordtype(yytext); }
	YY_BREAK
case 66:
YY_RULE_SETUP
#line 234 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_dblwordtype(yytext); }
	YY_BREAK
case 67:
YY_RULE_SETUP
#line 237 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_tripwordtype(yytext); }
	YY_BREAK
case 68:
YY_RULE_SETUP
#line 240 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_wordrowtype(yytext); }
	YY_BREAK
case 69:
YY_RULE_SETUP
#line 243 "scan.l"
{
	plpgsql_error_lineno = plpgsql_scanner_lineno();
	return plpgsql_parse_dblwordrowtype(yytext); }
	YY_BREAK
case 70:
YY_RULE_SETUP
#line 247 "scan.l"
{ return T_NUMBER;			}
	YY_BREAK
case 71:
YY_RULE_SETUP
#line 249 "scan.l"
{
				plpgsql_error_lineno = plpgsql_scanner_lineno();
				ereport(ERROR,
						(errcode(ERRCODE_DATATYPE_MISMATCH),
						 errmsg("unterminated quoted identifier")));
			}
	YY_BREAK
/* ----------
     * Ignore whitespaces but remember this happened
     * ----------
     */
case 72:
YY_RULE_SETUP
#line 260 "scan.l"
{ plpgsql_SpaceScanned = true;		}
	YY_BREAK
/* ----------
     * Eat up comments
     * ----------
     */
case 73:
YY_RULE_SETUP
#line 266 "scan.l"
;
	YY_BREAK
case 74:
YY_RULE_SETUP
#line 268 "scan.l"
{ start_lineno = plpgsql_scanner_lineno();
			  BEGIN(IN_COMMENT);
			}
	YY_BREAK
case 75:
YY_RULE_SETUP
#line 271 "scan.l"
{ BEGIN(INITIAL); plpgsql_SpaceScanned = true; }
	YY_BREAK
case 76:
YY_RULE_SETUP
#line 272 "scan.l"
;
	YY_BREAK
case 77:
YY_RULE_SETUP
#line 273 "scan.l"
;
	YY_BREAK
case YY_STATE_EOF(IN_COMMENT):
#line 274 "scan.l"
{
				plpgsql_error_lineno = start_lineno;
				ereport(ERROR,
						(errcode(ERRCODE_DATATYPE_MISMATCH),
						 errmsg("unterminated comment")));
			}
	YY_BREAK
/* ----------
     * Collect anything inside of ''s and return one STRING token
	 *
	 * Hacking yytext/yyleng here lets us avoid using yymore(), which is
	 * a win for performance.  It's safe because we know the underlying
	 * input buffer is not changing.
     * ----------
     */
case 78:
YY_RULE_SETUP
#line 289 "scan.l"
{
			  start_lineno = plpgsql_scanner_lineno();
			  start_charpos = yytext;
			  BEGIN(IN_STRING);
			}
	YY_BREAK
case 79:
YY_RULE_SETUP
#line 294 "scan.l"
{
			  /* for now, treat the same as a regular literal */
			  start_lineno = plpgsql_scanner_lineno();
			  start_charpos = yytext;
			  BEGIN(IN_STRING);
			}
	YY_BREAK
case 80:
YY_RULE_SETUP
#line 300 "scan.l"
{ }
	YY_BREAK
case 81:
YY_RULE_SETUP
#line 301 "scan.l"
{ /* can only happen with \ at EOF */ }