git.sur5r.net Git - cc65/blob - libsrc/geos-cbm/common/perror.c

   1 /*
   2  * perror.c
   3  *
   4  * Maciej 'YTM/Elysium' Witkowiak, 15.07.2001
   5  */
   6
   7 #include <stdio.h>
   8 #include <string.h>
   9 #include <errno.h>
  10 #include <geos.h>
  11
  12 void __fastcall__ perror(const char* msg)
  13 {
  14     const char *errmsg = strerror(errno);
  15
  16     ExitTurbo();
  17     if (msg && *msg) {
  18         DlgBoxOk(msg, errmsg);
  19     } else {
  20         DlgBoxOk("", errmsg);
  21     }
  22 }