From c80ad601728139c16c4903f5ed08680f7e5f203c Mon Sep 17 00:00:00 2001 From: mescalinum Date: Sun, 13 Nov 2011 22:52:33 +0000 Subject: 0.3.0 - typemaps support complete svn path=/trunk/externals/loaders/tclpd/; revision=15738 --- tcl_proxyinlet.c | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) (limited to 'tcl_proxyinlet.c') diff --git a/tcl_proxyinlet.c b/tcl_proxyinlet.c index e1cdb48..295b2db 100644 --- a/tcl_proxyinlet.c +++ b/tcl_proxyinlet.c @@ -1,8 +1,8 @@ -#include "tcl_extras.h" +#include "tclpd.h" -t_class* proxyinlet_class; +t_class *proxyinlet_class; -void proxyinlet_init(t_proxyinlet* x) { +void proxyinlet_init(t_proxyinlet *x) { //x->pd = proxyinlet_class; x->target = NULL; x->sel = gensym("none"); @@ -10,7 +10,7 @@ void proxyinlet_init(t_proxyinlet* x) { x->argv = NULL; } -void proxyinlet_clear(t_proxyinlet* x) { +void proxyinlet_clear(t_proxyinlet *x) { if(x->argv) { freebytes(x->argv, x->argc * sizeof(*x->argv)); } @@ -18,10 +18,10 @@ void proxyinlet_clear(t_proxyinlet* x) { #define PROXYINLET_SEL_TO_LIST 0 // 0 or 1 -void proxyinlet_anything(t_proxyinlet* x, t_symbol* s, int argc, t_atom* argv) { +void proxyinlet_anything(t_proxyinlet *x, t_symbol *s, int argc, t_atom *argv) { proxyinlet_clear(x); - if(!(x->argv = (t_atom*)getbytes((argc+PROXYINLET_SEL_TO_LIST) * sizeof(*x->argv)))) { + if(!(x->argv = (t_atom *)getbytes((argc+PROXYINLET_SEL_TO_LIST) * sizeof(*x->argv)))) { x->argc = 0; error("proxyinlet: getbytes: out of memory"); return; @@ -39,22 +39,22 @@ void proxyinlet_anything(t_proxyinlet* x, t_symbol* s, int argc, t_atom* argv) { proxyinlet_trigger(x); } -void proxyinlet_trigger(t_proxyinlet* x) { +void proxyinlet_trigger(t_proxyinlet *x) { if(x->target != NULL && x->sel != gensym("none")) { tclpd_inlet_anything(x->target, x->ninlet, x->sel, x->argc, x->argv); } } -t_atom* proxyinlet_get_atoms(t_proxyinlet* x) { +t_atom * proxyinlet_get_atoms(t_proxyinlet *x) { return x->argv; } -void proxyinlet_clone(t_proxyinlet* x, t_proxyinlet* y) { +void proxyinlet_clone(t_proxyinlet *x, t_proxyinlet *y) { y->target = x->target; y->sel = x->sel; y->argc = x->argc; - if(!(y->argv = (t_atom*)getbytes(y->argc * sizeof(*y->argv)))) { + if(!(y->argv = (t_atom *)getbytes(y->argc * sizeof(*y->argv)))) { y->argc = 0; error("proxyinlet: getbytes: out of memory"); return; -- cgit v1.2.1