aboutsummaryrefslogtreecommitdiff
path: root/src/z_wrap.c
diff options
context:
space:
mode:
authorIOhannes m zmölnig <zmoelnig@users.sourceforge.net>2005-03-22 20:58:25 +0000
committerIOhannes m zmölnig <zmoelnig@users.sourceforge.net>2005-03-22 20:58:25 +0000
commit2b60d55c919e7588f5aff15936e83c300b3660bb (patch)
tree14d860de7f28083d3756ad91b627de70f26788f6 /src/z_wrap.c
parentc500bc542cb7cc78d6dac3f7da3bff626056b1aa (diff)
zexy-2.0:
- use of abstractions for objects that allow it - some objects are build both as externals and abstractions (as slower fallbacks) - code-layout is now 1:1 c-file<->object (this should allow for building of zexy as a collection of externals instead as a big library) - matrix-objects have moved to iemmatrix !! svn path=/trunk/externals/zexy/; revision=2641
Diffstat (limited to 'src/z_wrap.c')
-rw-r--r--src/z_wrap.c64
1 files changed, 0 insertions, 64 deletions
diff --git a/src/z_wrap.c b/src/z_wrap.c
deleted file mode 100644
index 80b0fcd..0000000
--- a/src/z_wrap.c
+++ /dev/null
@@ -1,64 +0,0 @@
-/* wrap floats between to limits */
-
-#include "zexy.h"
-#include <math.h>
-
-static t_class *wrap_class;
-
-typedef struct _wrap {
- t_object x_obj;
- t_float f_upper, f_lower;
-} t_wrap;
-
-
-void wrap_float(t_wrap *x, t_float f)
-{
- if (x->f_lower==x->f_upper)
- outlet_float(x->x_obj.ob_outlet, x->f_lower);
- else {
- t_float modulo = fmod((f-x->f_lower),(x->f_upper-x->f_lower));
- if (modulo<0)modulo+=(x->f_upper-x->f_lower);
-
- outlet_float(x->x_obj.ob_outlet, x->f_lower+modulo);
- }
-}
-void wrap_set(t_wrap *x, t_symbol *s, int argc, t_atom *argv){
- t_float f1, f2;
- switch (argc){
- case 0:
- f1=0.0;
- f2=1.0;
- break;
- case 1:
- f1=0.0;
- f2 = atom_getfloat(argv);
- break;
- default:
- f1 = atom_getfloat(argv);
- f2 = atom_getfloat(argv+1);
- }
- x->f_lower=(f1<f2)?f1:f2;
- x->f_upper=(f1>f2)?f1:f2;
-}
-
-void *wrap_new(t_symbol *s, int argc, t_atom*argv)
-{
- t_wrap *x = (t_wrap *)pd_new(wrap_class);
- wrap_set(x, s, argc, argv);
-
- outlet_new(&x->x_obj, &s_float);
- inlet_new(&x->x_obj, &x->x_obj.ob_pd, gensym("float"), gensym("set"));
-
- return (void *)x;
-}
-
-void z_wrap_setup(void) {
- wrap_class = class_new(gensym("wrap"),
- (t_newmethod)wrap_new,
- 0, sizeof(t_wrap),
- CLASS_DEFAULT, A_GIMME, A_NULL);
-
- class_addfloat (wrap_class, wrap_float);
- class_addmethod(wrap_class, (t_method)wrap_set, gensym("set"), A_GIMME, 0);
- class_sethelpsymbol(wrap_class, gensym("zexy/wrap"));
-}