genlib.h#96extern  Symbollocate(Symbolrefsym);
ncgenl.c#3151    Symbolrefsym = NULL;
#3155 refsym = rootgroup;
#3176     refsym = lookupingroup(NC_GRP,ident,container);
#3177     if(refsym == NULL) {
#3180 refsym = rootgroup;
#3182         listpush(prefix,(void*)refsym);
#3186     refsym = install(ident);
#3187     refsym->objectclass = NC_GRP;/* tentative */
#3188     refsym->ref.is_ref = 1;
#3189     refsym->container = container;
#3190     refsym->subnodes = listnew();
#3192 container = refsym;
#3197        refsym->prefix = prefix;
#3200    return refsym;
ncgeny.c#3144makeenumconstref(Symbolrefsym)
#3153    refsym->objectclass = NC_TYPE;
#3154    refsym->subclass = NC_ECONST;
#3155    con.value.enumv = refsym;
semantics.c#35static Symboluniquetreelocate(SymbolrefsymSymbolroot);
#86locate(Symbolrefsym)
#89    switch (refsym->objectclass) {
#91 if(refsym->is_prefixed) {
#93     sym = lookup(NC_DIM,refsym);
#95     Symbolparent = lookupgroup(refsym->prefix);/*get group for refsym*/
#98 sym = lookupingroup(NC_DIM,refsym->name,parent);
#105 if(refsym->is_prefixed) {
#107     sym = lookup(NC_TYPE,refsym);
#115         if(strcmp(refsym->name,prim->name)==0) {
#122         parent = lookupgroup(refsym->prefix);/*get group for refsym*/
#125     sym = lookupingroup(NC_TYPE,refsym->name,parent);
#131         sym = uniquetreelocate(refsym,rootgroup); /* want unique */
#136 if(refsym->is_prefixed) {
#138     sym = lookup(NC_VAR,refsym);
#140     Symbolparent = lookupgroup(refsym->prefix);/*get group for refsym*/
#142     sym = lookupingroup(NC_VAR,refsym->name,parent);
#146 if(refsym->is_prefixed) {
#148     sym = lookup(NC_GRP,refsym);
#150      Symbolparent = lookupgroup(refsym->prefix);/*get group for refsym*/
#152     sym = lookupingroup(NC_GRP,refsym->name,parent);
#156    default: PANIC1("locate: bad refsym type: %d",refsym->objectclass);
#160 if(refsym->objectclass == NC_TYPE)
#161     ncname = ncclassname(refsym->subclass);
#163     ncname = ncclassname(refsym->objectclass);
#165 ncname,fullname(refsym),(sym?fullname(sym):"NULL"));
#175uniquetreelocate(SymbolrefsymSymbolroot)
#180    sym = lookupingroup(refsym->objectclass,refsym->name,root);
#185 Symbolnextsym = uniquetreelocate(refsym,grp);
#458    Symbolrefsym = con->value.enumv;
#462    Listcandidates = findecmatches(refsym->name);
#464 semerror(con->lineno,"Undefined enum or enum constant reference: %s",refsym->name);
#474    if(refsym->is_prefixed && refsym->prefix != NULL) {
#475 parent = lookupgroup(refsym->prefix);
#477     semerror(con->lineno,"Undefined group reference: ",fullname(refsym));
#484     semerror(con->lineno,"Undefined enum or enum constant reference: ",refsym->name);
#490     semerror(con->lineno,"Ambiguous enum constant reference: %s", fullname(refsym));
#497    parent = refsym->container;
#505     semerror(con->lineno,"Ambiguous enum constant reference: %s", fullname(refsym));
#516    semerror(con->lineno,"Ambiguous enum constant reference: %s", fullname(refsym));


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