OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [testsuite/] [newlib.wctype/] [twctrans.c] - Blame information for rev 158

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 148 jeremybenn
#include <wctype.h>
2
#include <newlib.h>
3
#include "check.h"
4
 
5
int main()
6
{
7
  wctrans_t x;
8
 
9
  x = wctrans ("tolower");
10
  CHECK (x != 0);
11
  CHECK (towctrans (L'A', x) == tolower ('A'));
12
  CHECK (towctrans (L'5', x) == tolower ('5'));
13
 
14
  x = wctrans ("toupper");
15
  CHECK (x != 0);
16
  CHECK (towctrans (L'c', x) == toupper ('c'));
17
  CHECK (towctrans (L'9', x) == toupper ('9'));
18
 
19
  x = wctrans ("unknown");
20
  CHECK (x == 0);
21
 
22
  exit (0);
23
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.