Subversion Repositories shark

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 pj 1
/* Copyright (C) 1991, 1992 Free Software Foundation, Inc.
2
This file is part of the GNU C Library.
3
 
4
The GNU C Library is free software; you can redistribute it and/or
5
modify it under the terms of the GNU Library General Public License as
6
published by the Free Software Foundation; either version 2 of the
7
License, or (at your option) any later version.
8
 
9
The GNU C Library is distributed in the hope that it will be useful,
10
but WITHOUT ANY WARRANTY; without even the implied warranty of
11
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12
Library General Public License for more details.
13
 
14
You should have received a copy of the GNU Library General Public
15
License along with the GNU C Library; see the file COPYING.LIB.  If
16
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17
Cambridge, MA 02139, USA.  */
18
 
19
#include <ansidecl.h>
20
 
21
#define __NO_CTYPE
22
#include <ctype.h>
23
 
24
/* Provide real-function versions of all the ctype macros.  */
25
 
26
#define func(name, type) \
27
  int DEFUN(name, (c), int c) { return __isctype(c, type); }
28
 
29
func(isalnum, _ISalnum)
30
func(isalpha, _ISalpha)
31
func(iscntrl, _IScntrl)
32
func(isdigit, _ISdigit)
33
func(islower, _ISlower)
34
func(isgraph, _ISgraph)
35
func(isprint, _ISprint)
36
func(ispunct, _ISpunct)
37
func(isspace, _ISspace)
38
func(isupper, _ISupper)
39
func(isxdigit, _ISxdigit)
40
 
41
int
42
DEFUN(tolower, (c), int c)
43
{
44
  return __tolower (c);
45
}
46
 
47
int
48
DEFUN(toupper, (c), int c)
49
{
50
  return __toupper (c);
51
}