HCoop
/
bpt
/
emacs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
use dynwind_begin and dynwind_end
[bpt/emacs.git]
/
src
/
sound.c
diff --git
a/src/sound.c
b/src/sound.c
index
ee43a92
..
ad51c73
100644
(file)
--- a/
src/sound.c
+++ b/
src/sound.c
@@
-1302,7
+1302,7
@@
Internal use only, use `play-sound' instead. */)
(Lisp_Object sound)
{
Lisp_Object attrs[SOUND_ATTR_SENTINEL];
(Lisp_Object sound)
{
Lisp_Object attrs[SOUND_ATTR_SENTINEL];
-
ptrdiff_t count = SPECPDL_INDEX
();
+
dynwind_begin
();
#ifndef WINDOWSNT
Lisp_Object file;
#ifndef WINDOWSNT
Lisp_Object file;
@@
-1412,7
+1412,7
@@
Internal use only, use `play-sound' instead. */)
#endif /* WINDOWSNT */
#endif /* WINDOWSNT */
-
unbind_to (count, Qnil
);
+
dynwind_end (
);
return Qnil;
}
\f
return Qnil;
}
\f