aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorN.N. <matju@users.sourceforge.net>2009-04-25 04:20:33 +0000
committerN.N. <matju@users.sourceforge.net>2009-04-25 04:20:33 +0000
commita58c8f0d4947f0b5d038df1c15745018390c0e24 (patch)
treebd48f55690a4fb9ad79c94a1d97d9e5f0b67ae05
parent52bce6efb28136dd8886eecf4dbcdddd17d099f6 (diff)
fix [any]
svn path=/trunk/; revision=11137
-rw-r--r--desiredata/src/builtins.c9
1 files changed, 5 insertions, 4 deletions
diff --git a/desiredata/src/builtins.c b/desiredata/src/builtins.c
index 891e1f60..a67b22ca 100644
--- a/desiredata/src/builtins.c
+++ b/desiredata/src/builtins.c
@@ -544,7 +544,7 @@ static void qlist_write(t_qlist *x, t_symbol *filename, t_symbol *format) {
char *buf = canvas_makefilename(x->canvas,filename->name,0,0);
if (!strcmp(format->name, "cr")) cr = 1;
else if (*format->name) error("qlist_read: unknown flag: %s", format->name);
- if (binbuf_write(x->binbuf, buf, "", cr)) error("%s: write failed", filename->name);
+ if (binbuf_write(x->binbuf,buf,"",cr)) error("%s: write failed", filename->name);
free(buf);
}
static void qlist_print(t_qlist *x) {
@@ -666,7 +666,8 @@ static void alist_anything(t_binbuf *x, t_symbol *s, int argc, t_atom *argv) {
}
static void alist_toatoms(t_binbuf *x, t_atom *to) {for (size_t i=0; i<x->n; i++) to[i] = x->v[i];}
-t_class *list_append_class; struct t_list_append : t_object {t_binbuf *alist;};
+//t_class *list_any_class; struct t_list_any : t_object {t_binbuf *alist;};
+t_class *list_append_class; struct t_list_append : t_object {t_binbuf *alist;};
t_class *list_prepend_class; struct t_list_prepend : t_object {t_binbuf *alist;};
t_class *list_split_class; struct t_list_split : t_object {t_float f;};
t_class *list_trim_class; struct t_list_trim : t_object {};
@@ -1086,10 +1087,10 @@ static void *any_new(t_symbol *s,int argc, t_atom *argv) {
static void any_anything(t_any *x, t_symbol *s, int argc, t_atom *argv) {
t_atom *outv; int outc = x->alist->n+argc+1; ATOMS_ALLOCA(outv, outc);
- if (argv[0].a_type == A_FLOAT && s->name == "list" || s->name == "float") {
+ if (argv[0].a_type == A_FLOAT && *s=="list" || *s=="float") {
alist_list(x->alist, 0, argc, argv); outlet_anything(x->outlet, &s_list, argc, argv);return;
}
- if (argv[0].a_type == A_SYMBOL || s->name != "list" || s->name != "float") {
+ if (argv[0].a_type == A_SYMBOL || *s!="list" || *s!="float") {
alist_anything(x->alist, s, argc, argv); outlet_anything(x->outlet, s, argc, argv);
}
}