New "list" object.

Added "addcomma", "addsemi", "adddollar", "adddollsym" messages to
message object.
worked on Mac compilation problems.

svn path=/trunk/; revision=3371

1 files changed, 2 insertions, 14 deletions

diff --git a/pd/src/x_connective.c b/pd/src/x_connective.c
index ad6219cd..3d62b319 100644
--- a/pd/src/x_connective.c
+++ b/pd/src/x_connective.c
@@ -505,11 +505,7 @@ static void route_list(t_route *x, t_symbol *sel, int argc, t_atom *argv)
     if (x->x_type == A_FLOAT)
     {
         float f;
-        if (!argc)  /* empty lists go out reject outlet */
-        {
-            outlet_bang(x->x_rejectout);
-            return;
-        }
+        if (!argc) return;
         f = atom_getfloat(argv);
         for (nelement = x->x_nelement, e = x->x_vec; nelement--; e++)
             if (e->e_w.w_float == f)
@@ -584,8 +580,7 @@ static void *route_new(t_symbol *s, int argc, t_atom *argv)
 {
     int n;
     t_routeelement *e;
-    t_route *x;
-    
+    t_route *x = (t_route *)pd_new(route_class);
     t_atom a;
     if (argc == 0)
     {
@@ -593,13 +588,6 @@ static void *route_new(t_symbol *s, int argc, t_atom *argv)
         SETFLOAT(&a, 0);
         argv = &a;
     }
-    for (n = 1; n < argc; n++)
-        if (argv[n].a_type != argv[0].a_type)
-    {
-        error("route: creation with mixed argument types failed");
-        return (0);
-    }
-    x = (t_route *)pd_new(route_class);
     x->x_type = argv[0].a_type;
     x->x_nelement = argc;
     x->x_vec = (t_routeelement *)getbytes(argc * sizeof(*x->x_vec));