From ed5f9b5db036f8bf420b38d674c9b3b1822b3b7b Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Thu, 8 Dec 2005 05:24:58 +0000 Subject: converted things to fit in with the namespace svn path=/trunk/externals/markex/; revision=4167 --- gem_change.c | 48 ------------------------------------------------ 1 file changed, 48 deletions(-) delete mode 100644 gem_change.c (limited to 'gem_change.c') diff --git a/gem_change.c b/gem_change.c deleted file mode 100644 index dc714ec..0000000 --- a/gem_change.c +++ /dev/null @@ -1,48 +0,0 @@ -/* - * Copyright (c) 1997-1999 Mark Danks. - * For information on usage and redistribution, and for a DISCLAIMER OF ALL - * WARRANTIES, see the file, "GEM.LICENSE.TERMS" in this distribution. - */ - -#include "m_pd.h" - -/* -------------------------- gem_change ------------------------------ */ - -/* instance structure */ - -static t_class *gem_change_class; - -typedef struct _gem_change -{ - t_object x_obj; /* obligatory object header */ - float x_cur; - t_outlet *t_out1; /* the outlet */ -} t_gem_change; - -static void gem_change_float(t_gem_change *x, t_floatarg n) -{ - if (n != x->x_cur) - { - outlet_float(x->t_out1, n); - x->x_cur = n; - } -} - -static void *gem_change_new(void) /* init vals in struc */ -{ - t_gem_change *x = (t_gem_change *)pd_new(gem_change_class); - x->x_cur = -1.f; - x->t_out1 = outlet_new(&x->x_obj, 0); - return(x); -} - -void gem_change_setup(void) -{ - gem_change_class = class_new(gensym("gem_change"), (t_newmethod)gem_change_new, 0, - sizeof(t_gem_change), 0, A_NULL); - class_addfloat(gem_change_class, gem_change_float); - - #if PD_MINOR_VERSION < 37 - class_sethelpsymbol(gem_change_class, gensym("gem_change-help.pd")); -#endif -} -- cgit v1.2.1