[sc-dev] SF.net SVN: quarks:[2531] Ctk/Ctk classes/CTK.sc

[joshpar@xxxxxxxxxxxxxxxxxxxxx]

Revision: 2531
          http://quarks.svn.sourceforge.net/quarks/?rev=2531&view=rev
Author:   joshpar
Date:     2013-01-04 06:44:58 +0000 (Fri, 04 Jan 2013)
Log Message:
-----------
update CtkEvent, temp fix for group freeing

Modified Paths:
--------------
    Ctk/Ctk classes/CTK.sc

Modified: Ctk/Ctk classes/CTK.sc
===================================================================
--- Ctk/Ctk classes/CTK.sc	2013-01-04 06:22:19 UTC (rev 2530)
+++ Ctk/Ctk classes/CTK.sc	2013-01-04 06:44:58 UTC (rev 2531)
@@ -256,7 +256,7 @@
 
 	freeGroups {
 		masterGroups.do({arg me;
-			me.freeAll(endtime)
+			//me.freeAll(endtime)
 			})
 		}
 	// builds everything except the buffers since they act
@@ -1623,7 +1623,7 @@
 
 /* methods common to CtkGroup and CtkNote need to be put into their own class (CtkNode???) */
 CtkGroup : CtkNode {
-	var <endtime = nil, <duration, <isGroupPlaying = false, <>children, <>noteDict;
+	var <>endtime = nil, <duration, <isGroupPlaying = false, <>children, <>noteDict;
 
 	*new {arg starttime = 0.0, duration, node, addAction = 0, target = 1, server;
 		^super.newCopyArgs(Dictionary.new, nil, addAction, target, server, node)
@@ -1735,7 +1735,7 @@
 		}
 
 	deepFree {arg time = 0.0;
-		this.freeAll(time);
+		//this.freeAll(time);
 		}
 
 	}
@@ -2843,7 +2843,7 @@
 		score = CtkScore.new;
 		this.setup;
 		group.node;
-		[group, envbus, envsynth].do({arg me;
+		[envbus, envsynth].do({arg me;
 			me.notNil.if({
 				me.setStarttime(starttime);
 				score.add(me)
@@ -2877,11 +2877,9 @@
 			inc = inc + by;
 			this.checkCond;
 			});
-		/*
-		group.notNil.if({
-			group.endtime_(score.endtime)
-			});
-		*/
+		group.setStarttime(starttime);
+		group.setDuration(score.endtime);
+		score.add(group);
 		this.scoreClear;
 		^score;
 		}

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.


_______________________________________________
sc-dev mailing list

info (subscription, etc.): http://www.beast.bham.ac.uk/research/sc_mailing_lists.shtml
archive: https://listarc.bham.ac.uk/marchives/sc-dev/
search: https://listarc.bham.ac.uk/lists/sc-dev/search/