1 /* SCCS Id: @(#)vmsmisc.c 3.4 1996/03/02 */
2 /* NetHack may be freely redistributed. See license for details. */
7 void vms_exit( /*_ int _*/ );
8 void vms_abort( /*_ void _*/ );
10 extern void exit( /*_ int _*/ );
11 extern void lib$signal( /*_ unsigned long,... _*/ );
17 exit(status ? (SS$_ABORT | STS$M_INHIB_MSG) : SS$_NORMAL);
23 lib$signal(SS$_DEBUG);