message.c

   1 /* $Id$ */
   2 /* $Name$ */
   3
   4 #include "gedcom.h"
   5
   6 int gedcom_message(char* s, ...)
   7 {
   8   int res;
   9   va_list ap;
  10
  11   va_start(ap, s);
  12   res = vfprintf(stderr, s, ap);
  13   fprintf(stderr, "\n");
  14   va_end(ap);
  15
  16   return res;
  17 }
  18
  19 int gedcom_warning(char* s, ...)
  20 {
  21   int res;
  22   va_list ap;
  23
  24   va_start(ap, s);
  25   fprintf(stderr, "Warning on line %d: ", line_no);
  26   res = vfprintf(stderr, s, ap);
  27   fprintf(stderr, "\n");
  28   va_end(ap);
  29
  30   return res;
  31 }
  32
  33 int gedcom_error(char* s, ...)
  34 {
  35   int res;
  36   va_list ap;
  37
  38   va_start(ap, s);
  39   fprintf(stderr, "Error on line %d: ", line_no);
  40   res = vfprintf(stderr, s, ap);
  41   fprintf(stderr, "\n");
  42   va_end(ap);
  43
  44   return res;
  45 }