plays-sound hangs Emacs

[Jesper Harder]

In GNU Emacs 21.1.1 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2001-10-22 on defun.localdomain
Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: en_US
  locale-coding-system: iso-latin-1
  default-enable-multibyte-characters: t

When I evaluate this expression:

(play-sound '(sound :file 
"/usr/lib/xemacs/xemacs-packages/etc/sounds/Tuxedomoon.Jingle4.au"))

I get this backtrace:

Debugger entered--Lisp error: (error "Set sound speed: Success")
  play-sound((sound :file 
"/usr/lib/xemacs/xemacs-packages/etc/sounds/Tuxedomoon.Jingle4.au"))
  eval((play-sound (quote (sound :file 
"/usr/lib/xemacs/xemacs-packages/etc/sounds/Tuxedomoon.Jingle4.au"))))
  eval-last-sexp-1(nil)
  call-interactively(eval-last-sexp)

and after that Emacs hangs, i.e. it doesn't respond to any keystrokes
and consumes 100% cpu.

Playing the file with other sound players works fine, and playing other
sound files with Emacs also works.

I've put a copy of the file at:

<http://www.ifa.au.dk/~harder/Tuxedomoon.Jingle4.au.gz> (63 k)

-- 
Cheers,
Jesper Harder