libc/newlib/libc/ctype/isupper_l.c

#include <_ansi.h>
#include <ctype.h>

#undef isupper_l

int
isupper_l (int c, struct __locale_t *locale)
{
  return (__locale_ctype_ptr_l (locale)[c+1] & (_U|_L)) == _U;
}