From 43ad1f80bc893da6a68b093edb93c0f8ad8a1d3b Mon Sep 17 00:00:00 2001 From: Richard Henderson Date: Sun, 18 Jan 1998 12:03:42 -0800 Subject: [PATCH] Typo applying the last patch. From-SVN: r17415 --- gcc/f/runtime/libI77/backspace.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/f/runtime/libI77/backspace.c b/gcc/f/runtime/libI77/backspace.c index d12c5ac7ba8..b806d1ec49d 100644 --- a/gcc/f/runtime/libI77/backspace.c +++ b/gcc/f/runtime/libI77/backspace.c @@ -47,7 +47,7 @@ integer f_back(alist *a) if(b->ufmt==0) { (void) fseek(b->ufd,-(long)sizeof(uiolen),SEEK_CUR); - (void) fread((char *)&n,sizeof(int),1,b->ufd); + (void) fread((char *)&n,sizeof(uiolen),1,b->ufd); (void) fseek(b->ufd,-(long)n-2*sizeof(uiolen),SEEK_CUR); return(0); } -- 2.30.2