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

gridflow-cvs at artengine.ca gridflow-cvs at artengine.ca
Sun Jan 24 19:16:27 EST 2010


Author: matju
Date: Sun Jan 24 19:16:26 2010
New Revision: 4926

Log:
Because ClassLoader Is a Myth (tm)

Modified:
    trunk/src/classes2.cxx

Modified: trunk/src/classes2.cxx
==============================================================================
--- trunk/src/classes2.cxx (original)
+++ trunk/src/classes2.cxx Sun Jan 24 19:16:26 2010
@@ -1166,6 +1166,17 @@
 };
 \end class {install("gf/propertybang",1,1); class_setpropertiesfn(canvas_class,propertybang_properties);}
 
+/* hack because hexloader is a myth */
+\class InvTimes : FObject {
+	float b;
+	\constructor (float b=1) {this->b=b;}
+	\decl 0 float (float a)            {                 outlet_float(outlets[0],b/a);}
+	\decl 0 list    (float a, float b) {this->b=b; outlet_float(outlets[0],b/a);}
+	\decl 1 float (float b) {this->b=b;}
+	\decl 1 list    (float b) {this->b=b;}
+};
+\end class {install("inv*",2,1);}
+
 void startup_flow_objects2 () {
 	\startall
 }



More information about the Gridflow-cvs mailing list