apps/plugins/lua/strtol.c at master · tsiry-sandratraina.com/rockbox-zig

A modern Music Player Daemon based on Rockbox open source high quality audio player

libadwaita audio rust zig deno mpris rockbox mpd

rockbox-zig / apps / plugins / lua / strtol.c

at master 27 lines 631 B view raw

 1#include "rocklibc.h"
 2
 3extern unsigned long int strtoul(const char *ptr, char **endptr, int base);
 4
 5#define ABS_LONG_MIN LONG_MAX
 6long int strtol(const char *nptr, char **endptr, int base)
 7{
 8  int neg=0;
 9  unsigned long int v;
10  const char*orig=nptr;
11
12  while(__unlikely(isspace(*nptr))) nptr++;
13
14  if (*nptr == '-' && isalnum(nptr[1])) { neg=-1; ++nptr; }
15  v=strtoul(nptr,endptr,base);
16  if (endptr && *endptr==nptr) *endptr=(char *)orig;
17  if (__unlikely(v>=ABS_LONG_MIN)) {
18    if (v==ABS_LONG_MIN && neg) {
19      errno=0;
20      return v;
21    }
22    errno=ERANGE;
23    return (neg?LONG_MIN:LONG_MAX);
24  }
25  return (neg?-v:v);
26}
27