[Gridflow-cvs] [svn] commit: r4734 - /trunk/src/classes2.cxx

gridflow-cvs at artengine.ca gridflow-cvs at artengine.ca
Tue Nov 3 22:52:39 EST 2009


Author: matju
Date: Tue Nov  3 22:52:39 2009
New Revision: 4734

Log:
remove [send39]

Modified:
    trunk/src/classes2.cxx

Modified: trunk/src/classes2.cxx
==============================================================================
--- trunk/src/classes2.cxx (original)
+++ trunk/src/classes2.cxx Tue Nov  3 22:52:39 2009
@@ -674,22 +674,6 @@
 \def 1 float(int i) {index = mod(i,n);}
 \end class {install("shunt",2,0);}
 
-\class Send39 : FObject {
-	\attr t_symbol *dest;
-	\constructor (t_symbol *dest) {
-		char buf[MAXPDSTRING];
-		sprintf(buf,"pd-%s",dest->s_name);
-		this->dest = gensym(buf);
-	}
-	\decl void anything (...);
-};
-\def void anything(...) {
-	t_symbol *sel = gensym(argv[0].a_symbol->s_name+3);
-	if (this->dest->s_thing) pd_typedmess(this->dest->s_thing,sel,argc-1,argv+1);
-	else RAISE("send-symbol %s does not exist",this->dest->s_name);
-}
-\end class {install("send39",1,0);}
-
 struct Receives;
 struct ReceivesProxy {
 	t_pd x_pd;



More information about the Gridflow-cvs mailing list