From 8935f278f8de0689116271d84c965961e9971e5e Mon Sep 17 00:00:00 2001 From: mescalinum Date: Sun, 2 Oct 2011 22:22:02 +0000 Subject: cleanup misleading comments svn path=/trunk/externals/loaders/tclpd/; revision=15463 --- tcl.i | 6 ------ 1 file changed, 6 deletions(-) (limited to 'tcl.i') diff --git a/tcl.i b/tcl.i index eb2296d..6a02761 100644 --- a/tcl.i +++ b/tcl.i @@ -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) { -- cgit v1.2.1