src/stdlib/wcstol.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

#include <wchar.h>
#include <stdlib.h>
#include <inttypes.h>
#include <errno.h>
#include <limits.h>

long wcstol(const wchar_t *s, wchar_t **p, int base)
{
	intmax_t x = wcstoimax(s, p, base);
	if (x > LONG_MAX) {
		errno = ERANGE;
		return LONG_MAX;
	} else if (x < LONG_MIN) {
		errno = ERANGE;
		return LONG_MIN;
	}
	return x;
}