Research V7 development
[unix-history] / usr / src / libI77 / lib.c
CommitLineData
8662e665
PW
1#include "fio.h"
2setcilist(x,u,fmt,rec,xerr,end) cilist *x;
3char *fmt;
4{
5 x->ciunit=u;
6 x->cifmt=fmt;
7 x->cirec=rec;
8 x->cierr=xerr;
9 x->ciend=end;
10}
11setolist(x,xunit,fname,sta,fm,rl,blnk,oerr) olist *x;
12 char *fname,*sta,*fm,*blnk;
13{
14 x->oerr=oerr;
15 x->ounit=xunit;
16 x->ofnm=fname;
17 x->ofnmlen=strlen(fname);
18 x->osta=sta;
19 x->ofm=fm;
20 x->orl=rl;
21 x->oblnk=blnk;
22}
23stcllist(x,xunit,stat,cerr) cllist *x; char *stat;
24{
25 x->cerr=cerr;
26 x->cunit=xunit;
27 x->csta=stat;
28}
29setalist(x,xunit,aerr) alist *x;
30{
31 x->aunit=xunit;
32 x->aerr=aerr;
33}