diff options
| author | Toon Moene <toon@moene.indiv.nluug.nl> | 1998-01-18 21:02:04 +0100 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 1998-01-18 12:02:04 -0800 |
| commit | 94f09d6b4079723b2116914a6e0300fe6e483d97 (patch) | |
| tree | 169e406aed20bea8a601f28ba10ee43a2e81c206 /gcc | |
| parent | 30c2fa75780cac92e1af249a60cd839667c9bc73 (diff) | |
| download | gcc-94f09d6b4079723b2116914a6e0300fe6e483d97.zip gcc-94f09d6b4079723b2116914a6e0300fe6e483d97.tar.gz gcc-94f09d6b4079723b2116914a6e0300fe6e483d97.tar.bz2 | |
f_back (f/runtime/libI77/backspace.c): use type `uiolen' to determine size of record length specifier.
* f_back (f/runtime/libI77/backspace.c): use type `uiolen'
to determine size of record length specifier.
From-SVN: r17414
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/f/runtime/ChangeLog.egcs | 5 | ||||
| -rw-r--r-- | gcc/f/runtime/libI77/backspace.c | 7 |
2 files changed, 9 insertions, 3 deletions
diff --git a/gcc/f/runtime/ChangeLog.egcs b/gcc/f/runtime/ChangeLog.egcs index e052c2d..86cafcc 100644 --- a/gcc/f/runtime/ChangeLog.egcs +++ b/gcc/f/runtime/ChangeLog.egcs @@ -1,3 +1,8 @@ +Sun Jan 18 20:01:37 1998 Toon Moene <toon@moene.indiv.nluug.nl> + + * f_back (f/runtime/libI77/backspace.c): use type `uiolen' + to determine size of record length specifier. + Sat Jan 17 22:40:31 1998 Mumit Khan <khan@xraylith.wisc.edu> * libU77/configure.in (sys/param.h,sys/times.h): Check. diff --git a/gcc/f/runtime/libI77/backspace.c b/gcc/f/runtime/libI77/backspace.c index 8413d5f..d12c5ac 100644 --- a/gcc/f/runtime/libI77/backspace.c +++ b/gcc/f/runtime/libI77/backspace.c @@ -7,7 +7,8 @@ integer f_back(a) alist *a; integer f_back(alist *a) #endif { unit *b; - int i, n, ndec; + int i, ndec; + uiolen n; #if defined (MSDOS) && !defined (GO32) int j, k; long w, z; @@ -45,9 +46,9 @@ integer f_back(alist *a) } if(b->ufmt==0) - { (void) fseek(b->ufd,-(long)sizeof(int),SEEK_CUR); + { (void) fseek(b->ufd,-(long)sizeof(uiolen),SEEK_CUR); (void) fread((char *)&n,sizeof(int),1,b->ufd); - (void) fseek(b->ufd,-(long)n-2*sizeof(int),SEEK_CUR); + (void) fseek(b->ufd,-(long)n-2*sizeof(uiolen),SEEK_CUR); return(0); } #if defined (MSDOS) && !defined (GO32) |