[Gridflow-cvs] [svn] commit: r6127 - /trunk/src/opencv.cxx

svn-gridflow at artengine.ca svn-gridflow at artengine.ca
Sun Aug 15 17:07:10 EDT 2010


Author: matju
Date: Sun Aug 15 17:07:10 2010
New Revision: 6127

Log:
replace SETLIST by set_atom

Modified:
    trunk/src/opencv.cxx

Modified: trunk/src/opencv.cxx
==============================================================================
--- trunk/src/opencv.cxx (original)
+++ trunk/src/opencv.cxx Sun Aug 15 17:07:10 2010
@@ -117,7 +117,7 @@
 	t_binbuf *b = binbuf_new();
 	if (tc.type & CV_TERMCRIT_ITER) binbuf_addv(b,"f",tc.max_iter); else binbuf_addv(b,"s",gensym("nil"));
 	if (tc.type & CV_TERMCRIT_EPS ) binbuf_addv(b,"f",tc.epsilon ); else binbuf_addv(b,"s",gensym("nil"));
-	SETLIST(a,b);
+	set_atom(a,b);
 }
 
 CvArr *cvGrid(PtrGrid g, CvMode mode, int reqdims=-1) {
@@ -178,15 +178,15 @@
 
 void set_atom (t_atom *a, CvPoint &v) {
 	t_binbuf *b = binbuf_new(); binbuf_addv(b,"ii",v.y,v.x);
-	SETLIST(a,b);
+	set_atom(a,b);
 }
 void set_atom (t_atom *a, CvSize &v) {
 	t_binbuf *b = binbuf_new(); binbuf_addv(b,"ii",v.height,v.width);
-	SETLIST(a,b);
+	set_atom(a,b);
 }
 void set_atom (t_atom *a, CvScalar &s) {
 	t_binbuf *b = binbuf_new(); binbuf_addv(b,"ffff",s.val[0],s.val[1],s.val[2],s.val[3]);
-	SETLIST(a,b);
+	set_atom(a,b);
 }
 CvPoint  convert (const t_atom &a, CvPoint *)   {USELIST; return cvPoint( GETI(0),GETI(1));}
 CvSize   convert (const t_atom &a, CvSize *)    {USELIST; return cvSize(  GETI(0),GETI(1));}



More information about the Gridflow-cvs mailing list