mescc: Mes C Library: Support GNU Awk: Implement atof.
* lib/stdlib/atoi.c: Update. * lib/stdlib/atof.c: Rename from stub/atof.c; Implement. * lib/libc+gnu.c: Update include. * lib/libg.c: Update include.
This commit is contained in:
parent
a2fbf3de11
commit
73fb77c191
|
@ -31,7 +31,7 @@
|
||||||
// m4
|
// m4
|
||||||
#include <stdlib/abort.c>
|
#include <stdlib/abort.c>
|
||||||
#include <stdlib/atol.c>
|
#include <stdlib/atol.c>
|
||||||
#include <stub/atof.c>
|
#include <stdlib/atof.c>
|
||||||
#include <string/bcmp.c>
|
#include <string/bcmp.c>
|
||||||
#include <string/bcopy.c>
|
#include <string/bcopy.c>
|
||||||
#include <string/bzero.c>
|
#include <string/bzero.c>
|
||||||
|
|
|
@ -48,7 +48,7 @@
|
||||||
|
|
||||||
// m4
|
// m4
|
||||||
#include <stdlib/abort.c>
|
#include <stdlib/abort.c>
|
||||||
#include <stub/atof.c>
|
#include <stdlib/atof.c>
|
||||||
#include <string/bcmp.c>
|
#include <string/bcmp.c>
|
||||||
#include <string/bcopy.c>
|
#include <string/bcopy.c>
|
||||||
#include <string/bzero.c>
|
#include <string/bzero.c>
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
/* -*-comment-start: "//";comment-end:""-*-
|
/* -*-comment-start: "//";comment-end:""-*-
|
||||||
* GNU Mes --- Maxwell Equations of Software
|
* GNU Mes --- Maxwell Equations of Software
|
||||||
* Copyright © 2018 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
* Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
||||||
*
|
*
|
||||||
* This file is part of GNU Mes.
|
* This file is part of GNU Mes.
|
||||||
*
|
*
|
||||||
|
@ -20,12 +20,9 @@
|
||||||
|
|
||||||
#include <libmes.h>
|
#include <libmes.h>
|
||||||
|
|
||||||
int
|
double
|
||||||
atof (int x)
|
atof (char const* string)
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
char const *p = string;
|
||||||
if (__mes_debug () && !stub)
|
return abtod (&p, 0);
|
||||||
eputs ("atof stub\n");
|
|
||||||
stub = 1;
|
|
||||||
return 0;
|
|
||||||
}
|
}
|
|
@ -1,6 +1,6 @@
|
||||||
/* -*-comment-start: "//";comment-end:""-*-
|
/* -*-comment-start: "//";comment-end:""-*-
|
||||||
* GNU Mes --- Maxwell Equations of Software
|
* GNU Mes --- Maxwell Equations of Software
|
||||||
* Copyright © 2016,2017,2018 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
* Copyright © 2016,2017,2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
||||||
*
|
*
|
||||||
* This file is part of GNU Mes.
|
* This file is part of GNU Mes.
|
||||||
*
|
*
|
||||||
|
@ -21,8 +21,8 @@
|
||||||
#include <libmes.h>
|
#include <libmes.h>
|
||||||
|
|
||||||
int
|
int
|
||||||
atoi (char const *s)
|
atoi (char const *string)
|
||||||
{
|
{
|
||||||
char const *p = s;
|
char const *p = string;
|
||||||
return abtol (&p, 0);
|
return abtol (&p, 0);
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue