mescc: Refactor debug and stub printing.
[mes.git] / lib / libc.c
index 62c31ad3be27ae6da7c850bc7fe8a48a17ad4880..99b28e30c4b9703251644b28be43b740cfd64959 100644 (file)
@@ -49,6 +49,20 @@ int g_stdin = 0;
 
 void _env ();
 
+#define MAX(a, b) (((a) > (b)) ? (a) : (b))
+
+int
+__mes_debug ()
+{
+  static int __mes_debug = -1;
+  if (__mes_debug == -1)
+    {
+      char *p = getenv ("MES_DEBUG");
+      __mes_debug = p ? MAX (itoa (p), 1) : 0;
+    }
+  return __mes_debug;
+}
+
 int
 getchar ()
 {