Update of /cvsroot/pure-data/externals/iemlib/src/iemlib2 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19572/iemlib/src/iemlib2
Modified Files: 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 iemlib2.c init.c list2send.c makefile_win 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 sigLFO_noise.c sigfade.c sigiem_blocksize.c sigiem_samplerate.c sigm2f.c speedlim.c splitfilename.c stripfilename.c toggle_mess.c transf_fader.c unsymbol.c wrap.c Added Files: makefile_linux Log Message: makefile_win makefile_linux update we dont need #if MSW_VER chanched float to t_float
--- NEW FILE: makefile_linux --- 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
Index: parentdollarzero.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/parentdollarzero.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** parentdollarzero.c 11 Apr 2006 16:24:09 -0000 1.4 --- parentdollarzero.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,19 **** 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 --------------- */ --- 4,12 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
#include "m_pd.h" #include "g_canvas.h" #include "iemlib.h" !
/* -------------- parentdollarzero --------------- */
Index: round_zero.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/round_zero.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** round_zero.c 11 Apr 2006 16:24:09 -0000 1.4 --- round_zero.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,17 **** 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>
--- 4,9 ----
Index: wrap.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/wrap.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** wrap.c 11 Apr 2006 16:24:09 -0000 1.4 --- wrap.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,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" --- 4,7 ---- *************** *** 21,25 **** { t_object x_obj; ! float x_f; } t_wrap;
--- 17,21 ---- { t_object x_obj; ! t_float x_f; } t_wrap;
*************** *** 31,42 **** }
! static void wrap_float(t_wrap *x, t_float f) { int i=(int)f;
if(f > 0.0) ! x->x_f = f - (float)i; else ! x->x_f = f - (float)(i - 1); wrap_bang(x); } --- 27,38 ---- }
! static void wrap_float(t_wrap *x, t_floatarg f) { int i=(int)f;
if(f > 0.0) ! x->x_f = f - (t_float)i; else ! x->x_f = f - (t_float)(i - 1); wrap_bang(x); }
Index: sigiem_samplerate.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/sigiem_samplerate.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** sigiem_samplerate.c 11 Apr 2006 16:24:09 -0000 1.4 --- sigiem_samplerate.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,15 **** 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~ ----------------- */ --- 4,10 ----
Index: receive2list.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/receive2list.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** receive2list.c 11 Apr 2006 16:24:09 -0000 1.3 --- receive2list.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 4,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" --- 4,7 ---- *************** *** 102,106 **** }
! static void receive2list_proxy_float(t_receive2list_proxy *p, t_float f) { t_receive2list *x = p->p_owner; --- 97,101 ---- }
! static void receive2list_proxy_float(t_receive2list_proxy *p, t_floatarg f) { t_receive2list *x = p->p_owner; *************** *** 179,183 **** }
! static void *receive2list_new(t_float fmax) { t_receive2list *x = (t_receive2list *)pd_new(receive2list_class); --- 174,178 ---- }
! static void *receive2list_new(t_floatarg fmax) { t_receive2list *x = (t_receive2list *)pd_new(receive2list_class);
Index: add2_comma.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/add2_comma.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** add2_comma.c 8 Jul 2005 02:04:25 -0000 1.3 --- add2_comma.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 6,13 **** #include "m_pd.h" #include "iemlib.h" ! #include <stdlib.h> ! #include <string.h> ! #include <stdio.h> ! #include <math.h>
/* --------------------------------- add2_comma ----------------------------------- */ --- 6,10 ---- #include "m_pd.h" #include "iemlib.h" !
/* --------------------------------- add2_comma ----------------------------------- */ *************** *** 31,35 **** }
! static void add2_comma_float(t_add2_comma *x, t_float f) { SETCOMMA(x->x_at); --- 28,32 ---- }
! static void add2_comma_float(t_add2_comma *x, t_floatarg f) { SETCOMMA(x->x_at);
Index: stripfilename.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/stripfilename.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** stripfilename.c 11 Apr 2006 16:24:09 -0000 1.4 --- stripfilename.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,17 **** 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 ----------------------- */ --- 4,10 ----
Index: iem_i_route.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_i_route.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** iem_i_route.c 11 Apr 2006 16:24:09 -0000 1.4 --- iem_i_route.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,18 **** 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 ------------------------------ */ --- 4,11 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
#include "m_pd.h" #include "iemlib.h" !
/* -------------------------- iem_i_route ------------------------------ */
Index: toggle_mess.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/toggle_mess.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** toggle_mess.c 11 Apr 2006 16:24:09 -0000 1.4 --- toggle_mess.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,17 **** 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 ---------------------------- */ --- 4,10 ---- *************** *** 37,41 **** int i = x->x_index;
! outlet_float(x->x_out_rght_flt, (float)i); if(IS_A_FLOAT(x->x_at, i)) outlet_float(x->x_out_mid_sym, atom_getfloat(&x->x_at[i])); --- 30,34 ---- int i = x->x_index;
! 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])); *************** *** 45,49 **** }
! static void toggle_mess_float(t_toggle_mess *x, t_float f) { x->x_index++; --- 38,42 ---- }
! static void toggle_mess_float(t_toggle_mess *x, t_floatarg f) { x->x_index++;
Index: iemlib2.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iemlib2.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** iemlib2.c 11 Apr 2006 16:24:09 -0000 1.4 --- iemlib2.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,34 **** 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; --- 4,10 ---- *************** *** 46,63 **** 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_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 init_setup(void); void list2send_setup(void); --- 22,34 ---- void exp_inc_setup(void); void float24_setup(void); void iem_anything_setup(void); void iem_append_setup(void); void iem_i_route_setup(void); void iem_pbank_csv_setup(void); ! void iem_prepend_setup(void); void iem_receive_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); *************** *** 65,72 **** void modulo_counter_setup(void); void parentdollarzero_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); --- 36,43 ---- 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 receive2list_setup(void); void round_zero_setup(void); *************** *** 95,112 **** exp_inc_setup(); float24_setup(); ! iem_anything_kernel_setup(); ! iem_anything_setup(); ! iem_append_kernel_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_route_setup(); iem_sel_any_setup(); init_setup(); list2send_setup(); --- 66,78 ---- exp_inc_setup(); float24_setup(); ! iem_anything_setup(); ! iem_append_setup(); iem_i_route_setup(); iem_pbank_csv_setup(); ! iem_prepend_setup(); ! iem_receive_setup(); iem_route_setup(); iem_sel_any_setup(); + iem_send_setup(); init_setup(); list2send_setup(); *************** *** 114,122 **** modulo_counter_setup(); parentdollarzero_setup(); pre_inlet_setup(); prepend_ascii_setup(); protect_against_open_setup(); ! post_netreceive_setup(); ! receive2list_setup(); round_zero_setup(); sigfade_setup(); --- 80,88 ---- modulo_counter_setup(); parentdollarzero_setup(); + post_netreceive_setup(); pre_inlet_setup(); prepend_ascii_setup(); protect_against_open_setup(); ! receive2list_setup(); round_zero_setup(); sigfade_setup();
Index: list2send.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/list2send.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** list2send.c 11 Apr 2006 16:24:09 -0000 1.4 --- list2send.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,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" --- 4,7 ---- *************** *** 14,18 **** #include <string.h> #include <stdio.h> - #include <math.h>
/* ------------------------- list2send ----------------------------- */ --- 10,13 ---- *************** *** 218,222 **** }
! static void *list2send_new(t_float fmax) { t_list2send *x = (t_list2send *)pd_new(list2send_class); --- 213,217 ---- }
! static void *list2send_new(t_floatarg fmax) { t_list2send *x = (t_list2send *)pd_new(list2send_class);
Index: modulo_counter.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/modulo_counter.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** modulo_counter.c 11 Apr 2006 16:24:09 -0000 1.4 --- modulo_counter.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,18 **** 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. ----------------- */ --- 4,9 ---- *************** *** 35,39 **** }
! static void modulo_counter_float(t_modulo_counter *x, t_float max) { int i = (int)max; --- 26,30 ---- }
! static void modulo_counter_float(t_modulo_counter *x, t_floatarg max) { int i = (int)max; *************** *** 46,50 **** }
! static void modulo_counter_ft1(t_modulo_counter *x, t_float set_init) { int i = (int)set_init; --- 37,41 ---- }
! static void modulo_counter_ft1(t_modulo_counter *x, t_floatarg set_init) { int i = (int)set_init;
Index: iem_anything.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_anything.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** iem_anything.c 11 Apr 2006 16:24:09 -0000 1.3 --- iem_anything.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 4,17 **** 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 ---------------------------------- */ --- 4,9 ----
Index: splitfilename.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/splitfilename.c,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** splitfilename.c 11 Apr 2006 16:24:09 -0000 1.8 --- splitfilename.c 7 Nov 2006 17:11:40 -0000 1.9 *************** *** 4,18 **** 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 -------------------------- */ --- 4,12 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
#include "m_pd.h" #include "iemlib.h" #include <string.h> !
/* ----------------------- splitfilename -------------------------- */
Index: iem_route.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_route.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** iem_route.c 11 Apr 2006 16:24:09 -0000 1.4 --- iem_route.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,18 **** 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 ------------------------------ */ --- 4,11 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
#include "m_pd.h" #include "iemlib.h" !
/* -------------------------- iem_route ------------------------------ */ *************** *** 80,84 **** if (x->x_type == A_FLOAT) { ! float f;
if(!argc) --- 73,77 ---- if (x->x_type == A_FLOAT) { ! t_float f;
if(!argc)
Index: transf_fader.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/transf_fader.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** transf_fader.c 11 Apr 2006 16:24:09 -0000 1.4 --- transf_fader.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,17 **** 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>
--- 4,10 ---- *************** *** 25,29 **** int x_size; int x_message; ! float *x_array; } t_transf_fader;
--- 18,22 ---- int x_size; int x_message; ! t_float *x_array; } t_transf_fader;
*************** *** 39,48 **** 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;
for(j=0; j<n; j++) --- 32,41 ---- int first=1; int i_delta; ! 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++) *************** *** 85,92 **** if(i_delta > 1) { ! delta = val_delta / (float)i_delta; for(k=i_prev+1; k<i; k++) { ! vec[k] = val_prev + delta*(float)(k - i_prev); } } --- 78,85 ---- if(i_delta > 1) { ! delta = val_delta / (t_float)i_delta; for(k=i_prev+1; k<i; k++) { ! vec[k] = val_prev + delta*(t_float)(k - i_prev); } } *************** *** 106,112 **** static void transf_fader_float(t_transf_fader *x, t_floatarg fad_in) { ! float fad_out; ! float *vec=x->x_array; ! float fract; int i;
--- 99,105 ---- static void transf_fader_float(t_transf_fader *x, t_floatarg fad_in) { ! t_float fad_out; ! t_float *vec=x->x_array; ! t_float fract; int i;
*************** *** 117,121 ****
i = (int)fad_in; ! fract = fad_in - (float)i; fad_out = vec[i] + fract*(vec[i+1] - vec[i]); if(fad_out > -123455.0f) --- 110,114 ----
i = (int)fad_in; ! fract = fad_in - (t_float)i; fad_out = vec[i] + fract*(vec[i+1] - vec[i]); if(fad_out > -123455.0f) *************** *** 125,129 **** static void transf_fader_free(t_transf_fader *x) { ! freebytes(x->x_array, x->x_size * sizeof(float)); }
--- 118,122 ---- static void transf_fader_free(t_transf_fader *x) { ! freebytes(x->x_array, x->x_size * sizeof(t_float)); }
*************** *** 135,139 **** x->x_size = 1001; x->x_message = 0; ! x->x_array = (float *)getbytes(x->x_size * sizeof(float)); n = x->x_size; for(i=0; i<n; i++) --- 128,132 ---- x->x_size = 1001; x->x_message = 0; ! x->x_array = (t_float *)getbytes(x->x_size * sizeof(t_float)); n = x->x_size; for(i=0; i<n; i++)
Index: bpe.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/bpe.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** bpe.c 8 Jul 2005 02:04:25 -0000 1.3 --- bpe.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 6,13 **** #include "m_pd.h" #include "iemlib.h" ! #include <stdlib.h> ! #include <string.h> ! #include <stdio.h> ! #include <math.h>
/* --------------------------- bpe -------------------------------- */ --- 6,10 ---- #include "m_pd.h" #include "iemlib.h" !
/* --------------------------- bpe -------------------------------- */ *************** *** 38,42 **** { t_atom *vec = x->x_beg; ! float val, time;
if(x->x_curindex >= x->x_curnum) --- 35,39 ---- { t_atom *vec = x->x_beg; ! t_float val, time;
if(x->x_curindex >= x->x_curnum) *************** *** 60,64 **** { t_atom *vec = x->x_beg; ! float val, time;
if(x->x_curnum) --- 57,61 ---- { t_atom *vec = x->x_beg; ! t_float val, time;
if(x->x_curnum)
Index: iem_sel_any.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_sel_any.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** iem_sel_any.c 11 Apr 2006 16:24:09 -0000 1.4 --- iem_sel_any.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,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" --- 4,7 ---- *************** *** 33,37 ****
! static void iem_sel_any_float(t_iem_sel_any *x, t_float f) { int i = (int)f; --- 29,33 ----
! static void iem_sel_any_float(t_iem_sel_any *x, t_floatarg f) { int i = (int)f; *************** *** 83,87 **** }
! static void *iem_sel_any_new(t_float fmax) { t_iem_sel_any *x = (t_iem_sel_any *)pd_new(iem_sel_any_class); --- 79,83 ---- }
! static void *iem_sel_any_new(t_floatarg fmax) { t_iem_sel_any *x = (t_iem_sel_any *)pd_new(iem_sel_any_class);
Index: sigLFO_noise.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/sigLFO_noise.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** sigLFO_noise.c 11 Apr 2006 16:24:09 -0000 1.4 --- sigLFO_noise.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,17 **** 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~ --------------------- */ --- 4,11 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
#include "m_pd.h" #include "iemlib.h" !
/* -------------------- LFO_noise~ --------------------- */ *************** *** 27,35 **** double x_rcp_range; unsigned int x_state; ! float x_fact; ! float x_incr; ! float x_y1; ! float x_y2; ! float x_phase; } t_sigLFO_noise;
--- 21,29 ---- double x_rcp_range; unsigned int x_state; ! t_float x_fact; ! t_float x_incr; ! t_float x_y1; ! t_float x_y2; ! t_float x_phase; } t_sigLFO_noise;
*************** *** 80,87 **** 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;
while(n--) --- 74,81 ---- t_sigLFO_noise *x = (t_sigLFO_noise *)(w[2]); int n = (int)(w[3]); ! 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--) *************** *** 102,106 **** }
! static void sigLFO_noise_float(t_sigLFO_noise *x, t_float freq) { x->x_incr = freq * x->x_fact; --- 96,100 ---- }
! static void sigLFO_noise_float(t_sigLFO_noise *x, t_floatarg freq) { x->x_incr = freq * x->x_fact;
Index: init.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/init.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** init.c 11 Apr 2006 16:24:09 -0000 1.4 --- init.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,18 **** 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 ---------------------------- */ --- 4,10 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
#include "m_pd.h" #include "iemlib.h" !
/* ------------------------ init ---------------------------- */ *************** *** 53,57 **** }
! static void init_float(t_init *x, t_float f) { x->x_ac = 1; --- 45,49 ---- }
! static void init_float(t_init *x, t_floatarg f) { x->x_ac = 1;
Index: makefile_win =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/makefile_win,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** makefile_win 31 Oct 2006 14:17:16 -0000 1.6 --- makefile_win 7 Nov 2006 17:11:40 -0000 1.7 *************** *** 18,63 ****
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
OBJ = $(SRC:.c=.obj) --- 18,59 ----
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_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)
Index: exp_inc.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/exp_inc.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** exp_inc.c 8 Jul 2005 02:04:25 -0000 1.3 --- exp_inc.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 6,13 **** #include "m_pd.h" #include "iemlib.h" ! #include <stdlib.h> ! #include <string.h> ! #include <stdio.h> ! #include <math.h>
/* ------------------------ exp_inc ---------------------------- */ --- 6,10 ---- #include "m_pd.h" #include "iemlib.h" !
/* ------------------------ exp_inc ---------------------------- */ *************** *** 20,29 **** { t_object x_obj; ! float x_initialval; ! float x_currentval; ! float x_mulfactor; ! float x_addincrement; ! float x_min; ! float x_max; } t_exp_inc;
--- 17,26 ---- { t_object x_obj; ! 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;
*************** *** 49,53 **** static void exp_inc_float(t_exp_inc *x, t_floatarg f) { ! x->x_initialval = (float)f; x->x_currentval = x->x_initialval; if(x->x_currentval < x->x_min) --- 46,50 ---- static void exp_inc_float(t_exp_inc *x, t_floatarg f) { ! x->x_initialval = (t_float)f; x->x_currentval = x->x_initialval; if(x->x_currentval < x->x_min) *************** *** 59,73 **** static void exp_inc_ft1(t_exp_inc *x, t_floatarg f) { ! x->x_mulfactor = 1.0 + 0.01*(float)f; }
static void exp_inc_ft2(t_exp_inc *x, t_floatarg f) { ! x->x_addincrement = (float)f; }
static void exp_inc_ft3(t_exp_inc *x, t_floatarg f) { ! x->x_min = (float)f; if(x->x_currentval < x->x_min) x->x_currentval = x->x_min; --- 56,70 ---- static void exp_inc_ft1(t_exp_inc *x, t_floatarg 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 = (t_float)f; }
static void exp_inc_ft3(t_exp_inc *x, t_floatarg f) { ! x->x_min = (t_float)f; if(x->x_currentval < x->x_min) x->x_currentval = x->x_min; *************** *** 76,80 **** static void exp_inc_ft4(t_exp_inc *x, t_floatarg f) { ! x->x_max = (float)f; if(x->x_currentval > x->x_max) x->x_currentval = x->x_max; --- 73,77 ---- static void exp_inc_ft4(t_exp_inc *x, t_floatarg f) { ! x->x_max = (t_float)f; if(x->x_currentval > x->x_max) x->x_currentval = x->x_max;
Index: prepend_ascii.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/prepend_ascii.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** prepend_ascii.c 11 Apr 2006 16:24:09 -0000 1.4 --- prepend_ascii.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,18 **** 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 ---------------------------- */ --- 4,10 ---- *************** *** 43,47 **** }
! static void prepend_ascii_float(t_prepend_ascii *x, t_float f) { SETFLOAT(x->x_at+x->x_ac, f); --- 35,39 ---- }
! static void prepend_ascii_float(t_prepend_ascii *x, t_floatarg f) { SETFLOAT(x->x_at+x->x_ac, f);
Index: sigiem_blocksize.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/sigiem_blocksize.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** sigiem_blocksize.c 11 Apr 2006 16:24:09 -0000 1.4 --- sigiem_blocksize.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,15 **** 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~ -------------------- */ --- 4,10 ----
Index: mergefilename.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/mergefilename.c,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** mergefilename.c 11 Apr 2006 16:24:09 -0000 1.5 --- mergefilename.c 7 Nov 2006 17:11:40 -0000 1.6 *************** *** 4,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" --- 4,7 ---- *************** *** 14,18 **** #include <string.h> #include <stdio.h> ! #include <math.h>
/* -------------------------- mergefilename ------------------------------ */ --- 10,14 ---- #include <string.h> #include <stdio.h> !
/* -------------------------- mergefilename ------------------------------ */
Index: iem_prepend.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_prepend.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** iem_prepend.c 11 Apr 2006 16:24:09 -0000 1.3 --- iem_prepend.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 4,17 **** 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 --------------------------- */ --- 4,11 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
#include "m_pd.h" #include "iemlib.h" !
/* ----------------------- iem_prepend --------------------------- */ *************** *** 52,56 **** }
! static void iem_prepend_float(t_iem_prepend *x, t_float f) { if(x->x_selector_sym == &s_bang) --- 46,50 ---- }
! static void iem_prepend_float(t_iem_prepend *x, t_floatarg f) { if(x->x_selector_sym == &s_bang) *************** *** 128,132 **** }
! static void iem_prepend_proxy_float(t_iem_prepend_proxy *p, t_float f) { t_iem_prepend *x = p->p_owner; --- 122,126 ---- }
! static void iem_prepend_proxy_float(t_iem_prepend_proxy *p, t_floatarg f) { t_iem_prepend *x = p->p_owner;
Index: protect_against_open.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/protect_against_open.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** protect_against_open.c 11 Apr 2006 16:24:09 -0000 1.3 --- protect_against_open.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 4,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" --- 4,7 ----
Index: sigm2f.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/sigm2f.c,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** sigm2f.c 11 Apr 2006 16:24:09 -0000 1.5 --- sigm2f.c 7 Nov 2006 17:11:40 -0000 1.6 *************** *** 4,17 **** 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>
--- 4,10 ---- *************** *** 21,25 **** #define M2FTABSIZE 2048
! float *iem_m2f_table=(float *)0L;
static t_class *sigm2f_class; --- 14,18 ---- #define M2FTABSIZE 2048
! t_float *iem_m2f_table=(t_float *)0L;
static t_class *sigm2f_class; *************** *** 28,32 **** { t_object x_obj; ! float x_msi; } t_sigm2f;
--- 21,25 ---- { t_object x_obj; ! t_float x_msi; } t_sigm2f;
*************** *** 45,49 **** t_sigm2f *x = (t_sigm2f *)(w[3]); int n = (int)(w[4]); ! float *tab = iem_m2f_table, *addr, f1, f2, frac, iinn; double dphase; int normhipart; --- 38,42 ---- t_sigm2f *x = (t_sigm2f *)(w[3]); int n = (int)(w[4]); ! t_float *tab = iem_m2f_table, *addr, f1, f2, frac, iinn; double dphase; int normhipart; *************** *** 105,111 **** { int i; ! float *fp, midi, refexp=440.0*exp(-5.75*log(2.0));
! iem_m2f_table = (float *)getbytes(sizeof(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); --- 98,104 ---- { int i; ! t_float *fp, midi, refexp=440.0*exp(-5.75*log(2.0));
! 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);
Index: sigfade.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/sigfade.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** sigfade.c 11 Apr 2006 16:24:09 -0000 1.4 --- sigfade.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,17 **** 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>
--- 4,9 ---- *************** *** 33,43 **** { t_object x_obj; ! float *x_table; ! float x_f; } t_sigfade;
static void sigfade_set(t_sigfade *x, t_symbol *s) { ! if(!strcmp(s->s_name, "_lin")) x->x_table = iem_fade_table_lin; else if(!strcmp(s->s_name, "_linsqrt")) --- 25,35 ---- { t_object x_obj; ! 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")) x->x_table = iem_fade_table_lin; else if(!strcmp(s->s_name, "_linsqrt")) *************** *** 50,53 **** --- 42,57 ---- 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; } *************** *** 69,73 **** t_sigfade *x = (t_sigfade *)(w[3]); int n = (int)(w[4]); ! float *tab = x->x_table, *addr, f1, f2, frac; double dphase; int normhipart; --- 73,77 ---- t_sigfade *x = (t_sigfade *)(w[3]); int n = (int)(w[4]); ! t_float *tab = x->x_table, *addr, f1, f2, frac; double dphase; int normhipart; *************** *** 80,84 **** while (n--) { ! dphase = (double)(*in++ * (float)(COSTABSIZE) * 0.99999) + UNITBIT32; tf.tf_d = dphase; addr = tab + (tf.tf_i[HIOFFSET] & (COSTABSIZE-1)); --- 84,88 ---- while (n--) { ! dphase = (double)(*in++ * (t_float)(COSTABSIZE) * 0.99999) + UNITBIT32; tf.tf_d = dphase; addr = tab + (tf.tf_i[HIOFFSET] & (COSTABSIZE-1)); *************** *** 91,95 **** #endif #if 1 /* this is the same, unwrapped by hand. */ ! dphase = (double)(*in++ * (float)(COSTABSIZE) * 0.99999) + UNITBIT32; tf.tf_d = dphase; addr = tab + (tf.tf_i[HIOFFSET] & (COSTABSIZE-1)); --- 95,99 ---- #endif #if 1 /* this is the same, unwrapped by hand. */ ! dphase = (double)(*in++ * (t_float)(COSTABSIZE) * 0.99999) + UNITBIT32; tf.tf_d = dphase; addr = tab + (tf.tf_i[HIOFFSET] & (COSTABSIZE-1)); *************** *** 97,101 **** while (--n) { ! dphase = (double)(*in++ * (float)(COSTABSIZE) * 0.99999) + UNITBIT32; frac = tf.tf_d - UNITBIT32; tf.tf_d = dphase; --- 101,105 ---- while (--n) { ! dphase = (double)(*in++ * (t_float)(COSTABSIZE) * 0.99999) + UNITBIT32; frac = tf.tf_d - UNITBIT32; tf.tf_d = dphase; *************** *** 122,131 **** { int i; ! float *fp, phase, fff,phsinc = 0.5*3.141592653 / ((float)COSTABSIZE*0.99999); union tabfudge tf;
if(!iem_fade_table_sin) { ! iem_fade_table_sin = (float *)getbytes(sizeof(float) * (COSTABSIZE+1)); for(i=COSTABSIZE+1, fp=iem_fade_table_sin, phase=0; i--; fp++, phase+=phsinc) *fp = sin(phase); --- 126,135 ---- { int i; ! 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 = (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); *************** *** 133,137 **** if(!iem_fade_table_sinhann) { ! iem_fade_table_sinhann = (float *)getbytes(sizeof(float) * (COSTABSIZE+1)); for(i=COSTABSIZE+1, fp=iem_fade_table_sinhann, phase=0; i--; fp++, phase+=phsinc) { --- 137,141 ---- if(!iem_fade_table_sinhann) { ! 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) { *************** *** 142,146 **** if(!iem_fade_table_hann) { ! iem_fade_table_hann = (float *)getbytes(sizeof(float) * (COSTABSIZE+1)); for(i=COSTABSIZE+1, fp=iem_fade_table_hann, phase=0; i--; fp++, phase+=phsinc) { --- 146,150 ---- if(!iem_fade_table_hann) { ! 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) { *************** *** 149,156 **** } } ! phsinc = 1.0 / ((float)COSTABSIZE*0.99999); if(!iem_fade_table_lin) { ! iem_fade_table_lin = (float *)getbytes(sizeof(float) * (COSTABSIZE+1)); for(i=COSTABSIZE+1, fp=iem_fade_table_lin, phase=0; i--; fp++, phase+=phsinc) *fp = phase; --- 153,160 ---- } } ! phsinc = 1.0 / ((t_float)COSTABSIZE*0.99999); if(!iem_fade_table_lin) { ! 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; *************** *** 158,162 **** if(!iem_fade_table_linsqrt) { ! iem_fade_table_linsqrt = (float *)getbytes(sizeof(float) * (COSTABSIZE+1)); for(i=COSTABSIZE+1, fp=iem_fade_table_linsqrt, phase=0; i--; fp++, phase+=phsinc) *fp = pow(phase, 0.75); --- 162,166 ---- if(!iem_fade_table_linsqrt) { ! 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); *************** *** 164,168 **** if(!iem_fade_table_sqrt) { ! iem_fade_table_sqrt = (float *)getbytes(sizeof(float) * (COSTABSIZE+1)); for(i=COSTABSIZE+1, fp=iem_fade_table_sqrt, phase=0; i--; fp++, phase+=phsinc) *fp = sqrt(phase); --- 168,172 ---- if(!iem_fade_table_sqrt) { ! 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);
Index: unsymbol.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/unsymbol.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** unsymbol.c 11 Apr 2006 16:24:09 -0000 1.4 --- unsymbol.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,17 **** 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 ------------------------- */ --- 4,9 ----
Index: dollarg.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/dollarg.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** dollarg.c 8 Jul 2005 02:04:25 -0000 1.3 --- dollarg.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 7,16 **** #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 ---------------------------- */ --- 7,11 ----
Index: float24.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/float24.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** float24.c 8 Jul 2005 02:04:25 -0000 1.3 --- float24.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 19,23 **** { t_object x_obj; ! float x_arg; } t_float24;
--- 19,23 ---- { t_object x_obj; ! t_float x_arg; } t_float24;
Index: speedlim.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/speedlim.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** speedlim.c 11 Apr 2006 16:24:09 -0000 1.4 --- speedlim.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,17 **** 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 -------------------------- */ --- 4,10 ---- *************** *** 28,33 **** int x_output_is_locked; int x_there_was_n_event; ! float x_curval; ! float x_lastout; } t_speedlim;
--- 21,26 ---- int x_output_is_locked; int x_there_was_n_event; ! t_float x_curval; ! t_float x_lastout; } t_speedlim;
*************** *** 55,59 **** }
! static void speedlim_float(t_speedlim *x, t_float val) { x->x_curval = val; --- 48,52 ---- }
! static void speedlim_float(t_speedlim *x, t_floatarg val) { x->x_curval = val; *************** *** 69,73 **** }
! static void speedlim_ft1(t_speedlim *x, t_float delay) { if(delay < 0.0) --- 62,66 ---- }
! static void speedlim_ft1(t_speedlim *x, t_floatarg delay) { if(delay < 0.0) *************** *** 81,85 **** }
! static void *speedlim_new(t_float delay) { t_speedlim *x = (t_speedlim *)pd_new(speedlim_class); --- 74,78 ---- }
! static void *speedlim_new(t_floatarg delay) { t_speedlim *x = (t_speedlim *)pd_new(speedlim_class);
Index: iem_receive.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_receive.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** iem_receive.c 11 Apr 2006 16:24:09 -0000 1.3 --- iem_receive.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 4,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" --- 4,7 ---- *************** *** 80,84 **** }
! static void iem_receive_proxy_float(t_iem_receive_proxy *p, t_float f) { t_iem_receive *x = p->p_owner; --- 76,80 ---- }
! static void iem_receive_proxy_float(t_iem_receive_proxy *p, t_floatarg f) { t_iem_receive *x = p->p_owner;
Index: iem_append.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_append.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** iem_append.c 11 Apr 2006 16:24:09 -0000 1.3 --- iem_append.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 4,17 **** 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>
--- 4,9 ----
Index: iem_send.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_send.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** iem_send.c 11 Apr 2006 16:24:09 -0000 1.3 --- iem_send.c 7 Nov 2006 17:11:40 -0000 1.4 *************** *** 4,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" --- 4,7 ---- *************** *** 43,47 **** }
! static void iem_send_float(t_iem_send *x, t_float f) { if(x->x_send_label_sym) --- 39,43 ---- }
! static void iem_send_float(t_iem_send *x, t_floatarg f) { if(x->x_send_label_sym)
Index: post_netreceive.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/post_netreceive.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** post_netreceive.c 11 Apr 2006 16:24:09 -0000 1.4 --- post_netreceive.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,18 **** 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 ---------------------------- */ --- 4,11 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2004 */
#include "m_pd.h" #include "iemlib.h" !
/* ------------------------ post_netreceive ---------------------------- */ *************** *** 172,176 **** }
! static void post_netreceive_fetch_all_parameters(t_post_netreceive *x, t_float nr_sended_para) { int nrsp=(int)nr_sended_para; --- 165,169 ---- }
! static void post_netreceive_fetch_all_parameters(t_post_netreceive *x, t_floatarg nr_sended_para) { int nrsp=(int)nr_sended_para; *************** *** 192,196 **** }
! static void *post_netreceive_new(t_float fmin, t_float fmax) { t_post_netreceive *x = (t_post_netreceive *)pd_new(post_netreceive_class); --- 185,189 ---- }
! static void *post_netreceive_new(t_floatarg fmin, t_floatarg fmax) { t_post_netreceive *x = (t_post_netreceive *)pd_new(post_netreceive_class);
Index: iem_pbank_csv.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/iem_pbank_csv.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** iem_pbank_csv.c 11 Apr 2006 16:24:09 -0000 1.4 --- iem_pbank_csv.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,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" --- 4,7 ---- *************** *** 199,203 **** int natom = 0; t_atom *ap = *at_beg; ! float f;
while(1) --- 195,199 ---- int natom = 0; t_atom *ap = *at_beg; ! t_float f;
while(1) *************** *** 655,659 **** atmem += x->x_nr_para * x->x_line + beg; atbuf += beg; ! SETFLOAT(atout, (float)beg); atout++; for(i=0; i<nrp; i++) --- 651,655 ---- atmem += x->x_nr_para * x->x_line + beg; atbuf += beg; ! SETFLOAT(atout, (t_float)beg); atout++; for(i=0; i<nrp; i++) *************** *** 726,730 **** }
! static void iem_pbank_csv_ft1(t_iem_pbank_csv *x, t_float fline_nr) { int line = (int)fline_nr; --- 722,726 ---- }
! static void iem_pbank_csv_ft1(t_iem_pbank_csv *x, t_floatarg fline_nr) { int line = (int)fline_nr;
Index: pre_inlet.c =================================================================== RCS file: /cvsroot/pure-data/externals/iemlib/src/iemlib2/pre_inlet.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** pre_inlet.c 11 Apr 2006 16:24:09 -0000 1.4 --- pre_inlet.c 7 Nov 2006 17:11:40 -0000 1.5 *************** *** 4,18 **** 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 ---------------------------- */ --- 4,10 ---- iemlib2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */
#include "m_pd.h" #include "iemlib.h" !
/* ------------------------ pre_inlet ---------------------------- */ *************** *** 39,43 **** }
! static void pre_inlet_float(t_pre_inlet *x, t_float f) { outlet_anything(x->x_obj.ob_outlet, x->x_sym, 1, &x->x_at); --- 31,35 ---- }
! 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);