diff options
author | Jakub Jelinek <jakub@redhat.com> | 2005-09-29 15:53:59 +0200 |
---|---|---|
committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2005-09-29 15:53:59 +0200 |
commit | 090037799cc3bc47500e77ed0b767b8d21bec1aa (patch) | |
tree | 6e3201f8c8d3d502dd57d16041c0f18d17a276f9 /libgfortran/runtime/string.c | |
parent | 1ebd8d9ac1a51af9a1a65f1db575fd2499835074 (diff) | |
download | gcc-090037799cc3bc47500e77ed0b767b8d21bec1aa.zip gcc-090037799cc3bc47500e77ed0b767b8d21bec1aa.tar.gz gcc-090037799cc3bc47500e77ed0b767b8d21bec1aa.tar.bz2 |
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
Diffstat (limited to 'libgfortran/runtime/string.c')
-rw-r--r-- | libgfortran/runtime/string.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/runtime/string.c b/libgfortran/runtime/string.c index 5284b2f..d7963b7 100644 --- a/libgfortran/runtime/string.c +++ b/libgfortran/runtime/string.c @@ -104,7 +104,7 @@ cf_strcpy (char *dest, int dest_len, const char *src) if no default is provided. */ int -find_option (const char *s1, int s1_len, st_option * opts, +find_option (const char *s1, int s1_len, const st_option * opts, const char *error_message) { for (; opts->name; opts++) |