/* Test whether a basic iscntrl_l invocation works. */

#include <ctype.h>
#include <locale.h>

#include "../basic.h"

int main(void)
{
	locale_t locale = duplocale(LC_GLOBAL_LOCALE);
	if ( locale == (locale_t) 0 )
		errx(1, "duplocale");
	char c1 = '\r';
	char c2 = 'x';
	if ( !iscntrl_l(c1, locale) )
		errx(1, "iscntrl_l('%c') was not true", c1);
	if ( iscntrl_l(c2, locale) )
		errx(1, "iscntrl_l('%c') was not false", c2);
	return 0;
}