diff options
Diffstat (limited to 'src/any2bytes.c')
| -rw-r--r-- | src/any2bytes.c | 28 |
1 files changed, 22 insertions, 6 deletions
diff --git a/src/any2bytes.c b/src/any2bytes.c index c2b2425..4760c5f 100644 --- a/src/any2bytes.c +++ b/src/any2bytes.c @@ -71,6 +71,8 @@ typedef struct _any2bytes } t_any2bytes; +static int ANY2BYTES_INITIALIZED = 0; + /*===================================================================== * Constants *=====================================================================*/ @@ -151,14 +153,16 @@ static void any2bytes_free(t_any2bytes *x) */ void any2bytes_setup_guts(void) { + if (ANY2BYTES_INITIALIZED) return; + //-- class any2bytes_class = class_new(gensym("any2bytes"), - (t_newmethod)any2bytes_new, - (t_method)any2bytes_free, - sizeof(t_any2bytes), - CLASS_DEFAULT, - A_GIMME, //-- initial_bufsize, eos_char - 0); + (t_newmethod)any2bytes_new, + (t_method)any2bytes_free, + sizeof(t_any2bytes), + CLASS_DEFAULT, + A_GIMME, //-- initial_bufsize, eos_char + 0); //-- alias class_addcreator((t_newmethod)any2bytes_new, gensym("any2string"), A_GIMME, 0); @@ -168,6 +172,9 @@ void any2bytes_setup_guts(void) //-- help symbol //class_sethelpsymbol(any2bytes_class, gensym("any2bytes-help.pd")); //-- breaks pd-extended help lookup + + //-- set flag + ANY2BYTES_INITIALIZED = 1; } @@ -179,3 +186,12 @@ void any2bytes_setup(void) post(any2bytes_banner); any2bytes_setup_guts(); } + +/*-------------------------------------------------------------------- + * setup (any2string alias) + */ +void any2string_setup(void) { + post("any2string_setup(): WARNING: names are in flux!"); + post("any2string_setup(): Prefer [any2bytes] over [any2string]."); + any2bytes_setup(); +} |