s4-heimdal: fixed the use of error_message() in heimdal
authorAndrew Tridgell <tridge@samba.org>
Fri, 29 Oct 2010 00:46:44 +0000 (11:46 +1100)
committerAndrew Tridgell <tridge@samba.org>
Sat, 30 Oct 2010 12:48:59 +0000 (23:48 +1100)
the lex code in heimdal had a function error_message() which conflicts
with a function from the com_err library. This replaces it with
lex_err_message()

Pair-Programmed-With: Andrew Bartlett <abartlet@samba.org>

12 files changed:
source4/heimdal/lib/asn1/asn1parse.c
source4/heimdal/lib/asn1/asn1parse.y
source4/heimdal/lib/asn1/gen_decode.c
source4/heimdal/lib/asn1/lex.c
source4/heimdal/lib/asn1/lex.h
source4/heimdal/lib/asn1/lex.l
source4/heimdal/lib/asn1/symbol.c
source4/heimdal/lib/com_err/lex.c
source4/heimdal/lib/com_err/lex.h
source4/heimdal/lib/com_err/lex.l
source4/heimdal/lib/com_err/parse.c
source4/heimdal/lib/com_err/parse.y

index 7fa937a49d938848bb8fa67d15f020c2fce091e8..4c2ae26d854754b3ce04bce533f454583684951b 100644 (file)
@@ -1794,21 +1794,21 @@ yyreduce:
 
 /* Line 1455 of yacc.c  */
 #line 244 "heimdal/lib/asn1/asn1parse.y"
 
 /* Line 1455 of yacc.c  */
 #line 244 "heimdal/lib/asn1/asn1parse.y"
-    { error_message("implicit tagging is not supported"); }
+    { lex_err_message("implicit tagging is not supported"); }
     break;
 
   case 5:
 
 /* Line 1455 of yacc.c  */
 #line 246 "heimdal/lib/asn1/asn1parse.y"
     break;
 
   case 5:
 
 /* Line 1455 of yacc.c  */
 #line 246 "heimdal/lib/asn1/asn1parse.y"
-    { error_message("automatic tagging is not supported"); }
+    { lex_err_message("automatic tagging is not supported"); }
     break;
 
   case 7:
 
 /* Line 1455 of yacc.c  */
 #line 251 "heimdal/lib/asn1/asn1parse.y"
     break;
 
   case 7:
 
 /* Line 1455 of yacc.c  */
 #line 251 "heimdal/lib/asn1/asn1parse.y"
-    { error_message("no extensibility options supported"); }
+    { lex_err_message("no extensibility options supported"); }
     break;
 
   case 17:
     break;
 
   case 17:
@@ -1888,9 +1888,9 @@ yyreduce:
 #line 354 "heimdal/lib/asn1/asn1parse.y"
     {
                    if((yyvsp[(2) - (5)].value)->type != integervalue)
 #line 354 "heimdal/lib/asn1/asn1parse.y"
     {
                    if((yyvsp[(2) - (5)].value)->type != integervalue)
-                       error_message("Non-integer used in first part of range");
+                       lex_err_message("Non-integer used in first part of range");
                    if((yyvsp[(2) - (5)].value)->type != integervalue)
                    if((yyvsp[(2) - (5)].value)->type != integervalue)
-                       error_message("Non-integer in second part of range");
+                       lex_err_message("Non-integer in second part of range");
                    (yyval.range) = ecalloc(1, sizeof(*(yyval.range)));
                    (yyval.range)->min = (yyvsp[(2) - (5)].value)->u.integervalue;
                    (yyval.range)->max = (yyvsp[(4) - (5)].value)->u.integervalue;
                    (yyval.range) = ecalloc(1, sizeof(*(yyval.range)));
                    (yyval.range)->min = (yyvsp[(2) - (5)].value)->u.integervalue;
                    (yyval.range)->max = (yyvsp[(4) - (5)].value)->u.integervalue;
@@ -1903,7 +1903,7 @@ yyreduce:
 #line 364 "heimdal/lib/asn1/asn1parse.y"
     {  
                    if((yyvsp[(2) - (5)].value)->type != integervalue)
 #line 364 "heimdal/lib/asn1/asn1parse.y"
     {  
                    if((yyvsp[(2) - (5)].value)->type != integervalue)
-                       error_message("Non-integer in first part of range");
+                       lex_err_message("Non-integer in first part of range");
                    (yyval.range) = ecalloc(1, sizeof(*(yyval.range)));
                    (yyval.range)->min = (yyvsp[(2) - (5)].value)->u.integervalue;
                    (yyval.range)->max = (yyvsp[(2) - (5)].value)->u.integervalue - 1;
                    (yyval.range) = ecalloc(1, sizeof(*(yyval.range)));
                    (yyval.range)->min = (yyvsp[(2) - (5)].value)->u.integervalue;
                    (yyval.range)->max = (yyvsp[(2) - (5)].value)->u.integervalue - 1;
@@ -1916,7 +1916,7 @@ yyreduce:
 #line 372 "heimdal/lib/asn1/asn1parse.y"
     {  
                    if((yyvsp[(4) - (5)].value)->type != integervalue)
 #line 372 "heimdal/lib/asn1/asn1parse.y"
     {  
                    if((yyvsp[(4) - (5)].value)->type != integervalue)
-                       error_message("Non-integer in second part of range");
+                       lex_err_message("Non-integer in second part of range");
                    (yyval.range) = ecalloc(1, sizeof(*(yyval.range)));
                    (yyval.range)->min = (yyvsp[(4) - (5)].value)->u.integervalue + 2;
                    (yyval.range)->max = (yyvsp[(4) - (5)].value)->u.integervalue;
                    (yyval.range) = ecalloc(1, sizeof(*(yyval.range)));
                    (yyval.range)->min = (yyvsp[(4) - (5)].value)->u.integervalue + 2;
                    (yyval.range)->max = (yyvsp[(4) - (5)].value)->u.integervalue;
@@ -1929,7 +1929,7 @@ yyreduce:
 #line 380 "heimdal/lib/asn1/asn1parse.y"
     {
                    if((yyvsp[(2) - (3)].value)->type != integervalue)
 #line 380 "heimdal/lib/asn1/asn1parse.y"
     {
                    if((yyvsp[(2) - (3)].value)->type != integervalue)
-                       error_message("Non-integer used in limit");
+                       lex_err_message("Non-integer used in limit");
                    (yyval.range) = ecalloc(1, sizeof(*(yyval.range)));
                    (yyval.range)->min = (yyvsp[(2) - (3)].value)->u.integervalue;
                    (yyval.range)->max = (yyvsp[(2) - (3)].value)->u.integervalue;
                    (yyval.range) = ecalloc(1, sizeof(*(yyval.range)));
                    (yyval.range)->min = (yyvsp[(2) - (3)].value)->u.integervalue;
                    (yyval.range)->max = (yyvsp[(2) - (3)].value)->u.integervalue;
@@ -2177,7 +2177,7 @@ yyreduce:
                  Symbol *s = addsym((yyvsp[(1) - (1)].name));
                  (yyval.type) = new_type(TType);
                  if(s->stype != Stype && s->stype != SUndefined)
                  Symbol *s = addsym((yyvsp[(1) - (1)].name));
                  (yyval.type) = new_type(TType);
                  if(s->stype != Stype && s->stype != SUndefined)
-                   error_message ("%s is not a type\n", (yyvsp[(1) - (1)].name));
+                   lex_err_message ("%s is not a type\n", (yyvsp[(1) - (1)].name));
                  else
                    (yyval.type)->symbol = s;
                }
                  else
                    (yyval.type)->symbol = s;
                }
@@ -2247,7 +2247,7 @@ yyreduce:
 #line 607 "heimdal/lib/asn1/asn1parse.y"
     {
                    if ((yyvsp[(3) - (3)].value)->type != objectidentifiervalue)
 #line 607 "heimdal/lib/asn1/asn1parse.y"
     {
                    if ((yyvsp[(3) - (3)].value)->type != objectidentifiervalue)
-                       error_message("Non-OID used in ENCODED BY constraint");
+                       lex_err_message("Non-OID used in ENCODED BY constraint");
                    (yyval.constraint_spec) = new_constraint_spec(CT_CONTENTS);
                    (yyval.constraint_spec)->u.content.type = NULL;
                    (yyval.constraint_spec)->u.content.encoding = (yyvsp[(3) - (3)].value);
                    (yyval.constraint_spec) = new_constraint_spec(CT_CONTENTS);
                    (yyval.constraint_spec)->u.content.type = NULL;
                    (yyval.constraint_spec)->u.content.encoding = (yyvsp[(3) - (3)].value);
@@ -2260,7 +2260,7 @@ yyreduce:
 #line 615 "heimdal/lib/asn1/asn1parse.y"
     {
                    if ((yyvsp[(5) - (5)].value)->type != objectidentifiervalue)
 #line 615 "heimdal/lib/asn1/asn1parse.y"
     {
                    if ((yyvsp[(5) - (5)].value)->type != objectidentifiervalue)
-                       error_message("Non-OID used in ENCODED BY constraint");
+                       lex_err_message("Non-OID used in ENCODED BY constraint");
                    (yyval.constraint_spec) = new_constraint_spec(CT_CONTENTS);
                    (yyval.constraint_spec)->u.content.type = (yyvsp[(2) - (5)].type);
                    (yyval.constraint_spec)->u.content.encoding = (yyvsp[(5) - (5)].value);
                    (yyval.constraint_spec) = new_constraint_spec(CT_CONTENTS);
                    (yyval.constraint_spec)->u.content.type = (yyvsp[(2) - (5)].type);
                    (yyval.constraint_spec)->u.content.encoding = (yyvsp[(5) - (5)].value);
@@ -2635,7 +2635,7 @@ yyreduce:
                    Symbol *s = addsym((yyvsp[(1) - (1)].name));
                    if(s->stype != SValue ||
                       s->value->type != objectidentifiervalue) {
                    Symbol *s = addsym((yyvsp[(1) - (1)].name));
                    if(s->stype != SValue ||
                       s->value->type != objectidentifiervalue) {
-                       error_message("%s is not an object identifier\n",
+                       lex_err_message("%s is not an object identifier\n",
                                      s->name);
                        exit(1);
                    }
                                      s->name);
                        exit(1);
                    }
@@ -2659,7 +2659,7 @@ yyreduce:
     {
                        Symbol *s = addsym((yyvsp[(1) - (1)].name));
                        if(s->stype != SValue)
     {
                        Symbol *s = addsym((yyvsp[(1) - (1)].name));
                        if(s->stype != SValue)
-                               error_message ("%s is not a value\n",
+                               lex_err_message ("%s is not a value\n",
                                                s->name);
                        else
                                (yyval.value) = s->value;
                                                s->name);
                        else
                                (yyval.value) = s->value;
@@ -2950,7 +2950,7 @@ yyreturn:
 void
 yyerror (const char *s)
 {
 void
 yyerror (const char *s)
 {
-     error_message ("%s\n", s);
+     lex_err_message ("%s\n", s);
 }
 
 static Type *
 }
 
 static Type *
index 611c5b521ad906a6260edbeb59264f38b3af9319..9ff9ad770721de380d699d4f344360b180bc653c 100644 (file)
@@ -241,14 +241,14 @@ ModuleDefinition: IDENTIFIER objid_opt kw_DEFINITIONS TagDefault ExtensionDefaul
 
 TagDefault     : kw_EXPLICIT kw_TAGS
                | kw_IMPLICIT kw_TAGS
 
 TagDefault     : kw_EXPLICIT kw_TAGS
                | kw_IMPLICIT kw_TAGS
-                     { error_message("implicit tagging is not supported"); }
+                     { lex_err_message("implicit tagging is not supported"); }
                | kw_AUTOMATIC kw_TAGS
                | kw_AUTOMATIC kw_TAGS
-                     { error_message("automatic tagging is not supported"); }
+                     { lex_err_message("automatic tagging is not supported"); }
                | /* empty */
                ;
 
 ExtensionDefault: kw_EXTENSIBILITY kw_IMPLIED
                | /* empty */
                ;
 
 ExtensionDefault: kw_EXTENSIBILITY kw_IMPLIED
-                     { error_message("no extensibility options supported"); }
+                     { lex_err_message("no extensibility options supported"); }
                | /* empty */
                ;
 
                | /* empty */
                ;
 
@@ -353,9 +353,9 @@ BooleanType : kw_BOOLEAN
 range          : '(' Value RANGE Value ')'
                {
                    if($2->type != integervalue)
 range          : '(' Value RANGE Value ')'
                {
                    if($2->type != integervalue)
-                       error_message("Non-integer used in first part of range");
+                       lex_err_message("Non-integer used in first part of range");
                    if($2->type != integervalue)
                    if($2->type != integervalue)
-                       error_message("Non-integer in second part of range");
+                       lex_err_message("Non-integer in second part of range");
                    $$ = ecalloc(1, sizeof(*$$));
                    $$->min = $2->u.integervalue;
                    $$->max = $4->u.integervalue;
                    $$ = ecalloc(1, sizeof(*$$));
                    $$->min = $2->u.integervalue;
                    $$->max = $4->u.integervalue;
@@ -363,7 +363,7 @@ range               : '(' Value RANGE Value ')'
                | '(' Value RANGE kw_MAX ')'
                {       
                    if($2->type != integervalue)
                | '(' Value RANGE kw_MAX ')'
                {       
                    if($2->type != integervalue)
-                       error_message("Non-integer in first part of range");
+                       lex_err_message("Non-integer in first part of range");
                    $$ = ecalloc(1, sizeof(*$$));
                    $$->min = $2->u.integervalue;
                    $$->max = $2->u.integervalue - 1;
                    $$ = ecalloc(1, sizeof(*$$));
                    $$->min = $2->u.integervalue;
                    $$->max = $2->u.integervalue - 1;
@@ -371,7 +371,7 @@ range               : '(' Value RANGE Value ')'
                | '(' kw_MIN RANGE Value ')'
                {       
                    if($4->type != integervalue)
                | '(' kw_MIN RANGE Value ')'
                {       
                    if($4->type != integervalue)
-                       error_message("Non-integer in second part of range");
+                       lex_err_message("Non-integer in second part of range");
                    $$ = ecalloc(1, sizeof(*$$));
                    $$->min = $4->u.integervalue + 2;
                    $$->max = $4->u.integervalue;
                    $$ = ecalloc(1, sizeof(*$$));
                    $$->min = $4->u.integervalue + 2;
                    $$->max = $4->u.integervalue;
@@ -379,7 +379,7 @@ range               : '(' Value RANGE Value ')'
                | '(' Value ')'
                {
                    if($2->type != integervalue)
                | '(' Value ')'
                {
                    if($2->type != integervalue)
-                       error_message("Non-integer used in limit");
+                       lex_err_message("Non-integer used in limit");
                    $$ = ecalloc(1, sizeof(*$$));
                    $$->min = $2->u.integervalue;
                    $$->max = $2->u.integervalue;
                    $$ = ecalloc(1, sizeof(*$$));
                    $$->min = $2->u.integervalue;
                    $$->max = $2->u.integervalue;
@@ -550,7 +550,7 @@ DefinedType : IDENTIFIER
                  Symbol *s = addsym($1);
                  $$ = new_type(TType);
                  if(s->stype != Stype && s->stype != SUndefined)
                  Symbol *s = addsym($1);
                  $$ = new_type(TType);
                  if(s->stype != Stype && s->stype != SUndefined)
-                   error_message ("%s is not a type\n", $1);
+                   lex_err_message ("%s is not a type\n", $1);
                  else
                    $$->symbol = s;
                }
                  else
                    $$->symbol = s;
                }
@@ -606,7 +606,7 @@ ContentsConstraint: kw_CONTAINING Type
                | kw_ENCODED kw_BY Value
                {
                    if ($3->type != objectidentifiervalue)
                | kw_ENCODED kw_BY Value
                {
                    if ($3->type != objectidentifiervalue)
-                       error_message("Non-OID used in ENCODED BY constraint");
+                       lex_err_message("Non-OID used in ENCODED BY constraint");
                    $$ = new_constraint_spec(CT_CONTENTS);
                    $$->u.content.type = NULL;
                    $$->u.content.encoding = $3;
                    $$ = new_constraint_spec(CT_CONTENTS);
                    $$->u.content.type = NULL;
                    $$->u.content.encoding = $3;
@@ -614,7 +614,7 @@ ContentsConstraint: kw_CONTAINING Type
                | kw_CONTAINING Type kw_ENCODED kw_BY Value
                {
                    if ($5->type != objectidentifiervalue)
                | kw_CONTAINING Type kw_ENCODED kw_BY Value
                {
                    if ($5->type != objectidentifiervalue)
-                       error_message("Non-OID used in ENCODED BY constraint");
+                       lex_err_message("Non-OID used in ENCODED BY constraint");
                    $$ = new_constraint_spec(CT_CONTENTS);
                    $$->u.content.type = $2;
                    $$->u.content.encoding = $5;
                    $$ = new_constraint_spec(CT_CONTENTS);
                    $$->u.content.type = $2;
                    $$->u.content.encoding = $5;
@@ -851,7 +851,7 @@ objid_element       : IDENTIFIER '(' NUMBER ')'
                    Symbol *s = addsym($1);
                    if(s->stype != SValue ||
                       s->value->type != objectidentifiervalue) {
                    Symbol *s = addsym($1);
                    if(s->stype != SValue ||
                       s->value->type != objectidentifiervalue) {
-                       error_message("%s is not an object identifier\n",
+                       lex_err_message("%s is not an object identifier\n",
                                      s->name);
                        exit(1);
                    }
                                      s->name);
                        exit(1);
                    }
@@ -884,7 +884,7 @@ Valuereference      : IDENTIFIER
                {
                        Symbol *s = addsym($1);
                        if(s->stype != SValue)
                {
                        Symbol *s = addsym($1);
                        if(s->stype != SValue)
-                               error_message ("%s is not a value\n",
+                               lex_err_message ("%s is not a value\n",
                                                s->name);
                        else
                                $$ = s->value;
                                                s->name);
                        else
                                $$ = s->value;
@@ -942,7 +942,7 @@ ObjectIdentifierValue: objid
 void
 yyerror (const char *s)
 {
 void
 yyerror (const char *s)
 {
-     error_message ("%s\n", s);
+     lex_err_message ("%s\n", s);
 }
 
 static Type *
 }
 
 static Type *
index ad76c07251d4955ac17e8e23cff35e3a7e104a3a..5a24339c4274c949ff43200d8329ca52d708e958 100644 (file)
@@ -143,7 +143,7 @@ find_tag (const Type *t,
     case TType:
        if ((t->symbol->stype == Stype && t->symbol->type == NULL)
            || t->symbol->stype == SUndefined) {
     case TType:
        if ((t->symbol->stype == Stype && t->symbol->type == NULL)
            || t->symbol->stype == SUndefined) {
-           error_message("%s is imported or still undefined, "
+           lex_err_message("%s is imported or still undefined, "
                          " can't generate tag checking data in CHOICE "
                          "without this information",
                          t->symbol->name);
                          " can't generate tag checking data in CHOICE "
                          "without this information",
                          t->symbol->name);
index 612d336168b3e4565d0c08efc8f143c19c6b642c..fd19f23f8d741993749fb72a0f1f096b6a58b812 100644 (file)
@@ -1657,7 +1657,7 @@ YY_RULE_SETUP
                          yylval.constant = strtol((const char *)yytext,
                                                   &e, 0);
                          if(e == y)
                          yylval.constant = strtol((const char *)yytext,
                                                   &e, 0);
                          if(e == y)
-                           error_message("malformed constant (%s)", yytext);
+                           lex_err_message("malformed constant (%s)", yytext);
                          else
                            return NUMBER;
                        }
                          else
                            return NUMBER;
                        }
@@ -1694,7 +1694,7 @@ YY_RULE_SETUP
 case 94:
 YY_RULE_SETUP
 #line 273 "lex.l"
 case 94:
 YY_RULE_SETUP
 #line 273 "lex.l"
-{ error_message("Ignoring char(%c)\n", *yytext); }
+{ lex_err_message("Ignoring char(%c)\n", *yytext); }
        YY_BREAK
 case 95:
 YY_RULE_SETUP
        YY_BREAK
 case 95:
 YY_RULE_SETUP
@@ -2712,7 +2712,7 @@ yywrap ()
 #endif
 
 void
 #endif
 
 void
-error_message (const char *format, ...)
+lex_err_message (const char *format, ...)
 {
     va_list args;
 
 {
     va_list args;
 
@@ -2726,6 +2726,6 @@ error_message (const char *format, ...)
 static void
 unterminated(const char *type, unsigned start_lineno)
 {
 static void
 unterminated(const char *type, unsigned start_lineno)
 {
-    error_message("unterminated %s, possibly started on line %d\n", type, start_lineno);
+    lex_err_message("unterminated %s, possibly started on line %d\n", type, start_lineno);
 }
 
 }
 
index abca8f723de35c61fb6a7a9309716a334ba5be7f..f203c98f1fa030559d0883409f1e2f57823e983c 100644 (file)
@@ -35,7 +35,7 @@
 
 #include <roken.h>
 
 
 #include <roken.h>
 
-void error_message (const char *, ...)
+void lex_err_message (const char *, ...)
 __attribute__ ((format (printf, 1, 2)));
 extern int error_flag;
 
 __attribute__ ((format (printf, 1, 2)));
 extern int error_flag;
 
index 7bd442bc502abcee27b1ac4b969905e019282e1b..d5be97538f0847ebd236799342e13e0c86c78817 100644 (file)
@@ -50,6 +50,8 @@
 #include "lex.h"
 #include "gen_locl.h"
 
 #include "lex.h"
 #include "gen_locl.h"
 
+static void lex_err_message (const char *format, ...);
+
 static unsigned lineno = 1;
 
 #undef ECHO
 static unsigned lineno = 1;
 
 #undef ECHO
@@ -258,7 +260,7 @@ WITH                        { return kw_WITH; }
                          yylval.constant = strtol((const char *)yytext,
                                                   &e, 0);
                          if(e == y)
                          yylval.constant = strtol((const char *)yytext,
                                                   &e, 0);
                          if(e == y)
-                           error_message("malformed constant (%s)", yytext);
+                           lex_err_message("malformed constant (%s)", yytext);
                          else
                            return NUMBER;
                        }
                          else
                            return NUMBER;
                        }
@@ -270,7 +272,7 @@ WITH                        { return kw_WITH; }
 \n                     { ++lineno; }
 \.\.\.                 { return ELLIPSIS; }
 \.\.                   { return RANGE; }
 \n                     { ++lineno; }
 \.\.\.                 { return ELLIPSIS; }
 \.\.                   { return RANGE; }
-.                      { error_message("Ignoring char(%c)\n", *yytext); }
+.                      { lex_err_message("Ignoring char(%c)\n", *yytext); }
 %%
 
 #ifndef yywrap /* XXX */
 %%
 
 #ifndef yywrap /* XXX */
@@ -281,8 +283,8 @@ yywrap ()
 }
 #endif
 
 }
 #endif
 
-void
-error_message (const char *format, ...)
+static void
+lex_err_message (const char *format, ...)
 {
     va_list args;
 
 {
     va_list args;
 
@@ -296,5 +298,5 @@ error_message (const char *format, ...)
 static void
 unterminated(const char *type, unsigned start_lineno)
 {
 static void
 unterminated(const char *type, unsigned start_lineno)
 {
-    error_message("unterminated %s, possibly started on line %d\n", type, start_lineno);
+    lex_err_message("unterminated %s, possibly started on line %d\n", type, start_lineno);
 }
 }
index e65876a032c20bfc0b30c5abdb9c4b1fab99ddb1..93d2cd4594c9ebc27b60f1ebda034c019b90f057 100644 (file)
@@ -93,7 +93,7 @@ checkfunc(void *ptr, void *arg)
 {
     Symbol *s = ptr;
     if (s->stype == SUndefined) {
 {
     Symbol *s = ptr;
     if (s->stype == SUndefined) {
-       error_message("%s is still undefined\n", s->name);
+       lex_err_message("%s is still undefined\n", s->name);
        *(int *) arg = 1;
     }
     return 0;
        *(int *) arg = 1;
     }
     return 0;
index 9afc27a6bed2a9b3278e7306f8a91d6ab6af77e6..3b17cd7035829cd5c5cee3ef7767cafb375933a1 100644 (file)
@@ -1899,7 +1899,7 @@ getstring(void)
            continue;
        }
        if(c == '\n'){
            continue;
        }
        if(c == '\n'){
-           error_message("unterminated string");
+           lex_err_message("unterminated string");
            lineno++;
            break;
        }
            lineno++;
            break;
        }
@@ -1919,7 +1919,7 @@ getstring(void)
 }
 
 void
 }
 
 void
-error_message (const char *format, ...)
+lex_err_message (const char *format, ...)
 {
      va_list args;
 
 {
      va_list args;
 
index 76f3e2b2a5db60ee4398f39db13dc3959e0ac511..abfec922f04a0f848ef567a97cf8b75577fa889d 100644 (file)
@@ -33,7 +33,7 @@
 
 /* $Id$ */
 
 
 /* $Id$ */
 
-void error_message (const char *, ...)
+void lex_err_message (const char *, ...)
 __attribute__ ((format (printf, 1, 2)));
 
 int yylex(void);
 __attribute__ ((format (printf, 1, 2)));
 
 int yylex(void);
index b68814b21caa0993ae4b45acc31efb7118091543..f099c1e1bd3cc24270d5a5f8a2a80eb51e057fc6 100644 (file)
@@ -94,7 +94,7 @@ getstring(void)
            continue;
        }
        if(c == '\n'){
            continue;
        }
        if(c == '\n'){
-           error_message("unterminated string");
+           lex_err_message("unterminated string");
            lineno++;
            break;
        }
            lineno++;
            break;
        }
@@ -114,7 +114,7 @@ getstring(void)
 }
 
 void
 }
 
 void
-error_message (const char *format, ...)
+lex_err_message (const char *format, ...)
 {
      va_list args;
 
 {
      va_list args;
 
index 4e087e4a95e16a7778285001b163827c1e218c3e..73a2c1c35cf1e7c32932c684c3ed6171c8248517 100644 (file)
@@ -1736,6 +1736,6 @@ name2number(const char *str)
 void
 yyerror (char *s)
 {
 void
 yyerror (char *s)
 {
-     error_message ("%s\n", s);
+     lex_err_message ("%s\n", s);
 }
 
 }
 
index d64681d90234dc0434426f2508a92e5ee15ddee0..f1ae64d97e806c0eb7dee3f78fa05fb1bcbb832d 100644 (file)
@@ -167,5 +167,5 @@ name2number(const char *str)
 void
 yyerror (char *s)
 {
 void
 yyerror (char *s)
 {
-     error_message ("%s\n", s);
+     lex_err_message ("%s\n", s);
 }
 }