Mercurial > hg > xemacs-beta
diff src/hpplay.c @ 272:c5d627a313b1 r21-0b34
Import from CVS: tag r21-0b34
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:28:48 +0200 |
parents | 6a378aca36af |
children | ca9a9ec9c1c1 |
line wrap: on
line diff
--- a/src/hpplay.c Mon Aug 13 10:27:41 2007 +0200 +++ b/src/hpplay.c Mon Aug 13 10:28:48 2007 +0200 @@ -36,7 +36,7 @@ directory of the audio software delivered on our machines. The path I found it under was /usr/audio/examples/player.c This file contained no credits and no copyrights. The original fileheader - is given below. + is given below. HISTORY lynbech - Feb 10, 1993: Created. ***/ @@ -48,9 +48,11 @@ * (well, only two are unsung) */ +#include <config.h> +#include "lisp.h" + #include <stdlib.h> #include <stdio.h> -#include <config.h> /* to get system rev level. */ #ifdef HPUX10 #include <Alib.h> #include <CUlib.h> @@ -59,10 +61,6 @@ #include <audio/CUlib.h> #endif /* !HPUX 10 */ -/* New Symbols */ -#include <config.h> -#include "lisp.h" - Lisp_Object Vhp_play_server; Lisp_Object Vhp_play_speaker; int play_gain; @@ -113,7 +111,7 @@ if (SYMBOLP (Vhp_play_speaker)) { speaker = (char *) (string_data (XSYMBOL (Vhp_play_speaker)->name)); - + /* * setup the playback parameters */ @@ -153,7 +151,7 @@ xid = APlaySBucket( audio, pSBucket, &playParams, NULL ); /* - * set close mode to prevent playback from stopping + * set close mode to prevent playback from stopping * when we close audio connection */ ASetCloseDownMode( audio, AKeepTransactions, &status ); @@ -291,6 +289,6 @@ void init_hpplay (void) { - if (getenv ("SPEAKER")) + if (getenv ("SPEAKER")) Vhp_play_speaker = intern (getenv ("SPEAKER")); }