sbase/util/estrtol.c

27 lines
417 B
C
Raw Normal View History

2011-06-10 04:46:20 +00:00
/* See LICENSE file for copyright and license details. */
#include <errno.h>
2011-06-10 04:46:20 +00:00
#include <stdio.h>
#include <stdlib.h>
2011-06-10 04:46:20 +00:00
#include "../util.h"
long
2011-06-10 13:55:01 +00:00
estrtol(const char *s, int base)
2011-06-10 04:46:20 +00:00
{
char *end;
long n;
errno = 0;
2011-06-10 04:46:20 +00:00
n = strtol(s, &end, base);
if(*end != '\0' || errno != 0) {
if(base == 0) {
2012-05-10 18:20:16 +00:00
eprintf("%s: not an integer\n", s);
} else {
2012-05-10 18:20:16 +00:00
eprintf("%s: not a base %d integer\n", s, base);
}
2011-06-10 04:46:20 +00:00
}
2011-06-10 04:46:20 +00:00
return n;
}