makefile_win makefile_linux update

we dont need #if MSW_VER
chanched float to t_float

svn path=/trunk/externals/iemlib/; revision=6221

40 files changed, 246 insertions, 406 deletions

diff --git a/src/iemlib2/add2_comma.c b/src/iemlib2/add2_comma.c
index 2952a53..c5b6322 100644
--- a/src/iemlib2/add2_comma.c
+++ b/src/iemlib2/add2_comma.c
@@ -5,10 +5,7 @@ iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* --------------------------------- add2_comma ----------------------------------- */
 /* -- a special add2-message for messageboxes, which append a comma to a message -- */
@@ -30,7 +27,7 @@ static void add2_comma_bang(t_add2_comma *x)
   outlet_anything(x->x_obj.ob_outlet, x->x_sym, 1, x->x_at);
 }
 
-static void add2_comma_float(t_add2_comma *x, t_float f)
+static void add2_comma_float(t_add2_comma *x, t_floatarg f)
 {
   SETCOMMA(x->x_at);
   SETFLOAT(x->x_at+1, f);
diff --git a/src/iemlib2/bpe.c b/src/iemlib2/bpe.c
index bc31ef8..56f1af0 100644
--- a/src/iemlib2/bpe.c
+++ b/src/iemlib2/bpe.c
@@ -5,10 +5,7 @@ iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* --------------------------- bpe -------------------------------- */
 /* -- break-point-envelope, convert a list of value-time-doubles -- */
@@ -37,7 +34,7 @@ static void bpe_stop(t_bpe *x)
 static void bpe_tick(t_bpe *x)
 {
   t_atom *vec = x->x_beg;
-  float val, time;
+  t_float val, time;
   
   if(x->x_curindex >= x->x_curnum)
   {
@@ -59,7 +56,7 @@ static void bpe_tick(t_bpe *x)
 static void bpe_bang(t_bpe *x)
 {
   t_atom *vec = x->x_beg;
-  float val, time;
+  t_float val, time;
   
   if(x->x_curnum)
   {
diff --git a/src/iemlib2/dollarg.c b/src/iemlib2/dollarg.c
index c21d29e..9d66f8f 100644
--- a/src/iemlib2/dollarg.c
+++ b/src/iemlib2/dollarg.c
@@ -6,12 +6,7 @@ iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005
 #include "m_pd.h"
 #include "g_canvas.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
 
-EXTERN void canvas_getargs(int *argcp, t_atom **argvp);
 
 /* ------------------------- dollarg ---------------------------- */
 /* --- dollar-arguments, output the initial-arguments and the --- */
diff --git a/src/iemlib2/exp_inc.c b/src/iemlib2/exp_inc.c
index 9f3a935..3879200 100644
--- a/src/iemlib2/exp_inc.c
+++ b/src/iemlib2/exp_inc.c
@@ -5,10 +5,7 @@ iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* ------------------------ exp_inc ---------------------------- */
 /* ------- exponetial/linear-incremental-bang-counter ---------- */
@@ -19,12 +16,12 @@ static t_class *exp_inc_class;
 typedef struct _exp_inc
 {
   t_object x_obj;
-  float    x_initialval;
-  float    x_currentval;
-  float    x_mulfactor;
-  float    x_addincrement;
-  float    x_min;
-  float    x_max;
+  t_float  x_initialval;
+  t_float  x_currentval;
+  t_float  x_mulfactor;
+  t_float  x_addincrement;
+  t_float  x_min;
+  t_float  x_max;
 } t_exp_inc;
 
 static void exp_inc_bang(t_exp_inc *x)
@@ -48,7 +45,7 @@ static void exp_inc_reset(t_exp_inc *x)
 
 static void exp_inc_float(t_exp_inc *x, t_floatarg f)
 {
-  x->x_initialval = (float)f;
+  x->x_initialval = (t_float)f;
   x->x_currentval = x->x_initialval;
   if(x->x_currentval < x->x_min)
     x->x_currentval = x->x_min;
@@ -58,24 +55,24 @@ static void exp_inc_float(t_exp_inc *x, t_floatarg f)
 
 static void exp_inc_ft1(t_exp_inc *x, t_floatarg f)
 {
-  x->x_mulfactor = 1.0 + 0.01*(float)f;
+  x->x_mulfactor = 1.0 + 0.01*(t_float)f;
 }
 
 static void exp_inc_ft2(t_exp_inc *x, t_floatarg f)
 {
-  x->x_addincrement = (float)f;
+  x->x_addincrement = (t_float)f;
 }
 
 static void exp_inc_ft3(t_exp_inc *x, t_floatarg f)
 {
-  x->x_min = (float)f;
+  x->x_min = (t_float)f;
   if(x->x_currentval < x->x_min)
     x->x_currentval = x->x_min;
 }
 
 static void exp_inc_ft4(t_exp_inc *x, t_floatarg f)
 {
-  x->x_max = (float)f;
+  x->x_max = (t_float)f;
   if(x->x_currentval > x->x_max)
     x->x_currentval = x->x_max;
 }
diff --git a/src/iemlib2/float24.c b/src/iemlib2/float24.c
index 7c313fe..4f6d11a 100644
--- a/src/iemlib2/float24.c
+++ b/src/iemlib2/float24.c
@@ -18,7 +18,7 @@ iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005
 typedef struct _float24
 {
   t_object  x_obj;
-  float     x_arg;
+  t_float   x_arg;
 } t_float24;
 
 static t_class *float24_class;
diff --git a/src/iemlib2/iem_anything.c b/src/iemlib2/iem_anything.c
index 158760c..bda7030 100644
--- a/src/iemlib2/iem_anything.c
+++ b/src/iemlib2/iem_anything.c
@@ -3,16 +3,8 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
 
 /* ------------------------------- iem_anything ---------------------------------- */
 /* -- storage object for any message (bang, float, symbol, list, selector-list) -- */
diff --git a/src/iemlib2/iem_append.c b/src/iemlib2/iem_append.c
index 9ccff3b..f7f817c 100644
--- a/src/iemlib2/iem_append.c
+++ b/src/iemlib2/iem_append.c
@@ -3,16 +3,8 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
 
 
 /* ----------------------- iem_append -------------------------- */
diff --git a/src/iemlib2/iem_i_route.c b/src/iemlib2/iem_i_route.c
index 1538b51..f1c38a9 100644
--- a/src/iemlib2/iem_i_route.c
+++ b/src/iemlib2/iem_i_route.c
@@ -3,17 +3,10 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* -------------------------- iem_i_route ------------------------------ */
 /* ---- routes a list beginning with a float to an outlet, which is ---- */
diff --git a/src/iemlib2/iem_pbank_csv.c b/src/iemlib2/iem_pbank_csv.c
index 5e413c3..d8a8821 100644
--- a/src/iemlib2/iem_pbank_csv.c
+++ b/src/iemlib2/iem_pbank_csv.c
@@ -3,10 +3,6 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
@@ -198,7 +194,7 @@ int iem_pbank_csv_text2atom(char *text, int text_size, t_atom **at_beg,
   const char *textp = text, *etext = text + text_size;
   int natom = 0;
   t_atom *ap = *at_beg;
-  float f;
+  t_float f;
   
   while(1)
   {
@@ -654,7 +650,7 @@ static void iem_pbank_csv_recall(t_iem_pbank_csv *x, t_symbol *s, int ac, t_atom
     nrp = x->x_nr_para - beg;
   atmem += x->x_nr_para * x->x_line + beg;
   atbuf += beg;
-  SETFLOAT(atout, (float)beg);
+  SETFLOAT(atout, (t_float)beg);
   atout++;
   for(i=0; i<nrp; i++)
   {
@@ -725,7 +721,7 @@ static void iem_pbank_csv_list(t_iem_pbank_csv *x, t_symbol *s, int ac, t_atom *
   }
 }
 
-static void iem_pbank_csv_ft1(t_iem_pbank_csv *x, t_float fline_nr)
+static void iem_pbank_csv_ft1(t_iem_pbank_csv *x, t_floatarg fline_nr)
 {
   int line = (int)fline_nr;
   
diff --git a/src/iemlib2/iem_prepend.c b/src/iemlib2/iem_prepend.c
index f2810a2..ebea499 100644
--- a/src/iemlib2/iem_prepend.c
+++ b/src/iemlib2/iem_prepend.c
@@ -3,16 +3,10 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
+
 
 /* ----------------------- iem_prepend --------------------------- */
 /* -- concatenates message from cold (right) inlet with message -- */
@@ -51,7 +45,7 @@ static void iem_prepend_bang(t_iem_prepend *x)
   outlet_anything(x->x_obj.ob_outlet, x->x_selector_sym, x->x_ac, x->x_at);
 }
 
-static void iem_prepend_float(t_iem_prepend *x, t_float f)
+static void iem_prepend_float(t_iem_prepend *x, t_floatarg f)
 {
   if(x->x_selector_sym == &s_bang)
     outlet_float(x->x_obj.ob_outlet, f);
@@ -127,7 +121,7 @@ static void iem_prepend_proxy_bang(t_iem_prepend_proxy *p)
   x->x_selector_sym = &s_bang;
 }
 
-static void iem_prepend_proxy_float(t_iem_prepend_proxy *p, t_float f)
+static void iem_prepend_proxy_float(t_iem_prepend_proxy *p, t_floatarg f)
 {
   t_iem_prepend *x = p->p_owner;
 
diff --git a/src/iemlib2/iem_receive.c b/src/iemlib2/iem_receive.c
index 309512b..4f8660c 100644
--- a/src/iemlib2/iem_receive.c
+++ b/src/iemlib2/iem_receive.c
@@ -3,10 +3,6 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
@@ -79,7 +75,7 @@ static void iem_receive_proxy_bang(t_iem_receive_proxy *p)
   outlet_bang(x->x_obj.ob_outlet);
 }
 
-static void iem_receive_proxy_float(t_iem_receive_proxy *p, t_float f)
+static void iem_receive_proxy_float(t_iem_receive_proxy *p, t_floatarg f)
 {
 	t_iem_receive *x = p->p_owner;
 
diff --git a/src/iemlib2/iem_route.c b/src/iemlib2/iem_route.c
index ee4e261..5dd0f79 100644
--- a/src/iemlib2/iem_route.c
+++ b/src/iemlib2/iem_route.c
@@ -3,17 +3,10 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* -------------------------- iem_route ------------------------------ */
 /* -------- like millers route, but can output bangs ----------------- */
@@ -79,7 +72,7 @@ static void iem_route_list(t_iem_route *x, t_symbol *sel, int argc, t_atom *argv
   
   if (x->x_type == A_FLOAT)
   {
-    float f;
+    t_float f;
     
     if(!argc)
       return;
diff --git a/src/iemlib2/iem_sel_any.c b/src/iemlib2/iem_sel_any.c
index 930b33d..a75a086 100644
--- a/src/iemlib2/iem_sel_any.c
+++ b/src/iemlib2/iem_sel_any.c
@@ -3,10 +3,6 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
@@ -32,7 +28,7 @@ typedef struct _iem_sel_any
 } t_iem_sel_any;
 
 
-static void iem_sel_any_float(t_iem_sel_any *x, t_float f)
+static void iem_sel_any_float(t_iem_sel_any *x, t_floatarg f)
 {
   int i = (int)f;
   t_atom at;
@@ -82,7 +78,7 @@ static void iem_sel_any_free(t_iem_sel_any *x)
   freebytes(x->x_any, x->x_max_ac * sizeof(t_symbol *));
 }
 
-static void *iem_sel_any_new(t_float fmax)
+static void *iem_sel_any_new(t_floatarg fmax)
 {
   t_iem_sel_any *x = (t_iem_sel_any *)pd_new(iem_sel_any_class);
   int i;
diff --git a/src/iemlib2/iem_send.c b/src/iemlib2/iem_send.c
index 16587b4..86087e1 100644
--- a/src/iemlib2/iem_send.c
+++ b/src/iemlib2/iem_send.c
@@ -3,10 +3,6 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
@@ -42,7 +38,7 @@ static void iem_send_bang(t_iem_send *x)
       pd_bang(x->x_send_label_sym->s_thing);
 }
 
-static void iem_send_float(t_iem_send *x, t_float f)
+static void iem_send_float(t_iem_send *x, t_floatarg f)
 {
 	if(x->x_send_label_sym)
     if(x->x_send_label_sym->s_thing)
diff --git a/src/iemlib2/iemlib2.c b/src/iemlib2/iemlib2.c
index bd5e758..3b31b4a 100644
--- a/src/iemlib2/iemlib2.c
+++ b/src/iemlib2/iemlib2.c
@@ -3,33 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
-/*
-#include <ctype.h>
-#include <signal.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-
-#ifndef _MSC_VER
-#include <sys/signal.h>
-#include <unistd.h>
-#endif
 
-#ifdef _MSC_VER
-#include <io.h>
-#endif
-*/
 
 static t_class *iemlib2_class;
 
@@ -45,29 +21,24 @@ void bpe_setup(void);
 void dollarg_setup(void);
 void exp_inc_setup(void);
 void float24_setup(void);
-void iem_anything_kernel_setup(void);
 void iem_anything_setup(void);
-void iem_append_kernel_setup(void);
 void iem_append_setup(void);
 void iem_i_route_setup(void);
-void iem_prepend_kernel_setup(void);
-void iem_prepend_setup(void);
 void iem_pbank_csv_setup(void);
-void iem_receive_kernel_setup(void);
+void iem_prepend_setup(void);
 void iem_receive_setup(void);
-void iem_send_kernel_setup(void);
-void iem_send_setup(void);
 void iem_route_setup(void);
 void iem_sel_any_setup(void);
+void iem_send_setup(void);
 void init_setup(void);
 void list2send_setup(void);
 void mergefilename_setup(void);
 void modulo_counter_setup(void);
 void parentdollarzero_setup(void);
+void post_netreceive_setup(void);
 void pre_inlet_setup(void);
 void prepend_ascii_setup(void);
 void protect_against_open_setup(void);
-void post_netreceive_setup(void);
 void receive2list_setup(void);
 void round_zero_setup(void);
 void sigfade_setup(void);
@@ -94,30 +65,25 @@ void iemlib2_setup(void)
   dollarg_setup();
   exp_inc_setup();
   float24_setup();
-  iem_anything_kernel_setup();
-	iem_anything_setup();
-  iem_append_kernel_setup();
-	iem_append_setup();
+  iem_anything_setup();
+  iem_append_setup();
   iem_i_route_setup();
   iem_pbank_csv_setup();
-  iem_prepend_kernel_setup();
-	iem_prepend_setup();
-  iem_receive_kernel_setup();
-	iem_receive_setup();
-  iem_send_kernel_setup();
-	iem_send_setup();
+  iem_prepend_setup();
+  iem_receive_setup();
   iem_route_setup();
   iem_sel_any_setup();
+  iem_send_setup();
   init_setup();
   list2send_setup();
   mergefilename_setup();
   modulo_counter_setup();
   parentdollarzero_setup();
+  post_netreceive_setup();
   pre_inlet_setup();
   prepend_ascii_setup();
   protect_against_open_setup();
-  post_netreceive_setup();
-	receive2list_setup();
+  receive2list_setup();
   round_zero_setup();
   sigfade_setup();
   sigiem_blocksize_setup();
diff --git a/src/iemlib2/init.c b/src/iemlib2/init.c
index 4fade88..8e0164d 100644
--- a/src/iemlib2/init.c
+++ b/src/iemlib2/init.c
@@ -3,17 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* ------------------------ init ---------------------------- */
 /* -------- a combination of loadbang and any --------------- */
@@ -52,7 +44,7 @@ static void init_loadbang(t_init *x)
     init_bang(x);
 }
 
-static void init_float(t_init *x, t_float f)
+static void init_float(t_init *x, t_floatarg f)
 {
   x->x_ac = 1;
   SETFLOAT(x->x_at, f);
diff --git a/src/iemlib2/list2send.c b/src/iemlib2/list2send.c
index 6539e36..e6d3a21 100644
--- a/src/iemlib2/list2send.c
+++ b/src/iemlib2/list2send.c
@@ -3,17 +3,12 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
 #include <stdlib.h>
 #include <string.h>
 #include <stdio.h>
-#include <math.h>
 
 /* ------------------------- list2send ----------------------------- */
 /* -- via an array of send labels, an incomming list with leading -- */
@@ -217,7 +212,7 @@ static void list2send_free(t_list2send *x)
   freebytes(x->x_send_entries, x->x_max * sizeof(t_symbol *));
 }
 
-static void *list2send_new(t_float fmax)
+static void *list2send_new(t_floatarg fmax)
 {
   t_list2send *x = (t_list2send *)pd_new(list2send_class);
   int i, max = (int)fmax;
diff --git a/src/iemlib2/makefile_linux b/src/iemlib2/makefile_linux
new file mode 100644
index 0000000..57bfe48
--- /dev/null
+++ b/src/iemlib2/makefile_linux
@@ -0,0 +1,82 @@
+current: all
+
+.SUFFIXES: .pd_linux
+
+INCLUDE = -I. -I/usr/local/src/pd/src
+
+LDFLAGS = -export-dynamic -shared
+LIB = -ldl -lm -lpthread
+
+#select either the DBG and OPT compiler flags below:
+
+CFLAGS = -DPD -DUNIX -W -Werror -Wno-unused \
+	-Wno-parentheses -Wno-switch -O6 -funroll-loops -fomit-frame-pointer -fno-strict-aliasing \
+        -DDL_OPEN
+
+SYSTEM = $(shell uname -m)
+
+# the sources
+
+SRC = 	add2_comma.c \
+	bpe.c \
+	dollarg.c \
+	exp_inc.c \
+	float24.c \
+	iem_anything.c \
+	iem_append.c \
+	iem_i_route.c \
+	iem_pbank_csv.c \
+	iem_prepend.c \
+	iem_receive.c \
+	iem_route.c \
+	iem_sel_any.c \
+	iem_send.c \
+	init.c \
+	list2send.c \
+	mergefilename.c \
+	modulo_counter.c \
+	parentdollarzero.c \
+	post_netreceive.c \
+	pre_inlet.c \
+	prepend_ascii.c \
+	protect_against_open.c \
+	receive2list.c \
+	round_zero.c \
+	sigfade.c \
+	sigiem_blocksize.c \
+	sigiem_samplerate.c \
+	sigLFO_noise.c \
+	sigm2f.c \
+	speedlim.c \
+	splitfilename.c \
+	stripfilename.c \
+	toggle_mess.c \
+	transf_fader.c \
+	unsymbol.c \
+	wrap.c \
+	iemlib2.c
+
+TARGET = iemlib2.pd_linux
+
+
+OBJ = $(SRC:.c=.o) 
+
+#
+#  ------------------ targets ------------------------------------
+#
+
+clean:
+	rm $(TARGET)
+	rm *.o
+
+all: $(OBJ)
+	@echo :: $(OBJ)
+	$(LD) $(LDFLAGS) -o $(TARGET) *.o $(LIB)
+	strip --strip-unneeded $(TARGET)
+
+$(OBJ) : %.o : %.c
+	$(CC) $(CFLAGS) $(INCLUDE) -c -o $*.o $*.c
+
+
+
+
diff --git a/src/iemlib2/makefile_win b/src/iemlib2/makefile_win
index d98c04f..80822d2 100644
--- a/src/iemlib2/makefile_win
+++ b/src/iemlib2/makefile_win
@@ -17,48 +17,44 @@ PD_WIN_LIB = /NODEFAULTLIB:libc /NODEFAULTLIB:oldnames /NODEFAULTLIB:kernel /NOD
 	$(PD_INST_PATH)\bin\pd.lib
 
 SRC =	add2_comma.c \
-		bpe.c \
-		dollarg.c \
-		exp_inc.c \
-		float24.c \
-		iem_anything_kernel.c \
-		iem_anything.c \
-		iem_append_kernel.c \
-		iem_append.c \
-		iem_i_route.c \
-		iem_pbank_csv.c \
-		iem_prepend_kernel.c \
-		iem_prepend.c \
-		iem_receive_kernel.c \
-		iem_receive.c \
-		iem_route.c \
-		iem_sel_any.c \
-		iem_send_kernel.c \
-		iem_send.c \
-		init.c \
-		list2send.c \
-		mergefilename.c \
-		modulo_counter.c \
-		parentdollarzero.c \
-		post_netreceive.c \
-		pre_inlet.c \
-		prepend_ascii.c \
-		protect_against_open.c \
-		receive2list.c \
-		round_zero.c \
-		sigfade.c \
-		sigiem_blocksize.c \
-		sigiem_samplerate.c \
-		sigLFO_noise.c \
-		sigm2f.c \
-		speedlim.c \
-		splitfilename.c \
-		stripfilename.c \
-		toggle_mess.c \
-		transf_fader.c \
-		unsymbol.c \
-		wrap.c \
-		iemlib2.c
+	bpe.c \
+	dollarg.c \
+	exp_inc.c \
+	float24.c \
+	iem_anything.c \
+	iem_append.c \
+	iem_i_route.c \
+	iem_pbank_csv.c \
+	iem_prepend_kernel.c \
+	iem_prepend.c \
+	iem_receive.c \
+	iem_route.c \
+	iem_sel_any.c \
+	iem_send.c \
+	init.c \
+	list2send.c \
+	mergefilename.c \
+	modulo_counter.c \
+	parentdollarzero.c \
+	post_netreceive.c \
+	pre_inlet.c \
+	prepend_ascii.c \
+	protect_against_open.c \
+	receive2list.c \
+	round_zero.c \
+	sigfade.c \
+	sigiem_blocksize.c \
+	sigiem_samplerate.c \
+	sigLFO_noise.c \
+	sigm2f.c \
+	speedlim.c \
+	splitfilename.c \
+	stripfilename.c \
+	toggle_mess.c \
+	transf_fader.c \
+	unsymbol.c \
+	wrap.c \
+	iemlib2.c
 
 OBJ = $(SRC:.c=.obj)
 
diff --git a/src/iemlib2/mergefilename.c b/src/iemlib2/mergefilename.c
index 509b8e0..08071ec 100644
--- a/src/iemlib2/mergefilename.c
+++ b/src/iemlib2/mergefilename.c
@@ -3,17 +3,13 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
 #include <stdlib.h>
 #include <string.h>
 #include <stdio.h>
-#include <math.h>
+
 
 /* -------------------------- mergefilename ------------------------------ */
 /* ------------ concatenates a list of symbols to one symbol ------------- */
diff --git a/src/iemlib2/modulo_counter.c b/src/iemlib2/modulo_counter.c
index 65bfb17..d009293 100644
--- a/src/iemlib2/modulo_counter.c
+++ b/src/iemlib2/modulo_counter.c
@@ -3,17 +3,8 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
 
 /* ---------------- modulo-counter. ----------------- */
 /* -------- counter increments if input a bang ------ */
@@ -34,7 +25,7 @@ static void modulo_counter_bang(t_modulo_counter *x)
   x->x_cur = x->x_cur % x->x_max;
 }
 
-static void modulo_counter_float(t_modulo_counter *x, t_float max)
+static void modulo_counter_float(t_modulo_counter *x, t_floatarg max)
 {
   int i = (int)max;
   
@@ -45,7 +36,7 @@ static void modulo_counter_float(t_modulo_counter *x, t_float max)
   x->x_max = i;
 }
 
-static void modulo_counter_ft1(t_modulo_counter *x, t_float set_init)
+static void modulo_counter_ft1(t_modulo_counter *x, t_floatarg set_init)
 {
   int i = (int)set_init;
   
diff --git a/src/iemlib2/parentdollarzero.c b/src/iemlib2/parentdollarzero.c
index 7a70a88..a486ca3 100644
--- a/src/iemlib2/parentdollarzero.c
+++ b/src/iemlib2/parentdollarzero.c
@@ -3,18 +3,11 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "g_canvas.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* -------------- parentdollarzero --------------- */
 /* -- receives the $0 value of the parent canvas --*/
diff --git a/src/iemlib2/post_netreceive.c b/src/iemlib2/post_netreceive.c
index 14b4bde..f96355e 100644
--- a/src/iemlib2/post_netreceive.c
+++ b/src/iemlib2/post_netreceive.c
@@ -3,17 +3,10 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2004 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* ------------------------ post_netreceive ---------------------------- */
 static t_class *post_netreceive_class;
@@ -171,7 +164,7 @@ static void post_netreceive_clear(t_post_netreceive *x)
   }
 }
 
-static void post_netreceive_fetch_all_parameters(t_post_netreceive *x, t_float nr_sended_para)
+static void post_netreceive_fetch_all_parameters(t_post_netreceive *x, t_floatarg nr_sended_para)
 {
   int nrsp=(int)nr_sended_para;
   t_atom *ap=x->x_atbuf+x->x_min_send_entries;
@@ -191,7 +184,7 @@ static void post_netreceive_free(t_post_netreceive *x)
   freebytes(x->x_plus_entries, x->x_max_send_entries * sizeof(t_symbol *));
 }
 
-static void *post_netreceive_new(t_float fmin, t_float fmax)
+static void *post_netreceive_new(t_floatarg fmin, t_floatarg fmax)
 {
   t_post_netreceive *x = (t_post_netreceive *)pd_new(post_netreceive_class);
   int i, min = (int)fmin, max = (int)fmax;
diff --git a/src/iemlib2/pre_inlet.c b/src/iemlib2/pre_inlet.c
index a6269d3..13427fa 100644
--- a/src/iemlib2/pre_inlet.c
+++ b/src/iemlib2/pre_inlet.c
@@ -3,17 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* ------------------------ pre_inlet ---------------------------- */
 /* --------- any incoming message produce additionally a --------- */
@@ -38,7 +30,7 @@ static void pre_inlet_bang(t_pre_inlet *x)
   outlet_bang(x->x_obj.ob_outlet);
 }
 
-static void pre_inlet_float(t_pre_inlet *x, t_float f)
+static void pre_inlet_float(t_pre_inlet *x, t_floatarg f)
 {
   outlet_anything(x->x_obj.ob_outlet, x->x_sym, 1, &x->x_at);
   outlet_float(x->x_obj.ob_outlet, f);
diff --git a/src/iemlib2/prepend_ascii.c b/src/iemlib2/prepend_ascii.c
index 773adc0..8ea47b0 100644
--- a/src/iemlib2/prepend_ascii.c
+++ b/src/iemlib2/prepend_ascii.c
@@ -3,17 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <math.h>
 
 /* ------------------------- prepend_ascii ---------------------------- */
 /* -- this object prepends to any incoming message a selector symbol -- */
@@ -42,7 +34,7 @@ static void prepend_ascii_bang(t_prepend_ascii *x)
   outlet_anything(x->x_obj.ob_outlet, x->x_sym, x->x_ac, x->x_at);
 }
 
-static void prepend_ascii_float(t_prepend_ascii *x, t_float f)
+static void prepend_ascii_float(t_prepend_ascii *x, t_floatarg f)
 {
   SETFLOAT(x->x_at+x->x_ac, f);
   outlet_anything(x->x_obj.ob_outlet, x->x_sym, x->x_ac+1, x->x_at);
diff --git a/src/iemlib2/protect_against_open.c b/src/iemlib2/protect_against_open.c
index dc78878..358d444 100644
--- a/src/iemlib2/protect_against_open.c
+++ b/src/iemlib2/protect_against_open.c
@@ -3,10 +3,6 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
diff --git a/src/iemlib2/receive2list.c b/src/iemlib2/receive2list.c
index 1849bdd..0be6645 100644
--- a/src/iemlib2/receive2list.c
+++ b/src/iemlib2/receive2list.c
@@ -3,11 +3,6 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
 #include <stdlib.h>
@@ -101,7 +96,7 @@ static void receive2list_proxy_bang(t_receive2list_proxy *p)
 	outlet_list(x->x_obj.ob_outlet, &s_list, 1, x->x_at);
 }
 
-static void receive2list_proxy_float(t_receive2list_proxy *p, t_float f)
+static void receive2list_proxy_float(t_receive2list_proxy *p, t_floatarg f)
 {
 	t_receive2list *x = p->p_owner;
 
@@ -178,7 +173,7 @@ static void receive2list_free(t_receive2list *x)
 	  freebytes(x->x_at, x->x_size * sizeof(t_atom));
 }
 
-static void *receive2list_new(t_float fmax)
+static void *receive2list_new(t_floatarg fmax)
 {
   t_receive2list *x = (t_receive2list *)pd_new(receive2list_class);
 	t_receive2list_proxy *p;
diff --git a/src/iemlib2/round_zero.c b/src/iemlib2/round_zero.c
index 8dee50d..a802dda 100644
--- a/src/iemlib2/round_zero.c
+++ b/src/iemlib2/round_zero.c
@@ -3,16 +3,8 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdio.h>
-#include <string.h>
 
 
 /* ------------------------ round_zero ---------------------------- */
diff --git a/src/iemlib2/sigLFO_noise.c b/src/iemlib2/sigLFO_noise.c
index daf035c..0547dfe 100644
--- a/src/iemlib2/sigLFO_noise.c
+++ b/src/iemlib2/sigLFO_noise.c
@@ -3,16 +3,10 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
+
 
 /* -------------------- LFO_noise~ --------------------- */
 /* ---- outputs a 2 point interpolated white noise ----- */
@@ -26,11 +20,11 @@ typedef struct _sigLFO_noise
   double       x_range;
   double       x_rcp_range;
   unsigned int x_state;
-  float        x_fact;
-  float        x_incr;
-  float        x_y1;
-  float        x_y2;
-  float        x_phase;
+  t_float        x_fact;
+  t_float        x_incr;
+  t_float        x_y1;
+  t_float        x_y2;
+  t_float        x_phase;
 } t_sigLFO_noise;
 
 static int sigLFO_noise_makeseed(void)
@@ -79,10 +73,10 @@ static t_int *sigLFO_noise_perform(t_int *w)
   t_float *out = (t_float *)(w[1]);
   t_sigLFO_noise *x = (t_sigLFO_noise *)(w[2]);
   int n = (int)(w[3]);
-  float phase = x->x_phase;
-  float x_y1 = x->x_y1;
-  float x_y2 = x->x_y2;
-  float incr = x->x_incr;
+  t_float phase = x->x_phase;
+  t_float x_y1 = x->x_y1;
+  t_float x_y2 = x->x_y2;
+  t_float incr = x->x_incr;
   
   while(n--)
   {
@@ -101,7 +95,7 @@ static t_int *sigLFO_noise_perform(t_int *w)
   return (w+4);
 }
 
-static void sigLFO_noise_float(t_sigLFO_noise *x, t_float freq)
+static void sigLFO_noise_float(t_sigLFO_noise *x, t_floatarg freq)
 {
   x->x_incr = freq * x->x_fact;
   if(x->x_incr < 0.0)
diff --git a/src/iemlib2/sigfade.c b/src/iemlib2/sigfade.c
index bb0e4b5..a73a3a7 100644
--- a/src/iemlib2/sigfade.c
+++ b/src/iemlib2/sigfade.c
@@ -3,16 +3,8 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
 #include <math.h>
 
 /* ------------------------- fade~ ----------------------------- */
@@ -32,13 +24,13 @@ static t_class *sigfade_class;
 typedef struct _sigfade
 {
   t_object x_obj;
-  float *x_table;
-  float x_f;
+  t_float *x_table;
+  t_float x_f;
 } t_sigfade;
 
 static void sigfade_set(t_sigfade *x, t_symbol *s)
 {
-  if(!strcmp(s->s_name, "_lin"))
+  /*if(!strcmp(s->s_name, "_lin"))
     x->x_table = iem_fade_table_lin;
   else if(!strcmp(s->s_name, "_linsqrt"))
     x->x_table = iem_fade_table_linsqrt;
@@ -49,6 +41,18 @@ static void sigfade_set(t_sigfade *x, t_symbol *s)
   else if(!strcmp(s->s_name, "_sinhann"))
     x->x_table = iem_fade_table_sinhann;
   else if(!strcmp(s->s_name, "_hann"))
+    x->x_table = iem_fade_table_hann;*/
+  if(s == gensym("_lin"))
+    x->x_table = iem_fade_table_lin;
+  else if(s == gensym("_linsqrt"))
+    x->x_table = iem_fade_table_linsqrt;
+  else if(s == gensym("_sqrt"))
+    x->x_table = iem_fade_table_sqrt;
+  else if(s == gensym("_sin"))
+    x->x_table = iem_fade_table_sin;
+  else if(s == gensym("_sinhann"))
+    x->x_table = iem_fade_table_sinhann;
+  else if(s == gensym("_hann"))
     x->x_table = iem_fade_table_hann;
 }
 
@@ -68,7 +72,7 @@ static t_int *sigfade_perform(t_int *w)
   t_float *out = (t_float *)(w[2]);
   t_sigfade *x = (t_sigfade *)(w[3]);
   int n = (int)(w[4]);
-  float *tab = x->x_table, *addr, f1, f2, frac;
+  t_float *tab = x->x_table, *addr, f1, f2, frac;
   double dphase;
   int normhipart;
   union tabfudge tf;
@@ -79,7 +83,7 @@ static t_int *sigfade_perform(t_int *w)
 #if 0     /* this is the readable version of the code. */
   while (n--)
   {
-    dphase = (double)(*in++ * (float)(COSTABSIZE) * 0.99999) + UNITBIT32;
+    dphase = (double)(*in++ * (t_float)(COSTABSIZE) * 0.99999) + UNITBIT32;
     tf.tf_d = dphase;
     addr = tab + (tf.tf_i[HIOFFSET] & (COSTABSIZE-1));
     tf.tf_i[HIOFFSET] = normhipart;
@@ -90,13 +94,13 @@ static t_int *sigfade_perform(t_int *w)
   }
 #endif
 #if 1     /* this is the same, unwrapped by hand. */
-  dphase = (double)(*in++ * (float)(COSTABSIZE) * 0.99999) + UNITBIT32;
+  dphase = (double)(*in++ * (t_float)(COSTABSIZE) * 0.99999) + UNITBIT32;
   tf.tf_d = dphase;
   addr = tab + (tf.tf_i[HIOFFSET] & (COSTABSIZE-1));
   tf.tf_i[HIOFFSET] = normhipart;
   while (--n)
   {
-    dphase = (double)(*in++ * (float)(COSTABSIZE) * 0.99999) + UNITBIT32;
+    dphase = (double)(*in++ * (t_float)(COSTABSIZE) * 0.99999) + UNITBIT32;
     frac = tf.tf_d - UNITBIT32;
     tf.tf_d = dphase;
     f1 = addr[0];
@@ -121,18 +125,18 @@ static void sigfade_dsp(t_sigfade *x, t_signal **sp)
 static void sigfade_maketable(void)
 {
   int i;
-  float *fp, phase, fff,phsinc = 0.5*3.141592653 / ((float)COSTABSIZE*0.99999);
+  t_float *fp, phase, fff,phsinc = 0.5*3.141592653 / ((t_float)COSTABSIZE*0.99999);
   union tabfudge tf;
   
   if(!iem_fade_table_sin)
   {
-    iem_fade_table_sin = (float *)getbytes(sizeof(float) * (COSTABSIZE+1));
+    iem_fade_table_sin = (t_float *)getbytes(sizeof(t_float) * (COSTABSIZE+1));
     for(i=COSTABSIZE+1, fp=iem_fade_table_sin, phase=0; i--; fp++, phase+=phsinc)
       *fp = sin(phase);
   }
   if(!iem_fade_table_sinhann)
   {
-    iem_fade_table_sinhann = (float *)getbytes(sizeof(float) * (COSTABSIZE+1));
+    iem_fade_table_sinhann = (t_float *)getbytes(sizeof(t_float) * (COSTABSIZE+1));
     for(i=COSTABSIZE+1, fp=iem_fade_table_sinhann, phase=0; i--; fp++, phase+=phsinc)
     {
       fff = sin(phase);
@@ -141,29 +145,29 @@ static void sigfade_maketable(void)
   }
   if(!iem_fade_table_hann)
   {
-    iem_fade_table_hann = (float *)getbytes(sizeof(float) * (COSTABSIZE+1));
+    iem_fade_table_hann = (t_float *)getbytes(sizeof(t_float) * (COSTABSIZE+1));
     for(i=COSTABSIZE+1, fp=iem_fade_table_hann, phase=0; i--; fp++, phase+=phsinc)
     {
       fff = sin(phase);
       *fp = fff*fff;
     }
   }
-  phsinc = 1.0 / ((float)COSTABSIZE*0.99999);
+  phsinc = 1.0 / ((t_float)COSTABSIZE*0.99999);
   if(!iem_fade_table_lin)
   {
-    iem_fade_table_lin = (float *)getbytes(sizeof(float) * (COSTABSIZE+1));
+    iem_fade_table_lin = (t_float *)getbytes(sizeof(t_float) * (COSTABSIZE+1));
     for(i=COSTABSIZE+1, fp=iem_fade_table_lin, phase=0; i--; fp++, phase+=phsinc)
       *fp = phase;
   }
   if(!iem_fade_table_linsqrt)
   {
-    iem_fade_table_linsqrt = (float *)getbytes(sizeof(float) * (COSTABSIZE+1));
+    iem_fade_table_linsqrt = (t_float *)getbytes(sizeof(t_float) * (COSTABSIZE+1));
     for(i=COSTABSIZE+1, fp=iem_fade_table_linsqrt, phase=0; i--; fp++, phase+=phsinc)
       *fp = pow(phase, 0.75);
   }
   if(!iem_fade_table_sqrt)
   {
-    iem_fade_table_sqrt = (float *)getbytes(sizeof(float) * (COSTABSIZE+1));
+    iem_fade_table_sqrt = (t_float *)getbytes(sizeof(t_float) * (COSTABSIZE+1));
     for(i=COSTABSIZE+1, fp=iem_fade_table_sqrt, phase=0; i--; fp++, phase+=phsinc)
       *fp = sqrt(phase);
   }
diff --git a/src/iemlib2/sigiem_blocksize.c b/src/iemlib2/sigiem_blocksize.c
index eae00ed..46ba275 100644
--- a/src/iemlib2/sigiem_blocksize.c
+++ b/src/iemlib2/sigiem_blocksize.c
@@ -3,14 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
 
 /* ------------------- iem_blocksize~ -------------------- */
 /* -- outputs the current signal-blocksize of a window --- */
diff --git a/src/iemlib2/sigiem_samplerate.c b/src/iemlib2/sigiem_samplerate.c
index 1fe9e10..7f9e86b 100644
--- a/src/iemlib2/sigiem_samplerate.c
+++ b/src/iemlib2/sigiem_samplerate.c
@@ -3,14 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
 
 /* --------------- iem_samplerate~ ----------------- */
 /* -- outputs the current samplerate of a window --- */
diff --git a/src/iemlib2/sigm2f.c b/src/iemlib2/sigm2f.c
index f4a158c..e6d3c26 100644
--- a/src/iemlib2/sigm2f.c
+++ b/src/iemlib2/sigm2f.c
@@ -3,16 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
 #include <math.h>
 
 /* ----------- m2f~ ----------- */
@@ -20,14 +13,14 @@ iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005
 
 #define M2FTABSIZE 2048
 
-float *iem_m2f_table=(float *)0L;
+t_float *iem_m2f_table=(t_float *)0L;
 
 static t_class *sigm2f_class;
 
 typedef struct _sigm2f
 {
   t_object x_obj;
-  float x_msi;
+  t_float x_msi;
 } t_sigm2f;
 
 static void *sigm2f_new(void)
@@ -44,7 +37,7 @@ static t_int *sigm2f_perform(t_int *w)
   t_float *out = (t_float *)(w[2]);
   t_sigm2f *x = (t_sigm2f *)(w[3]);
   int n = (int)(w[4]);
-  float *tab = iem_m2f_table, *addr, f1, f2, frac, iinn;
+  t_float *tab = iem_m2f_table, *addr, f1, f2, frac, iinn;
   double dphase;
   int normhipart;
   union tabfudge tf;
@@ -104,9 +97,9 @@ static void sigm2f_maketable(void)
   if(!iem_m2f_table)
   {
     int i;
-    float *fp, midi, refexp=440.0*exp(-5.75*log(2.0));
+    t_float *fp, midi, refexp=440.0*exp(-5.75*log(2.0));
     
-    iem_m2f_table = (float *)getbytes(sizeof(float) * (M2FTABSIZE+1));
+    iem_m2f_table = (t_float *)getbytes(sizeof(t_float) * (M2FTABSIZE+1));
     for(i=0, fp=iem_m2f_table, midi=-67.0; i<=M2FTABSIZE; i++, fp++, midi+=0.1)
       *fp = refexp * exp(0.057762265047 * midi);
   }
diff --git a/src/iemlib2/speedlim.c b/src/iemlib2/speedlim.c
index 9e29e0a..d0224fc 100644
--- a/src/iemlib2/speedlim.c
+++ b/src/iemlib2/speedlim.c
@@ -3,16 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
 
 /* ----------------------- speedlim -------------------------- */
 /* -- reduces the flow of float-messages to one message per -- */
@@ -27,8 +20,8 @@ typedef struct _speedlim
   float     x_delay;
   int       x_output_is_locked;
   int       x_there_was_n_event;
-  float     x_curval;
-  float     x_lastout;
+  t_float   x_curval;
+  t_float   x_lastout;
 } t_speedlim;
 
 static void speedlim_stop(t_speedlim *x)
@@ -54,7 +47,7 @@ static void speedlim_tick(t_speedlim *x)
   }
 }
 
-static void speedlim_float(t_speedlim *x, t_float val)
+static void speedlim_float(t_speedlim *x, t_floatarg val)
 {
   x->x_curval = val;
   if(!x->x_output_is_locked)
@@ -68,7 +61,7 @@ static void speedlim_float(t_speedlim *x, t_float val)
     x->x_there_was_n_event = 1;
 }
 
-static void speedlim_ft1(t_speedlim *x, t_float delay)
+static void speedlim_ft1(t_speedlim *x, t_floatarg delay)
 {
   if(delay < 0.0)
     delay = 0.0;
@@ -80,7 +73,7 @@ static void speedlim_free(t_speedlim *x)
   clock_free(x->x_clock);
 }
 
-static void *speedlim_new(t_float delay)
+static void *speedlim_new(t_floatarg delay)
 {
   t_speedlim *x = (t_speedlim *)pd_new(speedlim_class);
   
diff --git a/src/iemlib2/splitfilename.c b/src/iemlib2/splitfilename.c
index 7de68f4..5646178 100644
--- a/src/iemlib2/splitfilename.c
+++ b/src/iemlib2/splitfilename.c
@@ -3,17 +3,11 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
 #include <string.h>
-#include <stdio.h>
-#include <math.h>
+
 
 /* ----------------------- splitfilename -------------------------- */
 /* -- splits a symbol into 2 parts (path + file) at the position -- */
diff --git a/src/iemlib2/stripfilename.c b/src/iemlib2/stripfilename.c
index d6a138f..82dc70b 100644
--- a/src/iemlib2/stripfilename.c
+++ b/src/iemlib2/stripfilename.c
@@ -3,16 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
 #include <string.h>
-#include <stdio.h>
 
 /* -------------------------- stripfilename ----------------------- */
 /* -- strips the first n or last n characters, depending on sign -- */
diff --git a/src/iemlib2/toggle_mess.c b/src/iemlib2/toggle_mess.c
index ac35100..c884064 100644
--- a/src/iemlib2/toggle_mess.c
+++ b/src/iemlib2/toggle_mess.c
@@ -3,16 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
 
 /* ------------------------ toggle_mess ---------------------------- */
 /* -- inital arguments building a set of messages, any incomming --- */
@@ -36,7 +29,7 @@ static void toggle_mess_bang(t_toggle_mess *x)
 {
   int i = x->x_index;
 
-  outlet_float(x->x_out_rght_flt, (float)i);
+  outlet_float(x->x_out_rght_flt, (t_float)i);
   if(IS_A_FLOAT(x->x_at, i))
     outlet_float(x->x_out_mid_sym, atom_getfloat(&x->x_at[i]));
   else
@@ -44,7 +37,7 @@ static void toggle_mess_bang(t_toggle_mess *x)
   outlet_anything(x->x_obj.ob_outlet, x->x_set, 1, &x->x_at[i]);
 }
 
-static void toggle_mess_float(t_toggle_mess *x, t_float f)
+static void toggle_mess_float(t_toggle_mess *x, t_floatarg f)
 {
   x->x_index++;
   if(x->x_index >= x->x_ac)
diff --git a/src/iemlib2/transf_fader.c b/src/iemlib2/transf_fader.c
index b545f62..1243a1c 100644
--- a/src/iemlib2/transf_fader.c
+++ b/src/iemlib2/transf_fader.c
@@ -3,16 +3,9 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdio.h>
-#include <string.h>
 
 
 /* ------------------------ transf_fader ----------------------- */
@@ -24,7 +17,7 @@ typedef struct _transf_fader
   t_object  x_obj;
   int       x_size;
   int       x_message;
-  float     *x_array;
+  t_float     *x_array;
 } t_transf_fader;
 
 static t_class *transf_fader_class;
@@ -38,12 +31,12 @@ static void transf_fader_pairs(t_transf_fader *x, t_symbol *s, int argc, t_atom
     int i_prev=0;
     int first=1;
     int i_delta;
-    float val_delta;
-    float delta;
-    float val_prev=0.0f;
-    float val=0.0f;
-    float *vec=x->x_array;
-    float fad_in, fad_out;
+    t_float val_delta;
+    t_float delta;
+    t_float val_prev=0.0f;
+    t_float val=0.0f;
+    t_float *vec=x->x_array;
+    t_float fad_in, fad_out;
 
     for(j=0; j<n; j++)
     {
@@ -84,10 +77,10 @@ static void transf_fader_pairs(t_transf_fader *x, t_symbol *s, int argc, t_atom
           val_delta = val - val_prev;
           if(i_delta > 1)
           {
-            delta = val_delta / (float)i_delta;
+            delta = val_delta / (t_float)i_delta;
             for(k=i_prev+1; k<i; k++)
             {
-              vec[k] = val_prev + delta*(float)(k - i_prev);
+              vec[k] = val_prev + delta*(t_float)(k - i_prev);
             }
           }
           i_prev = i;
@@ -105,9 +98,9 @@ static void transf_fader_pairs(t_transf_fader *x, t_symbol *s, int argc, t_atom
 
 static void transf_fader_float(t_transf_fader *x, t_floatarg fad_in)
 {
-  float fad_out;
-  float *vec=x->x_array;
-  float fract;
+  t_float fad_out;
+  t_float *vec=x->x_array;
+  t_float fract;
   int i;
 
   while(fad_in < 0.0f)
@@ -116,7 +109,7 @@ static void transf_fader_float(t_transf_fader *x, t_floatarg fad_in)
     fad_in = 999.0f;
 
   i = (int)fad_in;
-  fract = fad_in - (float)i;
+  fract = fad_in - (t_float)i;
   fad_out = vec[i] + fract*(vec[i+1] - vec[i]);
   if(fad_out > -123455.0f)
     outlet_float(x->x_obj.ob_outlet, fad_out);
@@ -124,7 +117,7 @@ static void transf_fader_float(t_transf_fader *x, t_floatarg fad_in)
 
 static void transf_fader_free(t_transf_fader *x)
 {
-  freebytes(x->x_array, x->x_size * sizeof(float));
+  freebytes(x->x_array, x->x_size * sizeof(t_float));
 }
 
 static void *transf_fader_new(t_symbol *s, int argc, t_atom *argv)
@@ -134,7 +127,7 @@ static void *transf_fader_new(t_symbol *s, int argc, t_atom *argv)
 
   x->x_size = 1001;
   x->x_message = 0;
-  x->x_array = (float *)getbytes(x->x_size * sizeof(float));
+  x->x_array = (t_float *)getbytes(x->x_size * sizeof(t_float));
   n = x->x_size;
   for(i=0; i<n; i++)
     x->x_array[i] = -123456.0f;
diff --git a/src/iemlib2/unsymbol.c b/src/iemlib2/unsymbol.c
index ee5fd80..93fffeb 100644
--- a/src/iemlib2/unsymbol.c
+++ b/src/iemlib2/unsymbol.c
@@ -3,16 +3,8 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
 #include "m_pd.h"
 #include "iemlib.h"
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
 
 /* ----------- unsymbol ------------------------- */
 /* -- converts a symbol to an anything message -- */
diff --git a/src/iemlib2/wrap.c b/src/iemlib2/wrap.c
index 6862639..7e701b8 100644
--- a/src/iemlib2/wrap.c
+++ b/src/iemlib2/wrap.c
@@ -3,10 +3,6 @@
 
 iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
 
-#ifdef _MSC_VER
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
 
 #include "m_pd.h"
 #include "iemlib.h"
@@ -20,7 +16,7 @@ iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005
 typedef struct _wrap
 {
   t_object  x_obj;
-  float     x_f;
+  t_float     x_f;
 } t_wrap;
 
 static t_class *wrap_class;
@@ -30,14 +26,14 @@ static void wrap_bang(t_wrap *x)
   outlet_float(x->x_obj.ob_outlet, x->x_f);
 }
 
-static void wrap_float(t_wrap *x, t_float f)
+static void wrap_float(t_wrap *x, t_floatarg f)
 {
   int i=(int)f;
   
   if(f > 0.0)
-    x->x_f = f - (float)i;
+    x->x_f = f - (t_float)i;
   else
-    x->x_f = f - (float)(i - 1);
+    x->x_f = f - (t_float)(i - 1);
   wrap_bang(x);
 }