From 090037799cc3bc47500e77ed0b767b8d21bec1aa Mon Sep 17 00:00:00 2001 From: Jakub Jelinek Date: Thu, 29 Sep 2005 15:53:59 +0200 Subject: string.c (find_option): Change 3rd argument to const st_option *. * runtime/string.c (find_option): Change 3rd argument to const st_option *. * libgfortran.h (find_option): Likewise. * runtime/environ.c (rounding, precision, signal_choices): Constify. (init_choice, show_choice): Change 2nd argument to const choice *. * io/open.c (access_opt, action_opt, blank_opt, delim_opt, form_opt, position_opt, status_opt, pad_opt): Constify. * io/transfer.c (advance_opt): Likewise. * io/inquire.c (undefined): Likewise. * io/close.c (status_opt): Likewise. * io/format.c (posint_required, period_required, nonneg_required, unexpected_element, unexpected_end, bad_string, bad_hollerith, reversion_error): Likewise. * io/unix.c (yes, no, unknown): Change from const char * into const char []. From-SVN: r104773 --- libgfortran/io/inquire.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'libgfortran/io/inquire.c') diff --git a/libgfortran/io/inquire.c b/libgfortran/io/inquire.c index 31f1ad1..56f466e 100644 --- a/libgfortran/io/inquire.c +++ b/libgfortran/io/inquire.c @@ -35,7 +35,7 @@ Boston, MA 02110-1301, USA. */ #include "io.h" -static char undefined[] = "UNDEFINED"; +static const char undefined[] = "UNDEFINED"; /* inquire_via_unit()-- Inquiry via unit number. The unit might not exist. */ -- cgit v1.1