home *** CD-ROM | disk | FTP | other *** search
- #ifndef NO_IDENT
- static char *Id = "$Id: alarm.c,v 1.6 1995/06/04 17:08:44 tom Exp $";
- #endif
-
- /*
- * Title: alarm.c
- * Author: Thomas E. Dickey
- * Created: 10 Sep 1984
- * Last update: 10 Sep 1984
- *
- * Function: Use VAX/VMS run-time routine to make an audible tone (BELL)
- * on the user's terminal. This is used rather than 'putchar'
- * because we wish to avoid using the VMS-C run-time support.
- */
-
- #include <descrip.h>
-
- #include "crt.h"
-
- extern void lib$put_screen(struct dsc$descriptor_s *p);
-
- void
- sound_alarm (void)
- {
- static $DESCRIPTOR(DSC_bell,"\007");
-
- lib$put_screen (&DSC_bell);
- }
-