msvcrt: Add _ismbcl1_l().

dlls/api-ms-win-crt-multibyte-l1-1-0/api-ms-win-crt-multibyte-l1-1-0.spec

@@ -41,7 +41,7 @@
 @ cdecl _ismbcl0(long) ucrtbase._ismbcl0
 @ cdecl _ismbcl0_l(long ptr) ucrtbase._ismbcl0_l
 @ cdecl _ismbcl1(long) ucrtbase._ismbcl1
-@ stub _ismbcl1_l
+@ cdecl _ismbcl1_l(long ptr) ucrtbase._ismbcl1_l
 @ cdecl _ismbcl2(long) ucrtbase._ismbcl2
 @ stub _ismbcl2_l
 @ cdecl _ismbclegal(long) ucrtbase._ismbclegal

dlls/msvcr100/msvcr100.spec

@@ -989,7 +989,7 @@
 @ cdecl _ismbcl0(long)
 @ cdecl _ismbcl0_l(long ptr)
 @ stub _ismbcl1(long)
-@ stub _ismbcl1_l
+@ cdecl _ismbcl1_l(long ptr)
 @ stub _ismbcl2(long)
 @ stub _ismbcl2_l
 @ cdecl _ismbclegal(long)

dlls/msvcr110/msvcr110.spec

@@ -1335,7 +1335,7 @@
 @ cdecl _ismbcl0(long)
 @ cdecl _ismbcl0_l(long ptr)
 @ stub _ismbcl1(long)
-@ stub _ismbcl1_l
+@ cdecl _ismbcl1_l(long ptr)
 @ stub _ismbcl2(long)
 @ stub _ismbcl2_l
 @ cdecl _ismbclegal(long)

dlls/msvcr120/msvcr120.spec

@@ -1340,7 +1340,7 @@
 @ cdecl _ismbcl0(long)
 @ cdecl _ismbcl0_l(long ptr)
 @ stub _ismbcl1(long)
-@ stub _ismbcl1_l
+@ cdecl _ismbcl1_l(long ptr)
 @ stub _ismbcl2(long)
 @ stub _ismbcl2_l
 @ cdecl _ismbclegal(long)

dlls/msvcr80/msvcr80.spec

@@ -661,7 +661,7 @@
 @ cdecl _ismbcl0(long)
 @ cdecl _ismbcl0_l(long ptr)
 @ stub _ismbcl1(long)
-@ stub _ismbcl1_l
+@ cdecl _ismbcl1_l(long ptr)
 @ stub _ismbcl2(long)
 @ stub _ismbcl2_l
 @ cdecl _ismbclegal(long)

dlls/msvcr90/msvcr90.spec

@@ -639,7 +639,7 @@
 @ cdecl _ismbcl0(long)
 @ cdecl _ismbcl0_l(long ptr)
 @ stub _ismbcl1(long)
-@ stub _ismbcl1_l
+@ cdecl _ismbcl1_l(long ptr)
 @ stub _ismbcl2(long)
 @ stub _ismbcl2_l
 @ cdecl _ismbclegal(long)

dlls/msvcrt/mbcs.c

@@ -2579,3 +2579,24 @@ int CDECL _ismbcl0(unsigned int c)
 {
     return _ismbcl0_l(c, NULL);
 }
+
+/*********************************************************************
+ *		_ismbcl1_l (MSVCRT.@)
+ */
+int CDECL _ismbcl1_l(unsigned int c, MSVCRT__locale_t locale)
+{
+    MSVCRT_pthreadmbcinfo mbcinfo;
+
+    if(!locale)
+        mbcinfo = get_mbcinfo();
+    else
+        mbcinfo = locale->mbcinfo;
+
+    if(mbcinfo->mbcodepage == 932)
+    {
+        /* JIS level-1 */
+        return _ismbclegal(c) && c >= 0x889f && c <= 0x9872;
+    }
+
+    return 0;
+}

dlls/msvcrt/msvcrt.spec

@@ -610,7 +610,7 @@
 @ cdecl _ismbcl0(long)
 @ cdecl _ismbcl0_l(long ptr)
 @ stub _ismbcl1(long)
-# stub _ismbcl1_l(long ptr)
+@ cdecl _ismbcl1_l(long ptr)
 @ stub _ismbcl2(long)
 # stub _ismbcl2_l(long ptr)
 @ cdecl _ismbclegal(long)

dlls/ucrtbase/ucrtbase.spec

@@ -479,7 +479,7 @@
 @ cdecl _ismbcl0(long)
 @ cdecl _ismbcl0_l(long ptr)
 @ stub _ismbcl1(long)
-@ stub _ismbcl1_l
+@ cdecl _ismbcl1_l(long ptr)
 @ stub _ismbcl2(long)
 @ stub _ismbcl2_l
 @ cdecl _ismbclegal(long)