cmp=(int (*)())sk_value(names_cmp,a->type); ret=cmp(a->name,b->name);
cmp.char_p=sk_value(names_cmp,a->type); ret=cmp.fn_p(a->name,b->name);
static int obj_name_cmp(OBJ_NAME *a, OBJ_NAME *b)	{	int ret;	int (*cmp)();	ret=a->type-b->type;	if (ret == 0)		{		if ((names_cmp != NULL) && (sk_num(names_cmp) > a->type))			{			cmp=(int (*)())sk_value(names_cmp,a->type);			ret=cmp(a->name,b->name);			}		else			ret=strcmp(a->name,b->name);		}	return(ret);	}