blob: 42cd9acc3180be95f724ff0da7e7868f55b57846 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
/* ...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 x_obj;
} t_iem16;
static t_class *iem16_class;
static void *iem16_new(void){
t_iem16 *x = (t_iem16 *)pd_new(iem16_class);
post("iem16: 16bit objects for low memory usage");
return(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) {
static unsigned int setupcount=0;
if(setupcount>0) {
post("iem16:\tsetup called several times, skipping...");
return;
}
setupcount++;
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__);
#if defined __WIN32__ || defined __WIN32
post("iem16:\ton W32 you cannot create the [iem16] object. nevermind...");
#else
iem16_class = class_new(gensym("iem16"),
iem16_new,
0,
sizeof(t_iem16), 0, 0);
class_addcreator((t_newmethod)iem16_new,
gensym("IEM16"), 0);
#endif
}
void IEM16_setup(void){
iem16_setup();
}
|
