Salvador Abreu / PaCCS

Blame view

src/util.c 703 Bytes
Edit Raw Normal View History
965dadaa   Salvador Abreu   initial commit fr... 
1
2
3
4
 
#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>
eef94371   Vasco Pedro   Update to PaCCS v... 
5
6
7
 
void _fd_fatal(char *msg)
{
  fprintf(stderr, "%s\n", msg);
965dadaa   Salvador Abreu   initial commit fr... 
8
9
10
11
12
 
  abort(); // XXX
}

void _fd_error(char *format, ...)
{
eef94371   Vasco Pedro   Update to PaCCS v... 
13
 
  va_list args;
965dadaa   Salvador Abreu   initial commit fr... 
14
15
16
17
18
19
20
21
 

  va_start (args, format);
  vfprintf(stderr, format, args);
  va_end (args);
}

void _fd_output(char *format, ...)
{
eef94371   Vasco Pedro   Update to PaCCS v... 
22
 
  va_list args;
965dadaa   Salvador Abreu   initial commit fr... 
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
 

  va_start (args, format);
  vfprintf(stdout, format, args);
  va_end (args);
}

void fd__info(char *format, ...)
{
  va_list args;

  va_start (args, format);
  vfprintf(stderr, format, args);
  va_end (args);
}

#ifndef _fd_debug
eef94371   Vasco Pedro   Update to PaCCS v... 
40
 
void _fd_debug(char *format, ...)
965dadaa   Salvador Abreu   initial commit fr... 
41
 
{
eef94371   Vasco Pedro   Update to PaCCS v... 
42
 
  va_list args;
965dadaa   Salvador Abreu   initial commit fr... 
43
44
45
46
47
48
49
 

  va_start (args, format);
  vfprintf(stderr, format, args);
  va_end (args);
}

#endif