/*
FUNCTION
	<<iswupper>>---upper-case wide-character test

INDEX
	iswupper

ANSI_SYNOPSIS
	#include <wctype.h>
	int iswupper(wint_t <[c]>);

TRAD_SYNOPSIS
	#include <wctype.h>
	int iswupper(<[c]>)
	wint_t <[c]>;

DESCRIPTION
<<iswupper>> is a function which classifies wide-character values that
have an upper-case translation.

RETURNS
<<iswupper>> returns non-zero if <[c]> is a upper-case wide-character.

PORTABILITY
<<iswupper>> is C99.

No supporting OS subroutines are required.
*/
#include <_ansi.h>
#include <wctype.h>

int
_DEFUN(iswupper,(c),wint_t c)
{
  return (towlower (c) != c);
}