*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 03 Jan 2020 22:26:09 +0100
changeset 5411 67e5d96c2f7a
parent 5410 24114a427d3d
child 5412 661f897f6228
*** empty log message ***
SoundStream.st
--- a/SoundStream.st	Fri Jan 03 22:23:55 2020 +0100
+++ b/SoundStream.st	Fri Jan 03 22:26:09 2020 +0100
@@ -479,6 +479,12 @@
 
 !SoundStream class methodsFor:'initialization'!
 
+debug:aBoolean
+%{
+    DEBUGGING = (aBoolean == true);
+%}
+!
+
 initialize
     UnsupportedOperationSignal isNil ifTrue:[
 	UnsupportedOperationSignal := StreamError newSignalMayProceed:true.