From 48ef7704c03e7e554c05de01bf8d1d70c16cb6f4 Mon Sep 17 00:00:00 2001 From: ProjectRevoTPP Date: Wed, 20 Dec 2017 16:34:35 -0500 Subject: add libc building to agbcc. --- libc/ctype/isdigit.c | 43 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) create mode 100644 libc/ctype/isdigit.c (limited to 'libc/ctype/isdigit.c') diff --git a/libc/ctype/isdigit.c b/libc/ctype/isdigit.c new file mode 100644 index 0000000..5c21898 --- /dev/null +++ b/libc/ctype/isdigit.c @@ -0,0 +1,43 @@ +/* +FUNCTION +<>---decimal digit predicate + +INDEX +isdigit + +ANSI_SYNOPSIS +#include +int isdigit(int <[c]>); + +TRAD_SYNOPSIS +#include +int isdigit(<[c]>); + +DESCRIPTION +<> is a macro which classifies ASCII integer values by table +lookup. It is a predicate returning non-zero for decimal digits, and 0 for +other characters. It is defined only when <>(<[c]>) is true +or <[c]> is EOF. + +You can use a compiled subroutine instead of the macro definition by +undefining the macro using `<<#undef isdigit>>'. + +RETURNS +<> returns non-zero if <[c]> is a decimal digit (<<0>>--<<9>>). + +PORTABILITY +<> is ANSI C. + +No supporting OS subroutines are required. +*/ + +#include <_ansi.h> +#include + + +#undef isdigit +int +_DEFUN(isdigit,(c),int c) +{ + return((_ctype_ + 1)[c] & _N); +} -- cgit v1.2.3