--- a/SoundStream.st Fri Aug 05 03:06:59 1994 +0200
+++ b/SoundStream.st Fri Aug 05 03:08:16 1994 +0200
@@ -20,10 +20,18 @@
SoundStream comment:'
COPYRIGHT (c) 1993 by Claus Gittinger
All Rights Reserved
+
+$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.10 1994-08-05 01:07:13 claus Exp $
'!
%{
#ifdef IRIS
+# ifndef IRIX5
+# define IRIS_AUDIO
+# endif
+#endif
+
+#ifdef IRIS_AUDIO
# include <audio.h>
# define MKAUDIO(o) (ALport)(_intVal(o))
#endif
@@ -47,7 +55,7 @@
version
"
-$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.9 1994-06-02 17:20:09 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.10 1994-08-05 01:07:13 claus Exp $
"
!
@@ -530,7 +538,7 @@
^ nil
].
%{
-#ifdef IRIS
+#ifdef IRIS_AUDIO
{
ALconfig config;
ALport p;
@@ -631,7 +639,7 @@
(at least I dont know). Use with ByteArrays only."
%{
-#ifdef IRIS
+#ifdef IRIS_AUDIO
{
ALport p;
int cnt, offs;
@@ -678,7 +686,7 @@
Use with ByteArrays only."
%{
-#ifdef IRIS
+#ifdef IRIS_AUDIO
{
ALport p;
int cnt, offs;
@@ -719,7 +727,7 @@
"wait until all sound has been played"
%{
-#ifdef IRIS
+#ifdef IRIS_AUDIO
ALport p;
if (_INST(filePointer) != nil) {
@@ -746,7 +754,7 @@
^ super closeFile
].
%{
-#ifdef IRIS
+#ifdef IRIS_AUDIO
ALcloseport(MKAUDIO(_INST(filePointer)));
#endif
%}