Mercurial > emacs
comparison src/sound.c @ 40123:e528f2adeed4
Change doc-string comments to `new style' [w/`doc:' keyword].
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Sun, 21 Oct 2001 12:13:46 +0000 |
parents | 21d7408e0d86 |
children | f7b039994118 |
comparison
equal
deleted
inserted
replaced
40122:4a487543a226 | 40123:e528f2adeed4 |
---|---|
368 return Qnil; | 368 return Qnil; |
369 } | 369 } |
370 | 370 |
371 | 371 |
372 DEFUN ("play-sound", Fplay_sound, Splay_sound, 1, 1, 0, | 372 DEFUN ("play-sound", Fplay_sound, Splay_sound, 1, 1, 0, |
373 "Play sound SOUND.\n\ | 373 doc: /* Play sound SOUND. |
374 SOUND is a list of the form `(sound KEYWORD VALUE...)'.\n\ | 374 SOUND is a list of the form `(sound KEYWORD VALUE...)'. |
375 The following keywords are recognized:\n\ | 375 The following keywords are recognized: |
376 \n\ | 376 |
377 :file FILE.- read sound data from FILE. If FILE isn't an\n\ | 377 :file FILE.- read sound data from FILE. If FILE isn't an |
378 absolute file name, it is searched in `data-directory'.\n\ | 378 absolute file name, it is searched in `data-directory'. |
379 \n\ | 379 |
380 :data DATA - read sound data from string DATA.\n\ | 380 :data DATA - read sound data from string DATA. |
381 \n\ | 381 |
382 Exactly one of :file or :data must be present.\n\ | 382 Exactly one of :file or :data must be present. |
383 \n\ | 383 |
384 :volume VOL - set volume to VOL. VOL must an integer in the\n\ | 384 :volume VOL - set volume to VOL. VOL must an integer in the |
385 range 0..100 or a float in the range 0..1.0. If not specified,\n\ | 385 range 0..100 or a float in the range 0..1.0. If not specified, |
386 don't change the volume setting of the sound device.\n\ | 386 don't change the volume setting of the sound device. |
387 \n\ | 387 |
388 :device DEVICE - play sound on DEVICE. If not specified,\n\ | 388 :device DEVICE - play sound on DEVICE. If not specified, |
389 a system-dependent default device name is used.") | 389 a system-dependent default device name is used. */) |
390 (sound) | 390 (sound) |
391 Lisp_Object sound; | 391 Lisp_Object sound; |
392 { | 392 { |
393 Lisp_Object attrs[SOUND_ATTR_SENTINEL]; | 393 Lisp_Object attrs[SOUND_ATTR_SENTINEL]; |
394 Lisp_Object file; | 394 Lisp_Object file; |
395 struct gcpro gcpro1, gcpro2; | 395 struct gcpro gcpro1, gcpro2; |