[Gridflow-cvs] [svn] commit: r5959 - /trunk/src/classes1.cxx

svn-gridflow at artengine.ca svn-gridflow at artengine.ca
Wed Aug 4 22:32:00 EDT 2010


Author: matju
Date: Wed Aug  4 22:32:00 2010
New Revision: 5959

Log:
added [#type, abbr]

Modified:
    trunk/src/classes1.cxx

Modified: trunk/src/classes1.cxx
==============================================================================
--- trunk/src/classes1.cxx (original)
+++ trunk/src/classes1.cxx Wed Aug  4 22:32:00 2010
@@ -957,11 +957,13 @@
 } GRID_END
 \end class {install("#dim",1,1); add_creator("@dim");}
 \class GridType : FObject {
+	\attr bool abbr;
 	\constructor () {}
 	\grin 0
 };
 GRID_INLET(0) {
-	outlet_symbol(outlets[0],gensym(const_cast<char *>(number_type_table[in.nt].name)));
+	if (abbr) outlet_symbol(outlets[0],gensym(const_cast<char *>(number_type_table[in.nt].alias)));
+	else      outlet_symbol(outlets[0],gensym(const_cast<char *>(number_type_table[in.nt].name)));
 } GRID_END
 \end class {install("#type",1,1); add_creator("@type");}
 



More information about the Gridflow-cvs mailing list