X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/da2a7671e11663b9ad941aa3e1f3014d6ad950cb..716f248dcd69ff9c1adbf6140a7028b0dc19641c:/src/symlist.c diff --git a/src/symlist.c b/src/symlist.c index c7510c43..662f1f7b 100644 --- a/src/symlist.c +++ b/src/symlist.c @@ -1,6 +1,6 @@ /* Lists of symbols for Bison - Copyright (C) 2002 Free Software Foundation, Inc. + Copyright (C) 2002, 2005 Free Software Foundation, Inc. This file is part of Bison, the GNU Compiler Compiler. @@ -16,8 +16,8 @@ You should have received a copy of the GNU General Public License along with Bison; see the file COPYING. If not, write to - the Free Software Foundation, Inc., 59 Temple Place - Suite 330, - Boston, MA 02111-1307, USA. */ + the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, + Boston, MA 02110-1301, USA. */ #include "system.h" @@ -44,6 +44,18 @@ symbol_list_new (symbol *sym, location loc) } +/*------------------. +| Print this list. | +`------------------*/ + +void +symbol_list_print (FILE *f, symbol_list *l) +{ + for (/* Nothing. */; l; l = l->next) + symbol_print (f, l->sym); +} + + /*---------------------------------. | Prepend SYM at LOC to the LIST. | `---------------------------------*/ @@ -94,7 +106,7 @@ symbol_list_n_type_name_get (symbol_list *rp, location loc, int n) if (n < 0) { - complain_at (loc, _("invalid $ value")); + complain_at (loc, _("invalid $ value: $%d"), n); return NULL; } @@ -105,7 +117,7 @@ symbol_list_n_type_name_get (symbol_list *rp, location loc, int n) rp = rp->next; if (rp == NULL || rp->sym == NULL) { - complain_at (loc, _("invalid $ value")); + complain_at (loc, _("invalid $ value: $%d"), n); return NULL; } ++i;