diff options
author | mescalinum <mescalinum@users.sourceforge.net> | 2009-08-29 19:03:44 +0000 |
---|---|---|
committer | mescalinum <mescalinum@users.sourceforge.net> | 2009-08-29 19:03:44 +0000 |
commit | d780c1e9b84d4710e80f952415dfdba48cdea6a3 (patch) | |
tree | 59056e297a793c8cb22f806549bb0c8eab9553ff /tcl_class.cxx | |
parent | ba069019909c54f3c90b7fec51c145f88cf99e3e (diff) |
I fixed it. I hate SWIG.
svn path=/trunk/externals/tclpd/; revision=12137
Diffstat (limited to 'tcl_class.cxx')
-rw-r--r-- | tcl_class.cxx | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tcl_class.cxx b/tcl_class.cxx index bb070f9..1c57b3e 100644 --- a/tcl_class.cxx +++ b/tcl_class.cxx @@ -79,6 +79,10 @@ void tclpd_anything(t_tcl *self, t_symbol *s, int ac, t_atom *at) { /* Tcl glue: */ +void tclpd_add_proxyinlet(t_object* o, t_proxyinlet* i) { + inlet_new(o, &i->pd, 0, 0); +} + t_pd* tclpd_get_instance(const char* objectSequentialId) { return object_table[objectSequentialId]; } |