diff options
Diffstat (limited to 'libf2c/libI77/rsne.c')
-rw-r--r-- | libf2c/libI77/rsne.c | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/libf2c/libI77/rsne.c b/libf2c/libI77/rsne.c index 86bb2164f12..cc679c76086 100644 --- a/libf2c/libI77/rsne.c +++ b/libf2c/libI77/rsne.c @@ -54,8 +54,8 @@ un_getc(x,f__cf) int x; FILE *f__cf; #undef abs #undef min #undef max -#include <stdlib.h> -#include <string.h> +#include "stdlib.h" +#include "string.h" #ifdef ungetc static int @@ -149,6 +149,8 @@ nl_init(Void) { register char *s; register int c; + if(!f__init) + f_init(); for(s = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"; c = *s++; ) Alpha[c] = Alphanum[c] @@ -338,7 +340,7 @@ x_rsne(cilist *a) #endif } have_amp: - if (ch = getname(buf,(int) sizeof(buf))) + if (ch = getname(buf,sizeof(buf))) return ch; nl = (Namelist *)a->cifmt; if (strcmp(buf, nl->name)) @@ -393,7 +395,7 @@ x_rsne(cilist *a) if (ch <= ' ' && ch >= 0 || ch == ',') continue; Ungetc(ch,f__cf); - if (ch = getname(buf,(int) sizeof(buf))) + if (ch = getname(buf,sizeof(buf))) return ch; goto havename; } |