release-packaging/Classes/FluidBufThreadDemo.sc: Finish sclang class

release-packaging/Classes/FluidBufThreadDemo.sc

@@ -1,19 +1,15 @@
 FluidBufThreadDemo : UGen{
     var <>synth, <>server;
 
-		*kr {|source, startFrame = 0, numFrames = -1, startChan = 0, numChans = -1, features,  algorithm = 2, minFreq = 20, maxFreq = 10000, unit = 0, windowSize = 1024, hopSize = -1, fftSize = -1, doneAction = 0|
+		*kr {|source, result, time, doneAction = 0|
 
-		var maxFFTSize = if (fftSize == -1) {windowSize.nextPowerOfTwo} {fftSize};
-
-		source = source.asUGenInput;
-		features = features.asUGenInput;
+		result = result.asUGenInput;
 
-		source.isNil.if {"FluidBufPitch:  Invalid source buffer".throw};
-		features.isNil.if {"FluidBufPitch:  Invalid features buffer".throw};
+		result.isNil.if {"FluidBufThreadDemo:  Invalid output buffer".throw};
 
 		//NB For wrapped versions of NRT classes, we set the params for maxima to
 		//whatever has been passed in language-side (e.g maxFFTSize still exists as a parameter for the server plugin, but makes less sense here: it just needs to be set to a legal value)
-        ^this.multiNew(\control, source, startFrame, numFrames, startChan, numChans, features, algorithm, minFreq, maxFreq, unit, windowSize, hopSize, fftSize, maxFFTSize, doneAction);
+        ^this.multiNew(\control, result, time, doneAction);
 	}
 
     *process { |server, result, time, action|
@@ -22,7 +18,7 @@ FluidBufThreadDemo : UGen{
 
 		result = result.asUGenInput;
 
-		result.isNil.if {"FluidBufThreadDemo:  Invalid source buffer".throw};
+		result.isNil.if {"FluidBufThreadDemo:  Invalid output buffer".throw};
 
 		server = server ? Server.default;
         server.ifNotRunning({
@@ -30,7 +26,7 @@ FluidBufThreadDemo : UGen{
             ^nil;
         });
 
-        synth = { instance = FluidBufPitch.kr(result, time, doneAction:Done.freeSelf)}.play(server);
+        synth = { instance = FluidBufThreadDemo.kr(result, time, doneAction:Done.freeSelf)}.play(server);
 
 		forkIfNeeded{
             synth.waitForFree;