--- a/SoundStream.st Tue Feb 11 10:09:12 2020 +0100
+++ b/SoundStream.st Thu Feb 13 22:38:13 2020 +0100
@@ -16,54 +16,54 @@
"{ NameSpace: Smalltalk }"
FileStream subclass:#SoundStream
- instanceVariableNames:'sampleRate numberOfChannels bitsPerSample audioFormat handle1
- handle2 bufferOffset bufferSize lastErrorString fragmentSize
- openMode openAttributes'
- classVariableNames:'IsInitialized UnsupportedOperationSignal ConcreteClass'
- poolDictionaries:''
- category:'Streams-External'
+ instanceVariableNames:'sampleRate numberOfChannels bitsPerSample audioFormat handle1
+ handle2 bufferOffset bufferSize lastErrorString fragmentSize
+ openMode openAttributes'
+ classVariableNames:'IsInitialized UnsupportedOperationSignal ConcreteClass'
+ poolDictionaries:''
+ category:'Streams-External'
!
SoundStream subclass:#DevAudio
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- privateIn:SoundStream
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:SoundStream
!
SoundStream subclass:#IRISAudio
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- privateIn:SoundStream
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:SoundStream
!
SoundStream subclass:#JackAudio
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- privateIn:SoundStream
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:SoundStream
!
SoundStream subclass:#PortAudio
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- privateIn:SoundStream
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:SoundStream
!
SoundStream subclass:#Win32DirectSound
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- privateIn:SoundStream
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:SoundStream
!
SoundStream subclass:#Win32WaveSound
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- privateIn:SoundStream
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:SoundStream
!
!SoundStream primitiveDefinitions!
@@ -635,6 +635,12 @@
[author:]
Claus Gittinger
+
+ [caveat:]
+ this class was written in the early 90's to experiment with a cheap soundblaster board,
+ to provide output for a modular synth at that time.
+ It is not supported or to be taken serious...
+ Actually, it seems to be broken.
"
! !