home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / usr / src / libI77 / lib.c < prev    next >
Encoding:
C/C++ Source or Header  |  1979-01-10  |  537 b   |  34 lines
  1. #include "fio.h"
  2. setcilist(x,u,fmt,rec,xerr,end) cilist *x;
  3. char *fmt;
  4. {
  5.     x->ciunit=u;
  6.     x->cifmt=fmt;
  7.     x->cirec=rec;
  8.     x->cierr=xerr;
  9.     x->ciend=end;
  10. }
  11. setolist(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. }
  23. stcllist(x,xunit,stat,cerr) cllist *x; char *stat;
  24. {
  25.     x->cerr=cerr;
  26.     x->cunit=xunit;
  27.     x->csta=stat;
  28. }
  29. setalist(x,xunit,aerr) alist *x;
  30. {
  31.     x->aunit=xunit;
  32.     x->aerr=aerr;
  33. }
  34.