mescc: Mes C Library: Remove dead code.
authorJan Nieuwenhuizen <janneke@gnu.org>
Sun, 12 May 2019 22:18:29 +0000 (00:18 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Sun, 12 May 2019 22:18:29 +0000 (00:18 +0200)
* lib/glibc.c: Remove.
* lib/abtol.c: Remove.

lib/abtol.c [deleted file]
lib/glibc.c [deleted file]

diff --git a/lib/abtol.c b/lib/abtol.c
deleted file mode 100644 (file)
index 2fc3d60..0000000
+++ /dev/null
@@ -1,44 +0,0 @@
-/* -*-comment-start: "//";comment-end:""-*-
- * GNU Mes --- Maxwell Equations of Software
- * Copyright © 2016,2017,2018 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
- *
- * This file is part of GNU Mes.
- *
- * GNU Mes is free software; you can redistribute it and/or modify it
- * under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or (at
- * your option) any later version.
- *
- * GNU Mes is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
- */
-
-#include <mes/lib.h>
-
-long
-abtol (char const **p, int base)
-{
-  char const *s = *p;
-  long i = 0;
-  int sign = 1;
-  if (!base) base = 10;
-  if (*s && *s == '-')
-    {
-      sign = -1;
-      s++;
-    }
-  while (isnumber (*s, base))
-    {
-      i *= base;
-      long m = *s > '9' ? 'a' - 10 : '0';
-      i += *s - m;
-      s++;
-    }
-  *p = s;
-  return i * sign;
-}
diff --git a/lib/glibc.c b/lib/glibc.c
deleted file mode 100644 (file)
index 1e67bdd..0000000
+++ /dev/null
@@ -1,35 +0,0 @@
-/* -*-comment-start: "//";comment-end:""-*-
- * GNU Mes --- Maxwell Equations of Software
- * Copyright © 2018 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
- *
- * This file is part of GNU Mes.
- *
- * GNU Mes is free software; you can redistribute it and/or modify it
- * under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or (at
- * your option) any later version.
- *
- * GNU Mes is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
- */
-
-int
-__cleanup ()
-{
-  static int stub = 0;
-  if (__mes_debug () && !stub)
-    eputs ("__cleanup stub\n");
-  stub = 1;
-  return 0;
-}
-
-int
-__exit (int status)
-{
-  exit (status);
-}