[Gridflow-cvs] [svn] commit: r3990 - in /trunk: base/flow_objects.c gridflow.c gridflow.h

gridflow-cvs at artengine.ca gridflow-cvs at artengine.ca
Tue Jul 8 02:21:43 EDT 2008


Author: matju
Date: Tue Jul  8 02:21:43 2008
New Revision: 3990

Log:
move list_new,list_free to gridflow.c

Modified:
    trunk/base/flow_objects.c
    trunk/gridflow.c
    trunk/gridflow.h

Modified: trunk/base/flow_objects.c
==============================================================================
--- trunk/base/flow_objects.c (original)
+++ trunk/base/flow_objects.c Tue Jul  8 02:21:43 2008
@@ -2981,15 +2981,6 @@
 }
 \end class {install("class_exists",1,1);}
 
-typedef t_binbuf t_list;
-
-static t_list *list_new (int argc, t_atom *argv) {
-	t_list *b = binbuf_new();
-	binbuf_add(b,argc,argv);
-	return b;
-}
-static void list_free (t_list *self) {binbuf_free(self);}
-
 \class ListEqual : FObject {
 	t_list *list;
 	\constructor (...) {list=0; _1_list(argc,argv);}

Modified: trunk/gridflow.c
==============================================================================
--- trunk/gridflow.c (original)
+++ trunk/gridflow.c Tue Jul  8 02:21:43 2008
@@ -715,6 +715,15 @@
 	sprintf(bof,"%s/deprecated",dir);          namelist_append_files(sys_searchpath,bof);
 	sprintf(bof,"%s/doc/flow_classes",dir);    namelist_append_files(sys_helppath,  bof);
 }
+
+//----------------------------------------------------------------
+
+static t_list *list_new (int argc, t_atom *argv) {
+	t_list *b = binbuf_new();
+	binbuf_add(b,argc,argv);
+	return b;
+}
+static void list_free (t_list *self) {binbuf_free(self);}
 
 //----------------------------------------------------------------
 

Modified: trunk/gridflow.h
==============================================================================
--- trunk/gridflow.h (original)
+++ trunk/gridflow.h Tue Jul  8 02:21:43 2008
@@ -60,6 +60,11 @@
 // the use of w_gpointer here is fake, just because there's no suitable member in the union
 static inline void SETLIST(t_atom *a, t_binbuf *b) {a->a_type = A_LIST; a->a_gpointer = (t_gpointer *)b;}
 static inline void SETNULL(t_atom *a)              {a->a_type = A_NULL; a->a_gpointer = 0;}
+
+typedef t_binbuf t_list;
+
+static t_list *list_new (int argc, t_atom *argv);
+static void list_free (t_list *self);
 
 typedef char       int8; typedef unsigned char      uint8;
 typedef short     int16; typedef unsigned short     uint16;



More information about the Gridflow-cvs mailing list