From 9340768f6c7dea7cb7fe348f6fdf52db75ce9d82 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?= Date: Tue, 23 Nov 2004 15:29:47 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r2300, which included commits to RCS files with non-trunk default branches. svn path=/trunk/externals/iem16/; revision=2301 --- src/iem16.c | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 52 insertions(+) create mode 100644 src/iem16.c (limited to 'src/iem16.c') diff --git a/src/iem16.c b/src/iem16.c new file mode 100644 index 0000000..d916ddc --- /dev/null +++ b/src/iem16.c @@ -0,0 +1,52 @@ +/* ...this is a very IEM16 external ... + it allows for 16bit-constructs where float would eat too much memory + + forum::für::umläute@IEM:2003 +*/ + +#include "iem16.h" + +/* do a little help thing */ + +typedef struct iem16 { + t_object t_ob; +} t_iem16; + +t_class *iem16_class; + +void *iem16_new(void){ + t_iem16 *x = (t_iem16 *)pd_new(iem16_class); + post("iem16: 16bit objects for low memory usage"); + return (void *)x; +} + +/* include some externals */ +void iem16_table_setup(); +void iem16_array_setup(); +void iem16_array_tilde_setup(); +void iem16_delay_setup(); + +void iem16_setup(void) { + iem16_table_setup(); + iem16_array_setup(); + iem16_array_tilde_setup(); + iem16_delay_setup(); + + /* ************************************** */ + post("iem16:\t16bit-objects for low memory usage"); + post("iem16:\t(l) forum::für::umläute\t\tIOhannes m zmölnig"); + post("iem16:\tInstitute of Electronic Music and Acoustics, Graz - iem"); + post("iem16:\tcompiled: "__DATE__); + + + iem16_class = class_new(gensym("iem16"), + iem16_new, + 0, + sizeof(t_iem16), CLASS_NOINLET, A_NULL); + class_addcreator((t_newmethod)iem16_new, + gensym("IEM16"), A_NULL); +} + +void IEM16_setup(void){ + iem16_setup(); +} -- cgit v1.2.1