if (ctype_isBroken (clp))
{
- llbuglit ("ctype_baseArrayPtr: bogus ctype");
+ llcontbug (message ("ctype_baseArrayPtr: bogus ctype getting base of: %s", ctype_unparse (c)));
+ return ctype_unknown;
}
return clp;
ctype ctype_biggerType (ctype c1, ctype c2)
{
- if (ctbase_isBigger (ctype_getCtbaseSafe (c2), ctype_getCtbaseSafe (c1)) )
+ if (ctbase_isBigger (ctype_getCtbaseSafe (c2), ctype_getCtbaseSafe (c1)))
{
return c2;
}
return c1;
}
}
+
+int ctype_getSize (ctype c)
+{
+ return ctbase_getSize (ctype_getCtbaseSafe (ctype_realType (c)));
+}