aboutsummaryrefslogtreecommitdiff
path: root/control/inv.c
diff options
context:
space:
mode:
authorHans-Christoph Steiner <eighthave@users.sourceforge.net>2005-11-14 21:59:09 +0000
committerHans-Christoph Steiner <eighthave@users.sourceforge.net>2005-11-14 21:59:09 +0000
commitc1419b43ea354fa04360450ae4f64612df065099 (patch)
tree8c38d7338e9df7e889a18dceeedb3509adbbf423 /control/inv.c
parent76be9508936fa53fe661d378ee2fc41cc9baebf3 (diff)
these pragmas are only used for MSVC, not MinGW or Cygwin, therefore changing the define from NT to _MSC_VER
svn path=/trunk/externals/ggee/; revision=3903
Diffstat (limited to 'control/inv.c')
-rwxr-xr-xcontrol/inv.c154
1 files changed, 77 insertions, 77 deletions
diff --git a/control/inv.c b/control/inv.c
index df6c2e2..0cff552 100755
--- a/control/inv.c
+++ b/control/inv.c
@@ -1,77 +1,77 @@
-/* (C) Guenter Geiger <geiger@epy.co.at> */
-
-#include <m_pd.h>
-
-
-typedef struct inv
-{
- t_object x_obj;
-} t_inv;
-
-static t_class *inv_class;
-
-static void *inv_new(void)
-{
- t_inv *x = (t_inv *)pd_new(inv_class);
- outlet_new(&x->x_obj, gensym("signal"));
- return (x);
-}
-
-static t_int *inv_perform(t_int *w) /* not static; also used in d_fft.c */
-{
- float *in = *(t_float **)(w+1), *out = *(t_float **)(w+2);
- t_int n = *(t_int *)(w+3);
- while (n--)
- {
- *out++ = 1/ *in++;
- }
- return (w + 4);
-}
-
-static void inv_dsp(t_inv *x, t_signal **sp)
-{
- dsp_add(inv_perform, 3, sp[0]->s_vec, sp[1]->s_vec, sp[0]->s_n);
-}
-
-void inv_tilde_setup(void)
-{
- inv_class = class_new(gensym("inv~"), (t_newmethod)inv_new, 0,
- sizeof(t_inv), 0, 0);
-
- class_addcreator(inv_new,gensym("1/x~"),0);
-
- class_addmethod(inv_class, nullfn, gensym("signal"), 0);
- class_addmethod(inv_class, (t_method)inv_dsp, gensym("dsp"), 0);
-}
-
-
-
-
-typedef struct scalarinv
-{
- t_object x_obj;
-} t_scalarinv;
-
-static t_class *scalarinv_class;
-
-static void *scalarinv_new(void)
-{
- t_scalarinv *x = (t_scalarinv *)pd_new(scalarinv_class);
- outlet_new(&x->x_obj, gensym("float"));
- return (x);
-}
-
-static void scalarinv_float(t_scalarinv *x,t_float val)
-{
- outlet_float(x->x_obj.ob_outlet,1.0f/val);
-
-}
-
-void inv_setup(void)
-{
- scalarinv_class = class_new(gensym("inv"), (t_newmethod)scalarinv_new, 0,
- sizeof(t_scalarinv), 0, 0);
- class_addcreator(scalarinv_new,gensym("1/x"),0);
-
- class_addfloat(scalarinv_class, (t_method)scalarinv_float);
-}
+/* (C) Guenter Geiger <geiger@epy.co.at> */
+
+#include <m_pd.h>
+
+
+typedef struct inv
+{
+ t_object x_obj;
+} t_inv;
+
+static t_class *inv_class;
+
+static void *inv_new(void)
+{
+ t_inv *x = (t_inv *)pd_new(inv_class);
+ outlet_new(&x->x_obj, gensym("signal"));
+ return (x);
+}
+
+static t_int *inv_perform(t_int *w) /* not static; also used in d_fft.c */
+{
+ float *in = *(t_float **)(w+1), *out = *(t_float **)(w+2);
+ t_int n = *(t_int *)(w+3);
+ while (n--)
+ {
+ *out++ = 1/ *in++;
+ }
+ return (w + 4);
+}
+
+static void inv_dsp(t_inv *x, t_signal **sp)
+{
+ dsp_add(inv_perform, 3, sp[0]->s_vec, sp[1]->s_vec, sp[0]->s_n);
+}
+
+void inv_tilde_setup(void)
+{
+ inv_class = class_new(gensym("inv~"), (t_newmethod)inv_new, 0,
+ sizeof(t_inv), 0, 0);
+
+ class_addcreator(inv_new,gensym("1/x~"),0);
+
+ class_addmethod(inv_class, nullfn, gensym("signal"), 0);
+ class_addmethod(inv_class, (t_method)inv_dsp, gensym("dsp"), 0);
+}
+
+
+
+
+typedef struct scalarinv
+{
+ t_object x_obj;
+} t_scalarinv;
+
+static t_class *scalarinv_class;
+
+static void *scalarinv_new(void)
+{
+ t_scalarinv *x = (t_scalarinv *)pd_new(scalarinv_class);
+ outlet_new(&x->x_obj, gensym("float"));
+ return (x);
+}
+
+static void scalarinv_float(t_scalarinv *x,t_float val)
+{
+ outlet_float(x->x_obj.ob_outlet,1.0f/val);
+
+}
+
+void inv_setup(void)
+{
+ scalarinv_class = class_new(gensym("inv"), (t_newmethod)scalarinv_new, 0,
+ sizeof(t_scalarinv), 0, 0);
+ class_addcreator(scalarinv_new,gensym("1/x"),0);
+
+ class_addfloat(scalarinv_class, (t_method)scalarinv_float);
+}