void os_fatal (const char *s)
{
if (h_interpreter_number)
os_reset_screen ();
/* Display error message */
fputs ("\nFatal error: ", stderr);
fputs (s, stderr);
fputs ("\n", stderr);
/* Abort program */
exit (EXIT_FAILURE);
}/* os_fatal */
void os_fatal (const char *s)
{
if (u_setup.curses_active) {
os_display_string((zchar *)"\n\n");
os_beep(BEEP_HIGH);
os_set_text_style(BOLDFACE_STYLE);
os_display_string((zchar *)"Fatal error: ");
os_set_text_style(0);
os_display_string((zchar *)s);
os_display_string((zchar *)"\n");
new_line();
os_reset_screen();
exit(1);
}
fputs ("\nFatal error: ", stderr);
fputs (s, stderr);
fputs ("\n\n", stderr);
exit (1);
}/* os_fatal */
void os_fatal (const char *s, ...)
{
if (u_setup.curses_active) {
/* Solaris 2.6's cc complains if the below cast is missing */
os_display_string((zchar *)"\n\n");
os_beep(BEEP_HIGH);
os_set_text_style(BOLDFACE_STYLE);
os_display_string((zchar *)"Fatal error: ");
os_set_text_style(0);
os_display_string((zchar *)s);
os_display_string((zchar *)"\n");
new_line();
os_reset_screen();
exit(1);
}
fputs ("\nFatal error: ", stderr);
fputs (s, stderr);
fputs ("\n\n", stderr);
exit (1);
}/* os_fatal */
int cdecl frotz_main (void)
{
os_init_setup ();
init_buffer ();
init_err ();
init_memory ();
init_process ();
init_sound ();
os_init_screen ();
init_undo ();
z_restart ();
interpret ();
script_close ();
record_close ();
replay_close ();
reset_memory ();
os_reset_screen ();
return 0;
}/* main */
