ctype ct;
alkind fkind = sRef_getAliasKind (fref);
alkind tkind = sRef_getAliasKind (tref);
-
+
DPRINTF (("Check completely defined: %s [%s] / %s [%s]",
exprNode_unparse (fexp), sRef_unparseFull (fref),
exprNode_unparse (texp), sRef_unparseFull (tref)));
ct = ctype_realType (sRef_getType (fref));
+ DPRINTF (("Here: %s", ctype_unparse (ct)));
+
if (!(sRef_isAnyDefined (fref)
|| sRef_isPdefined (fref)
|| sRef_isAllocated (fref)
{
sRef rb = sRef_getRootBase (fref);
sRef_showStateInfo (fref);
+
+ DPRINTF (("fref: %s", sRef_unparseFull (fref)));
+ DPRINTF (("rb: %s", sRef_unparseFull (rb)));
sRef_setDefinedComplete (rb, loc);
}
}
{
return YES;
}
- else if (ctype_isPointer (ct))
+ else if (ctype_isPointer (ct) || ctype_isArray (ct)) /* evans 2001-07-12 added ctype_isArray */
{
ctype tct = ctype_realType (sRef_getType (tref));
}
else
{
+ DPRINTF (("Here fref: %s", sRef_unparseFull (fref)));
+
if (ctype_isAP (tct) || ctype_isUnknown (tct))
{
sRef fptr = sRef_constructDeref (fref);
}
}
}
- else if (ctype_isArray (ct))
- {
- return YES;
- }
else if (ctype_isStruct (ct))
{
ctype tct = ctype_realType (sRef_getType (tref));