Libc-262.tar.gz

[apple/libc.git] / internat / NXIsDigit.c

diff --git a/internat/NXIsDigit.c b/internat/NXIsDigit.c
new file mode 100644 (file)
index 0000000..1ead0b3
--- /dev/null
+++ b/internat/NXIsDigit.c
@@ -0,0 +1,36 @@
+/*
+ * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
+ *
+ * @APPLE_LICENSE_HEADER_START@
+ * 
+ * The contents of this file constitute Original Code as defined in and
+ * are subject to the Apple Public Source License Version 1.1 (the
+ * "License").  You may not use this file except in compliance with the
+ * License.  Please obtain a copy of the License at
+ * http://www.apple.com/publicsource and read it before using this file.
+ * 
+ * This Original Code and all software distributed under the License are
+ * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+ * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
+ * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
+ * License for the specific language governing rights and limitations
+ * under the License.
+ * 
+ * @APPLE_LICENSE_HEADER_END@
+ */
+/*
+ * Copyright 1990, NeXT, Inc.
+ */
+
+#include "NXCType.h"
+#define FIXSIGNEDCHAR(i) if ((i & 0xFFFFFF80) == 0xFFFFFF80) i &= 0x000000FF
+
+int NXIsDigit(c)
+       unsigned int c;
+{
+       FIXSIGNEDCHAR(c);
+       if (c < 256)
+               return ((unsigned int)((_NX_CTypeTable_ + 1)[c] & (_D)));
+       return 0;
+}