minnie.tuhs.org/unixen.tar/unixen/PDP-11/Trees/V7/usr/src/libI77/rewind.c

C/C++ Source or Header | 1979-05-03 | 296 b | 17 lines

#include "fio.h"
f_rew(a) alist *a;
{
    unit *b;
    if(a->aunit>=MXUNIT || a->aunit<0) err(a->aerr,101,"rewind");
    b = &units[a->aunit];
    if(b->ufd == NULL) return(0);
    if(!b->useek) err(a->aerr,106,"rewind")
    if(b->uwrt)
    {    nowreading(b);
        t_runc(b);
    }
    rewind(b->ufd);
    b->uend=0;
    return(0);
}