Mercurial Mercurial > hg > stx-libbasic2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Handle openErrorSignal in preparition for change openErrorSignal
authorStefan Vogel <sv@exept.de>
Sun, 02 Mar 2003 19:43:32 +0100
changeset 1154 6158d4545b71
parent 1153 4526310ffaac
child 1155 edcf3cfe1e93
Handle openErrorSignal in preparition for change openErrorSignal to be a real exception (this is currently a Notification)
SoundStream.st file | annotate | diff | comparison | revisions 
--- a/SoundStream.st	Sun Mar 02 19:40:27 2003 +0100
+++ b/SoundStream.st	Sun Mar 02 19:43:32 2003 +0100
@@ -739,10 +739,10 @@
     |inStream soundStream count totalCount buffer startTime playTime delayedTime waitTime|
 
     inStream := aFilename asFilename readStream.
-    inStream isNil ifTrue:[^ self].
+    inStream isNil ifTrue:[self error:'cannot open'].
 
     soundStream := self writing.
-    soundStream isNil ifTrue:[^ self].
+    soundStream isNil ifTrue:[self error:'cannot open sound device'].
     soundStream buffered:false.
 
     startTime := AbsoluteTime now.
@@ -2702,7 +2702,7 @@
 !SoundStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.59 2003-02-25 13:23:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.60 2003-03-02 18:43:32 stefan Exp $'
 ! !
 
 SoundStream initialize!
hg/stx-libbasic2