#define out(a,b) {n=b;if(n==0) fprintf(stderr,"%s:%d\n",a,errno);else \
fprintf(stderr,"%s:%d %d\n",a,errno,n);}
char yy
[] = "terrible junk";
setolist(&xopen
,9,"junk","o","u",0,NULL
,0);
out("open",f_open(&xopen
));
setcilist(&xio
,9,NULL
,0,0,0);
out("start",s_wsue(&xio
));
out("io",do_uio(&one
,xx
,(long)sizeof(xx
)-1));
out("bck",f_back(&xaux
));
out("bck",f_back(&xaux
));
out("startr",s_rsue(&xio
));
out("rio",do_uio(&one
,yy
,(long)sizeof(xx
)-1));
fprintf(stdout
,"yy: %s\n",yy
);