From 8200ef52c31953edf5076f28059dbd889cec2a25 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Tue, 2 Jun 2009 18:48:44 +0000 Subject: reformat svn path=/trunk/; revision=11620 --- desiredata/src/kernel.c | 22 ++++------------------ 1 file changed, 4 insertions(+), 18 deletions(-) (limited to 'desiredata') diff --git a/desiredata/src/kernel.c b/desiredata/src/kernel.c index 99e1209a..a19495b0 100644 --- a/desiredata/src/kernel.c +++ b/desiredata/src/kernel.c @@ -128,24 +128,10 @@ t_symbol *atom_gensym(t_atom *a) { /* this works better for graph labels */ return gensym("???"); } -t_float atom_getfloatarg(int which, int argc, t_atom *argv) { - if (argc <= which) return 0; - argv += which; - return argv->a_type==A_FLOAT ? argv->a_float : 0; -} - -t_int atom_getintarg(int which, int argc, t_atom *argv) -{return (t_int)atom_getfloatarg(which, argc, argv);} - -t_symbol *atom_getsymbolarg(int which, int argc, t_atom *argv) { - if (argc <= which) return &s_; - argv += which; - return argv->a_type==A_SYMBOL ? argv->a_symbol : &s_; -} - -const char *atom_getstringarg(int which, int argc, t_atom *argv) { - return atom_getsymbolarg(which,argc,argv)->name; -} +t_float atom_getfloatarg( int which, int argc, t_atom *argv) {return argc<=which ? 0 : atom_getfloat( argv+which);} +t_symbol * atom_getsymbolarg(int which, int argc, t_atom *argv) {return argc<=which ? &s_ : atom_getsymbol(argv+which);} +t_int atom_getintarg( int which, int argc, t_atom *argv) {return t_int(atom_getfloatarg(which,argc,argv));} +const char *atom_getstringarg(int which, int argc, t_atom *argv) {return atom_getsymbolarg(which,argc,argv)->name;} /* convert an atom into a string, in the reverse sense of binbuf_text (q.v.) special attention is paid to symbols containing the special characters -- cgit v1.2.1