mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-26 07:11:34 -08:00
src/sound.c: Silence some warnings.
(string_default): Move to !WINDOWSNT section. (Fplay_sound_internal) [WINDOWSNT]: Remove i_result to avoid warning.
This commit is contained in:
parent
9716fedb62
commit
983aeb9aff
2 changed files with 15 additions and 11 deletions
|
|
@ -1,3 +1,8 @@
|
|||
2013-06-19 Juanma Barranquero <lekktu@gmail.com>
|
||||
|
||||
* sound.c (string_default): Move to !WINDOWSNT section.
|
||||
(Fplay_sound_internal) [WINDOWSNT]: Remove i_result to avoid warning.
|
||||
|
||||
2013-06-19 Paul Eggert <eggert@cs.ucla.edu>
|
||||
|
||||
* sound.c: Integer cleanups.
|
||||
|
|
|
|||
21
src/sound.c
21
src/sound.c
|
|
@ -325,15 +325,6 @@ sound_warning (const char *msg)
|
|||
}
|
||||
|
||||
|
||||
/* Return S's value as a string if S is a string, otherwise DEFAULT_VALUE. */
|
||||
|
||||
static char const *
|
||||
string_default (Lisp_Object s, char const *default_value)
|
||||
{
|
||||
return STRINGP (s) ? SSDATA (s) : default_value;
|
||||
}
|
||||
|
||||
|
||||
/* Parse sound specification SOUND, and fill ATTRS with what is
|
||||
found. Value is non-zero if SOUND Is a valid sound specification.
|
||||
A valid sound specification is a list starting with the symbol
|
||||
|
|
@ -426,6 +417,15 @@ parse_sound (Lisp_Object sound, Lisp_Object *attrs)
|
|||
/* BEGIN: Non Windows functions */
|
||||
#ifndef WINDOWSNT
|
||||
|
||||
/* Return S's value as a string if S is a string, otherwise DEFAULT_VALUE. */
|
||||
|
||||
static char const *
|
||||
string_default (Lisp_Object s, char const *default_value)
|
||||
{
|
||||
return STRINGP (s) ? SSDATA (s) : default_value;
|
||||
}
|
||||
|
||||
|
||||
/* Find out the type of the sound file whose file descriptor is FD.
|
||||
S is the sound file structure to fill in. */
|
||||
|
||||
|
|
@ -1335,7 +1335,6 @@ Internal use only, use `play-sound' instead. */)
|
|||
char * psz_file = NULL;
|
||||
unsigned long ui_volume_tmp = UINT_MAX;
|
||||
unsigned long ui_volume = UINT_MAX;
|
||||
int i_result = 0;
|
||||
#endif /* WINDOWSNT */
|
||||
|
||||
/* Parse the sound specification. Give up if it is invalid. */
|
||||
|
|
@ -1430,7 +1429,7 @@ Internal use only, use `play-sound' instead. */)
|
|||
{
|
||||
ui_volume = ui_volume_tmp * (UINT_MAX / 100);
|
||||
}
|
||||
i_result = do_play_sound (psz_file, ui_volume);
|
||||
do_play_sound (psz_file, ui_volume);
|
||||
|
||||
#endif /* WINDOWSNT */
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue