long object_is_hoa(t_object* z)
{
rmethod nrmethod = NULL;
nrmethod = (rmethod)zgetfn((t_pd *)z, _sym_is_hoa);
if(nrmethod)
{
return (long)nrmethod((t_pd *)z);
}
else
return 0;
}
void object_method(void* x, t_symbol* s, void* z, t_typ_method method, long number, void* other)
{
t_ret_method nrmethod = (t_ret_method)getfn((t_pd *)x, s);
nrmethod(x, s, z, method, number, other);
}
void* object_method(void* x, t_symbol* s, void* z, method method, long number, void* other)
{
rmethod nrmethod = (rmethod)getfn((t_pd *)x, s);
return nrmethod(x, s, z, method, number, other);
}
