[Gridflow-cvs] [svn] commit: r6418 - /trunk/src/expr.cxx

svn-gridflow at artengine.ca svn-gridflow at artengine.ca
Fri Oct 8 15:04:51 EDT 2010


Author: matju
Date: Fri Oct  8 15:04:50 2010
New Revision: 6418

Log:
fix crash in [#expr]... sorry. this should go in the 9.12 tarball...

Modified:
    trunk/src/expr.cxx

Modified: trunk/src/expr.cxx
==============================================================================
--- trunk/src/expr.cxx (original)
+++ trunk/src/expr.cxx Fri Oct  8 15:04:50 2010
@@ -116,7 +116,7 @@
 					string z=tok.to_s(), zt=atomtype_to_s(tok.a_type);
 					RAISE("syntax error (c) tok=%s type=%s",z.data(),zt.data());
 				}
-				t_symbol *o = a.a_symbol; int e = ((Numop *)o)->arity();
+				t_symbol *o = a.a_symbol; int e = TO(Numop *,a)->arity();
 				if (parse(2)!=e) RAISE("wrong number of arguments for '%s'",o->s_name);
 				code.push_back(t_atom2(e==1?A_OP1:e==2?A_OP:A_CANT,o));
 			  } break;



More information about the Gridflow-cvs mailing list