arch/carbon/gui.c

   1 /*
   2  *  gui.c
   3  *  D2X (Descent2)
   4  *
   5  *  Created by Chris Taylor on Sat Jul 03 2004.
   6  *
   7  */
   8
   9 #ifdef HAVE_CONFIG_H
  10 #include "conf.h"
  11 #endif
  12
  13 #ifdef __APPLE__
  14 #include <Carbon/Carbon.h>
  15 #else
  16 #include <Carbon.h>
  17 #endif
  18
  19 void ErrorDialog(char *message)
  20 {
  21     Str255 pascal_message;
  22     short itemHit;      // Insists on returning this
  23
  24     CopyCStringToPascal(message, pascal_message);
  25     ShowCursor();
  26     StandardAlert(kAlertStopAlert, pascal_message, NULL, 0, &itemHit);
  27 }
  28
  29 void WarningDialog(char *s)
  30 {
  31     Str255 pascal_message;
  32     short itemHit;      // Insists on returning this
  33
  34     CopyCStringToPascal(s, pascal_message);
  35     ShowCursor();
  36     StandardAlert(kAlertCautionAlert, pascal_message, NULL, 0, &itemHit);
  37     HideCursor();
  38 }