From 93dcd1630d85331334f1f58a8939142cb4342449 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?= Date: Sun, 12 Mar 2006 21:06:59 +0000 Subject: change has long been in core pd; added abstraction for the some of the functions svn path=/trunk/externals/markex/; revision=4695 --- change.c | 48 ------------------------------------------------ 1 file changed, 48 deletions(-) delete mode 100644 change.c (limited to 'change.c') diff --git a/change.c b/change.c deleted file mode 100644 index f42cf37..0000000 --- a/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" - -/* -------------------------- change ------------------------------ */ - -/* instance structure */ - -static t_class *change_class; - -typedef struct _change -{ - t_object x_obj; /* obligatory object header */ - float x_cur; - t_outlet *t_out1; /* the outlet */ -} t_change; - -static void change_float(t_change *x, t_floatarg n) -{ - if (n != x->x_cur) - { - outlet_float(x->t_out1, n); - x->x_cur = n; - } -} - -static void *change_new(void) /* init vals in struc */ -{ - t_change *x = (t_change *)pd_new(change_class); - x->x_cur = -1.f; - x->t_out1 = outlet_new(&x->x_obj, 0); - return(x); -} - -void change_setup(void) -{ - change_class = class_new(gensym("change"), (t_newmethod)change_new, 0, - sizeof(t_change), 0, A_NULL); - class_addfloat(change_class, change_float); - - #if PD_MINOR_VERSION < 37 - -#endif -} -- cgit v1.2.1