diff options
Diffstat (limited to 'tcl.i')
-rw-r--r-- | tcl.i | 6 |
1 files changed, 0 insertions, 6 deletions
@@ -45,9 +45,6 @@ #include "tcl_extras.h" typedef t_atom t_atom_array; - - /* extern "C" SWIGEXPORT int Tclpd_SafeInit(Tcl_Interp *interp); */ - /* extern "C" { void tcl_setup() {tclpd_setup(void);} } */ %} /* this does the trick of solving @@ -55,9 +52,6 @@ %name(outlet_list) EXTERN void outlet_list(t_outlet *x, t_symbol *s, int argc, t_atom_array *argv); %name(outlet_anything) EXTERN void outlet_anything(t_outlet *x, t_symbol *s, int argc, t_atom_array *argv); -//%pointer_class(t_float, t_float) -//%pointer_class(t_symbol, t_symbol) - %typemap(in) t_atom * { t_atom *a = (t_atom*)getbytes(sizeof(t_atom)); if(tcl_to_pd($input, a) == TCL_ERROR) { |