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); }