[Gridflow-cvs] [svn] commit: r3456 - in /trunk: base/flow_objects.rb deprecated/listelement.pd deprecated/listsublist.pd

gridflow-cvs at artengine.ca gridflow-cvs at artengine.ca
Fri Apr 4 03:06:48 EDT 2008


Author: matju
Date: Fri Apr  4 03:06:47 2008
New Revision: 3456

Log:
remade [listelement] and [listsublist] as abstractions

Added:
    trunk/deprecated/listelement.pd
    trunk/deprecated/listsublist.pd
Modified:
    trunk/base/flow_objects.rb

Modified: trunk/base/flow_objects.rb
==============================================================================
--- trunk/base/flow_objects.rb (original)
+++ trunk/base/flow_objects.rb Fri Apr  4 03:06:47 2008
@@ -295,21 +295,6 @@
 	end
 	def _1_float i; @index=i.to_i % @n end
 	add_creator "demux"
-}
-
-FObject.subclass("listelement",2,1) {
-	def initialize(i=0) super; @i=i.to_i end
-	def _1_float(i) @i=i.to_i end
-	def _0_list(*a)
-		e=a[@i]
-		if Symbol===e then send_out 0, :symbol, e else send_out 0, e end
-	end
-}
-FObject.subclass("listsublist",3,1) {
-	def initialize(i=0,n=1) super; @i, at n=i.to_i,n.to_i end
-	def _1_float(i) @i=i.to_i end
-	def _2_float(n) @n=n.to_i end
-	def _0_list(*a) send_out 0, :list, *a[@i, at n] end
 }
 
 FObject.subclass("route2",1,1) {



More information about the Gridflow-cvs mailing list