Truncate identifiers at NAMEDATALEN length.

diff --git a/src/backend/parser/scan.l b/src/backend/parser/scan.l
index bf18df010c2f7779ae2c6993b9d7ed1a69704b82..ac4c78a3d0a7055b4d3cd6490ec2403d0e1985fa 100644 (file)
--- a/src/backend/parser/scan.l
+++ b/src/backend/parser/scan.l
@@ -8,7 +8,7 @@
  *
  *
  * IDENTIFICATION
- *   $Header: /cvsroot/pgsql/src/backend/parser/scan.l,v 1.40 1998/06/16 07:29:27 momjian Exp $
+ *   $Header: /cvsroot/pgsql/src/backend/parser/scan.l,v 1.41 1998/08/29 02:36:18 momjian Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -323,6 +323,8 @@ other           .
                        if (isascii((unsigned char)yytext[i]) &&
                            isupper(yytext[i]))
                            yytext[i] = tolower(yytext[i]);
+                   if (i > NAMEDATALEN)
+                       yytext[NAMEDATALEN] = '\0';
 
                    keyword = ScanKeywordLookup((char*)yytext);
                    if (keyword != NULL) {
@@ -400,6 +402,8 @@ other           .
                        if (isascii((unsigned char)yytext[i]) &&
                            isupper(yytext[i]))
                            yytext[i] = tolower(yytext[i]);
+                   if (i > NAMEDATALEN)
+                       yytext[NAMEDATALEN] = '\0';
 
                    keyword = ScanKeywordLookup((char*)yytext);
                    if (keyword != NULL) {