static void loadmess_free(t_loadmess *x)
{
if(x->l_argv)
{
free(x->l_argv);
}
eobj_free(x);
}
extern "C" void hoa_setup(void)
{
cream_class = eclass_new("hoa", (method)hoa_new, (method)eobj_free, (short)sizeof(t_eobj), CLASS_PD, A_NULL, 0);
cream_class = eclass_new("Hoa", (method)hoa_new, (method)eobj_free, (short)sizeof(t_eobj), CLASS_PD, A_NULL, 0);
t_eobj* obj = (t_eobj *)hoa_new(NULL);
if(!obj)
{
verbose(3, "HOA Library by Pierre Guillot, Eliott Paris & Thomas Le Meur\n© 2013 - 2015 CICM | Paris 8 University\nVersion %s (%s) for Pure Data %i.%i\n",hoaversion, __DATE__, PD_MAJOR_VERSION, PD_MINOR_VERSION);
eobj_free(obj);
}
// HOA COMMON //
setup_hoa0x2econnect();
setup_hoa0x2edac_tilde();
setup_hoa0x2ein();
setup_hoa0x2ein_tilde();
setup_hoa0x2eout();
setup_hoa0x2eout_tilde();
setup_hoa0x2epi();
setup_hoa0x2epi_tilde();
setup_hoa0x2eprocess_tilde();
setup_hoa0x2ethisprocess_tilde();
setup_hoa0x2emap();
// HOA 2D //
setup_hoa0x2e2d0x2edecoder_tilde();
setup_hoa0x2e2d0x2eencoder_tilde();
setup_hoa0x2e2d0x2emap_tilde();
setup_hoa0x2e2d0x2emeter_tilde();
setup_hoa0x2e2d0x2eoptim_tilde();
setup_hoa0x2e2d0x2eprojector_tilde();
setup_hoa0x2e2d0x2erecomposer_tilde();
setup_hoa0x2e2d0x2erotate_tilde();
setup_hoa0x2e2d0x2escope_tilde();
setup_hoa0x2e2d0x2espace();
setup_hoa0x2e2d0x2ewider_tilde();
setup_hoa0x2e2d0x2eexchanger_tilde();
// HOA 3D //
setup_hoa0x2e3d0x2edecoder_tilde();
setup_hoa0x2e3d0x2eencoder_tilde();
setup_hoa0x2e3d0x2eoptim_tilde();
setup_hoa0x2e3d0x2ewider_tilde();
setup_hoa0x2e3d0x2emap_tilde();
setup_hoa0x2e3d0x2emeter_tilde();
setup_hoa0x2e3d0x2escope_tilde();
setup_hoa0x2e3d0x2eexchanger_tilde();
epd_add_folder("Hoa", "patchers");
epd_add_folder("Hoa", "clippings");
epd_add_folder("Hoa", "dependencies");
epd_add_folder("Hoa", "media");
epd_add_folder("Hoa", "misc");
}
void eobj_dspfree(void *x)
{
t_edsp* dsp = eobj_getdsp(x);
if(dsp)
{
if(dsp->d_sigs_out)
free(dsp->d_sigs_out);
if(dsp->d_sigs_real)
free(dsp->d_sigs_real);
if(dsp->d_vectors)
free(dsp->d_vectors);
}
eobj_free(x);
}
void wrappedClass_free(WrappedInstancePtr x)
{
for ( short i = 1; i < x->numInputs; i++ )
{
inlet_free(x->inlets[i]);
}
for ( short i = 0; i < x->numOutputs; i++ )
{
outlet_free(x->outlets[i]);
}
delete x->wrappedObject;
delete x->audioIn;
delete x->audioOut;
delete[] x->controlSignalNames;
eobj_free(x);
}
void *hoa_intilde_new(t_symbol *s, long argc, t_atom *argv)
{
t_hoa_in_tilde *x = NULL;
x = (t_hoa_in_tilde *)eobj_new(hoa_intilde_class);
if(x)
{
eobj_dspsetup(x, 0, 1);
x->f_extra = 0;
x->f_signal = NULL;
if(argc > 1 && argv && atom_gettype(argv) == A_SYM && atom_gettype(argv+1) == A_FLOAT && atom_getsym(argv) == gensym("extra") && atom_getfloat(argv+1) > 0)
{
x->f_extra = atom_getfloat(argv+1);
}
else if(argc && argv)
{
pd_error(x, "wrong argument.");
eobj_free(x);
return NULL;
}
}
return x;
}
void prepend_free(t_prepend *x)
{
eobj_free(x);
}
static void pak_free(t_pak *x)
{
eobj_free(x);
free(x->f_selectors);
free(x->f_argv);
}
static void leap_gesture_free(t_leap_gesture *x)
{
eobj_free(x);
}
void loadmess_free(t_loadmess *x)
{
eobj_free(x);
}
