diff options
Diffstat (limited to 'contrib/gcc/f/stu.c')
| -rw-r--r-- | contrib/gcc/f/stu.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/contrib/gcc/f/stu.c b/contrib/gcc/f/stu.c index 7dcbdcb..cc1d95c 100644 --- a/contrib/gcc/f/stu.c +++ b/contrib/gcc/f/stu.c @@ -1,6 +1,6 @@ /* stu.c -- Implementation File (module.c template V1.0) Copyright (C) 1995-1997 Free Software Foundation, Inc. - Contributed by James Craig Burley (burley@gnu.org). + Contributed by James Craig Burley. This file is part of GNU Fortran. @@ -60,7 +60,7 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA static void ffestu_list_exec_transition_ (ffebld list); static bool ffestu_symter_end_transition_ (ffebld expr); static bool ffestu_symter_exec_transition_ (ffebld expr); -static bool ffestu_dummies_transition_ (ffesymbol (*symfunc) (), +static bool ffestu_dummies_transition_ (ffesymbol (*symfunc) (ffesymbol), ffebld list); /* Internal macros. */ @@ -122,7 +122,7 @@ ffestu_sym_end_transition (ffesymbol s) ffeinfoBasictype bt; ffeinfoKindtype kt; bool array; - char *name = NULL; + const char *name = NULL; ffestu_dummies_transition_ (ffecom_sym_end_transition, ffesymbol_dummyargs (s)); @@ -1114,7 +1114,7 @@ tail: /* :::::::::::::::::::: */ Make sure we don't get called recursively ourselves! */ static bool -ffestu_dummies_transition_ (ffesymbol (*symfunc) (), ffebld list) +ffestu_dummies_transition_ (ffesymbol (*symfunc) (ffesymbol), ffebld list) { static bool in_progress = FALSE; ffebld item; |
