1 files changed, 63 insertions, 0 deletions
diff --git a/private/crt32/mbstring/ismbupr.c b/private/crt32/mbstring/ismbupr.c
new file mode 100644
index 000000000..3286754d0
--- /dev/null
+++ b/private/crt32/mbstring/ismbupr.c
@@ -0,0 +1,63 @@
+/*** 
+*ismbupr - Test if character is upper case (MBCS)
+*
+*	Copyright (c) 1985-1992, Microsoft Corporation.  All rights reserved.
+*
+*Purpose:
+*	Test if character is upper case (MBCS)
+*
+*Revision History:
+*	11-19-92  KRS	Ported from 16-bit sources.
+*
+*******************************************************************************/
+
+#ifdef _MBCS
+#include <cruntime.h>
+#include <ctype.h>
+#include <mbdata.h>
+#include <mbctype.h>
+#include <mbstring.h>
+
+
+/*** 
+* _ismbcupper - Test if character is upper case (MBCS)
+*
+*Purpose:
+*	Test if the supplied character is upper case or not.
+*	Handles MBCS characters correctly.
+*
+*	Note:  Use test against 0x00FF instead of _ISLEADBYTE
+*	to ensure that we don't call SBCS routine with a two-byte
+*	value.
+*
+*Entry:
+*	unsigned int c = character to test
+*
+*Exit:
+*	Returns TRUE if c is an upper case character; else FALSE
+*
+*Exceptions:
+*
+*******************************************************************************/
+
+int _CRTAPI1 _ismbcupper(c)
+unsigned int c;
+{
+
+	if (c > 0x00FF)
+
+#ifdef _MBCS_OS
+		return (0);
+#else
+		{
+		if (_mbascii)
+			return ((c >= _MBUPPERLOW) && (c <= _MBUPPERHIGH));
+		else
+			return (0);
+		}
+#endif
+
+	else
+		return (isupper(c));
+}
+#endif	/* _MBCS */