data.c#146srcpeek(Datasrcds)
#148    if(ds == NULL) return NULL;
#149    if(ds->index < ds->length)
#150 return &ds->data[ds->index];
#151    if(ds->spliced)
#152 return srcpeek(ds->prev);
#157srcreset(Datasrcds)
#159    ds->index = 0;
#163srcnext(Datasrcds)
#165    DUMPSRC(ds,"!");
#166    if(ds == NULL) return NULL;
#167    if(ds->index < ds->length)
#168 return &ds->data[ds->index++];
#169    if(ds->spliced) {
#170 srcpop(ds);
#171 return srcnext(ds);
#177srcmore(Datasrcds)
#179    if(ds == NULL) return 0;
#180    if(ds->index < ds->length) return 1;
#181    if(ds->spliced) return srcmore(ds->prev);
#186srcline(Datasrcds)
#188    int index = ds->index;
#189    int len = ds->length;
#193    return ds->data[index].lineno;
#232srcsplice(DatasrcdsDatalistlist)
#234    srcpushlist(ds,list);
#235    ds->spliced = 1;
#239srcsetfill(DatasrcdsDatalistlist)
#241    if(ds->index >= ds->lengthPANIC("srcsetfill: no space");
#242    if(ds->data[ds->index].nctype != NC_FILLVALUEPANIC("srcsetfill: not fill");
#243    ds->data[ds->index].nctype = NC_COMPOUND;
#244    ds->data[ds->index].value.compoundv = list;
#344datalistline(Datalistds)
#346    if(ds == NULL || ds->length == 0) return 0;
#347    return ds->data[0].lineno;
data.h#120void srcsetfill(DatasrcdsDatalistlist);
#124int srcline(Datasrcds);
#125void srcreset(Datasrcds);
#162#define srcpeek(ds) ((ds)==NULL || (ds)->index >= (ds)->max?NULL:(ds)->data+(ds)->index)


HyperKWIC - Version 7.20DA executed at 11:37 on 27 Oct 2017 | Polyhedron Solutions - INTERNAL USE | COMMERCIAL (Any O/S) SN 4AKIed