# include # include # include "IIglobals.h" # include SCCSID(@(#)IIsetup.c 8.1 12/31/84) /* ** IIsetup is called to mark the start of a retrieve. */ IIsetup() { # ifdef xETR1 if (IIdebug) printf("IIsetup\n"); # endif IIin_retrieve = 1; IIr_sym.type = IIr_sym.len = 0; IIdomains = 0; IIerrflag = 0; /* flush old data from IIpb and do pre-read */ IIpb_flush(&IIpb); IIpb_prime(&IIpb, PB_NOTYPE); }