diff options
Diffstat (limited to 'pd/src/m_glob.c')
-rw-r--r-- | pd/src/m_glob.c | 53 |
1 files changed, 37 insertions, 16 deletions
diff --git a/pd/src/m_glob.c b/pd/src/m_glob.c index eb240068..ba460aea 100644 --- a/pd/src/m_glob.c +++ b/pd/src/m_glob.c @@ -5,7 +5,7 @@ #include "m_pd.h" #include "m_imp.h" -static t_class *pdclass; +t_class *glob_pdobject; static t_class *maxclass; /* These "glob" routines, which implement messages to Pd, are from all @@ -18,6 +18,13 @@ void glob_meters(void *dummy, t_floatarg f); void glob_key(void *dummy, t_symbol *s, int ac, t_atom *av); void glob_audiostatus(void *dummy); void glob_finderror(t_pd *dummy); +void glob_audio_properties(t_pd *dummy, t_floatarg flongform); +void glob_audio_dialog(t_pd *dummy, t_symbol *s, int argc, t_atom *argv); +void glob_audio_setapi(t_pd *dummy, t_floatarg f); +void glob_midi_properties(t_pd *dummy, t_floatarg flongform); +void glob_midi_dialog(t_pd *dummy, t_symbol *s, int argc, t_atom *argv); +void glob_start_path_dialog(t_pd *dummy, t_floatarg flongform); +void glob_path_dialog(t_pd *dummy, t_symbol *s, int argc, t_atom *argv); void glob_ping(t_pd *dummy); void alsa_resync( void); @@ -30,7 +37,7 @@ void glob_audio(void *dummy, t_floatarg adc, t_floatarg dac); /* a method you add for debugging printout */ void glob_foo(void *dummy, t_symbol *s, int argc, t_atom *argv); -#if 1 +#if 0 void glob_foo(void *dummy, t_symbol *s, int argc, t_atom *argv) { *(int *)1 = 3; @@ -58,27 +65,41 @@ void glob_init(void) class_addanything(maxclass, max_default); pd_bind(&maxclass, gensym("max")); - pdclass = class_new(gensym("pd"), 0, 0, sizeof(t_pd), + glob_pdobject = class_new(gensym("pd"), 0, 0, sizeof(t_pd), CLASS_DEFAULT, A_NULL); - class_addmethod(pdclass, (t_method)glob_initfromgui, gensym("init"), + class_addmethod(glob_pdobject, (t_method)glob_initfromgui, gensym("init"), A_GIMME, 0); - class_addmethod(pdclass, (t_method)glob_setfilename, gensym("filename"), + class_addmethod(glob_pdobject, (t_method)glob_setfilename, gensym("filename"), A_SYMBOL, A_SYMBOL, 0); - class_addmethod(pdclass, (t_method)glob_evalfile, gensym("open"), + class_addmethod(glob_pdobject, (t_method)glob_evalfile, gensym("open"), A_SYMBOL, A_SYMBOL, 0); - class_addmethod(pdclass, (t_method)glob_quit, gensym("quit"), 0); - class_addmethod(pdclass, (t_method)glob_foo, gensym("foo"), A_GIMME, 0); - class_addmethod(pdclass, (t_method)glob_dsp, gensym("dsp"), A_GIMME, 0); - class_addmethod(pdclass, (t_method)glob_meters, gensym("meters"), + class_addmethod(glob_pdobject, (t_method)glob_quit, gensym("quit"), 0); + class_addmethod(glob_pdobject, (t_method)glob_foo, gensym("foo"), A_GIMME, 0); + class_addmethod(glob_pdobject, (t_method)glob_dsp, gensym("dsp"), A_GIMME, 0); + class_addmethod(glob_pdobject, (t_method)glob_meters, gensym("meters"), A_FLOAT, 0); - class_addmethod(pdclass, (t_method)glob_key, gensym("key"), A_GIMME, 0); - class_addmethod(pdclass, (t_method)glob_audiostatus, + class_addmethod(glob_pdobject, (t_method)glob_key, gensym("key"), A_GIMME, 0); + class_addmethod(glob_pdobject, (t_method)glob_audiostatus, gensym("audiostatus"), 0); - class_addmethod(pdclass, (t_method)glob_finderror, + class_addmethod(glob_pdobject, (t_method)glob_finderror, gensym("finderror"), 0); + class_addmethod(glob_pdobject, (t_method)glob_audio_properties, + gensym("audio-properties"), A_DEFFLOAT, 0); + class_addmethod(glob_pdobject, (t_method)glob_audio_dialog, + gensym("audio-dialog"), A_GIMME, 0); + class_addmethod(glob_pdobject, (t_method)glob_audio_setapi, + gensym("audio-setapi"), A_FLOAT, 0); + class_addmethod(glob_pdobject, (t_method)glob_midi_properties, + gensym("midi-properties"), A_DEFFLOAT, 0); + class_addmethod(glob_pdobject, (t_method)glob_midi_dialog, + gensym("midi-dialog"), A_GIMME, 0); + class_addmethod(glob_pdobject, (t_method)glob_start_path_dialog, + gensym("start-path-dialog"), A_DEFFLOAT, 0); + class_addmethod(glob_pdobject, (t_method)glob_path_dialog, + gensym("path-dialog"), A_GIMME, 0); #ifdef UNIX - class_addmethod(pdclass, (t_method)glob_ping, gensym("ping"), 0); + class_addmethod(glob_pdobject, (t_method)glob_ping, gensym("ping"), 0); #endif - class_addanything(pdclass, max_default); - pd_bind(&pdclass, gensym("pd")); + class_addanything(glob_pdobject, max_default); + pd_bind(&glob_pdobject, gensym("pd")); } |