Typo applying the last patch.
authorRichard Henderson <rth@gcc.gnu.org>
Sun, 18 Jan 1998 20:03:42 +0000 (12:03 -0800)
committerRichard Henderson <rth@gcc.gnu.org>
Sun, 18 Jan 1998 20:03:42 +0000 (12:03 -0800)
From-SVN: r17415

gcc/f/runtime/libI77/backspace.c

index d12c5ac7ba81c6de19fd5993f54b6c4326363bb7..b806d1ec49ddfa4b3ea19ca9cdcbd5b55de7b8d6 100644 (file)
@@ -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);
        }