Mercurial > hg > xemacs-beta
comparison src/sgiplay.c @ 771:943eaba38521
[xemacs-hg @ 2002-03-13 08:51:24 by ben]
The big ben-mule-21-5 check-in!
Various files were added and deleted. See CHANGES-ben-mule.
There are still some test suite failures. No crashes, though.
Many of the failures have to do with problems in the test suite itself
rather than in the actual code. I'll be addressing these in the next
day or so -- none of the test suite failures are at all critical.
Meanwhile I'll be trying to address the biggest issues -- i.e. build
or run failures, which will almost certainly happen on various platforms.
All comments should be sent to ben@xemacs.org -- use a Cc: if necessary
when sending to mailing lists. There will be pre- and post- tags,
something like
pre-ben-mule-21-5-merge-in, and
post-ben-mule-21-5-merge-in.
author | ben |
---|---|
date | Wed, 13 Mar 2002 08:54:06 +0000 |
parents | 13e3d7ae7155 |
children | 04bc9d2f42c7 |
comparison
equal
deleted
inserted
replaced
770:336a418893b5 | 771:943eaba38521 |
---|---|
20 Boston, MA 02111-1307, USA. */ | 20 Boston, MA 02111-1307, USA. */ |
21 | 21 |
22 /* Synched up with: Not in FSF. */ | 22 /* Synched up with: Not in FSF. */ |
23 | 23 |
24 /* This file Mule-ized by Ben Wing, 5-15-01. */ | 24 /* This file Mule-ized by Ben Wing, 5-15-01. */ |
25 | |
26 #define DONT_ENCAPSULATE | |
27 | 25 |
28 #include <config.h> | 26 #include <config.h> |
29 #include "lisp.h" | 27 #include "lisp.h" |
30 | 28 |
31 #include "sound.h" | 29 #include "sound.h" |
234 ac->ac_size = bytes_read; | 232 ac->ac_size = bytes_read; |
235 } | 233 } |
236 play_internal (buffer, bytes_read, ac); | 234 play_internal (buffer, bytes_read, ac); |
237 } | 235 } |
238 drain_audio_port (ac); | 236 drain_audio_port (ac); |
239 unbind_to (count, Qnil); | 237 unbind_to (count); |
240 } | 238 } |
241 | 239 |
242 static long | 240 static long |
243 saved_device_state[] = { | 241 saved_device_state[] = { |
244 AL_OUTPUT_RATE, 0, | 242 AL_OUTPUT_RATE, 0, |
267 ac = audio_initialize (data, length, volume); | 265 ac = audio_initialize (data, length, volume); |
268 if (ac == (AudioContext) 0) | 266 if (ac == (AudioContext) 0) |
269 return 0; | 267 return 0; |
270 result = play_internal (data, length, ac); | 268 result = play_internal (data, length, ac); |
271 drain_audio_port (ac); | 269 drain_audio_port (ac); |
272 unbind_to (count, Qnil); | 270 unbind_to (count); |
273 return result; | 271 return result; |
274 } | 272 } |
275 | 273 |
276 static AudioContext | 274 static AudioContext |
277 audio_initialize (UChar_Binary *data, int length, int volume) | 275 audio_initialize (UChar_Binary *data, int length, int volume) |