Mercurial > hg > xemacs-beta

comparison src/sound.c @ 2286:04bc9d2f42c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-20 19:18:55 by james] Mark all unused parameters as unused. Also eliminate some unneeded local variables.
author james
date Mon, 20 Sep 2004 19:20:08 +0000
parents 01c57eb70ae9
children d5131a81147e
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
491 } 491 }
492 492
493 DEFUN ("wait-for-sounds", Fwait_for_sounds, 0, 1, 0, /* 493 DEFUN ("wait-for-sounds", Fwait_for_sounds, 0, 1, 0, /*
494 Wait for all sounds to finish playing on DEVICE. 494 Wait for all sounds to finish playing on DEVICE.
495 */ 495 */
496 (device)) 496 (
497 497 #ifdef HAVE_NAS_SOUND
498 device
499 #else
500 UNUSED (device)
501 #endif
502 ))
498 { 503 {
499 #ifdef HAVE_NAS_SOUND 504 #ifdef HAVE_NAS_SOUND
500 struct device *d = decode_device (device); 505 struct device *d = decode_device (device);
501 if (DEVICE_CONNECTED_TO_NAS_P (d)) 506 if (DEVICE_CONNECTED_TO_NAS_P (d))
502 { 507 {
508 } 513 }
509 514
510 DEFUN ("connected-to-nas-p", Fconnected_to_nas_p, 0, 1, 0, /* 515 DEFUN ("connected-to-nas-p", Fconnected_to_nas_p, 0, 1, 0, /*
511 Return t if connected to NAS server for sounds on DEVICE. 516 Return t if connected to NAS server for sounds on DEVICE.
512 */ 517 */
513 (device)) 518 (
519 #ifdef HAVE_NAS_SOUND
520 device
521 #else
522 UNUSED (device)
523 #endif
524 ))
514 { 525 {
515 #ifdef HAVE_NAS_SOUND 526 #ifdef HAVE_NAS_SOUND
516 return DEVICE_CONNECTED_TO_NAS_P (decode_device (device)) ? Qt : Qnil; 527 return DEVICE_CONNECTED_TO_NAS_P (decode_device (device)) ? Qt : Qnil;
517 #else 528 #else
518 return Qnil; 529 return Qnil;