summaryrefslogtreecommitdiffstats
path: root/contrib/gcc/f/sts.c
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/gcc/f/sts.c')
-rw-r--r--contrib/gcc/f/sts.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/contrib/gcc/f/sts.c b/contrib/gcc/f/sts.c
index 1229ad5..143f550 100644
--- a/contrib/gcc/f/sts.c
+++ b/contrib/gcc/f/sts.c
@@ -1,6 +1,6 @@
/* sts.c -- Implementation File (module.c template V1.0)
Copyright (C) 1995 Free Software Foundation, Inc.
- Contributed by James Craig Burley (burley@gnu.org).
+ Contributed by James Craig Burley.
This file is part of GNU Fortran.
@@ -104,7 +104,7 @@ ffests_new (ffests s, mallocPool pool, ffestsLength size)
Like printf, but into a string. */
void
-ffests_printf_1D (ffests s, char *ctl, long arg1)
+ffests_printf_1D (ffests s, const char *ctl, long arg1)
{
char quickbuf[40];
char *buff;
@@ -133,7 +133,7 @@ ffests_printf_1D (ffests s, char *ctl, long arg1)
Like printf, but into a string. */
void
-ffests_printf_1U (ffests s, char *ctl, unsigned long arg1)
+ffests_printf_1U (ffests s, const char *ctl, unsigned long arg1)
{
char quickbuf[40];
char *buff;
@@ -162,7 +162,7 @@ ffests_printf_1U (ffests s, char *ctl, unsigned long arg1)
Like printf, but into a string. */
void
-ffests_printf_1s (ffests s, char *ctl, char *arg1)
+ffests_printf_1s (ffests s, const char *ctl, const char *arg1)
{
char quickbuf[40];
char *buff;
@@ -190,7 +190,7 @@ ffests_printf_1s (ffests s, char *ctl, char *arg1)
Like printf, but into a string. */
void
-ffests_printf_2Us (ffests s, char *ctl, unsigned long arg1, char *arg2)
+ffests_printf_2Us (ffests s, const char *ctl, unsigned long arg1, const char *arg2)
{
char quickbuf[60];
char *buff;
@@ -228,7 +228,7 @@ ffests_putc (ffests s, char c)
ffests_puts(s,"append me"); */
void
-ffests_puts (ffests s, char *string)
+ffests_puts (ffests s, const char *string)
{
ffests_puttext (s, string, strlen (string));
}
@@ -242,7 +242,7 @@ ffests_puts (ffests s, char *string)
and may be 0. */
void
-ffests_puttext (ffests s, char *text, ffestsLength length)
+ffests_puttext (ffests s, const char *text, ffestsLength length)
{
ffestsLength newlen;
ffestsLength newmax;
OpenPOWER on IntegriCloud