mescc: Refactor debug and stub printing.
[mes.git] / lib / libg.c
1 /* -*-comment-start: "//";comment-end:""-*-
2  * Mes --- Maxwell Equations of Software
3  * Copyright © 2018 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
4  *
5  * This file is part of Mes.
6  *
7  * Mes is free software; you can redistribute it and/or modify it
8  * under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or (at
10  * your option) any later version.
11  *
12  * Mes is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with Mes.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 // gcc/xgcc wants -lg with all these
22 // what's the story here?
23
24 #include <sys/time.h>
25
26 #define exit __exit
27 #define fprintf _fprintf
28 #define longjmp _longjmp
29 #define malloc _malloc
30 #define printf _printf
31 #define putchar _putchar
32 #define puts _puts
33 #define setjmp _setjmp
34 #define signal _signal
35 #define strcmp _strcmp
36 #define sprintf _sprintf
37 #define sscanf _sscanf
38
39 #include <libc+tcc.c>
40 #include <linux+gnu.c>
41 #include <m4.c>
42 #include <binutils.c>
43 #include <gcc.c>
44
45 int
46 __cleanup ()
47 {
48   static int stub = 0;
49   if (__mes_debug () && !stub)
50     eputs ("__cleanup stub\n");
51   stub = 1;
52   return 0;
53 }
54
55 int
56 __libc_subinit ()
57 {
58   static int stub = 0;
59   if (__mes_debug () && !stub)
60     eputs ("__libc_subinit stub\n");
61   stub = 1;
62   return 0;
63 }
64
65 int
66 __syscall_error ()
67 {
68   static int stub = 0;
69   if (__mes_debug () && !stub)
70     eputs ("__syscall_error stub\n");
71   stub = 1;
72   return 0;
73 }
74
75 int
76 __fpu_control ()
77 {
78   static int stub = 0;
79   if (__mes_debug () && !stub)
80     eputs ("__fpu_control stub\n");
81   stub = 1;
82   return 0;
83 }