msvcrt: Add _fprintf_p_l implementation.

dlls/msvcr100/msvcr100.spec

@@ -829,7 +829,7 @@
 @ cdecl _fpreset()
 @ varargs _fprintf_l(ptr str ptr)
 @ varargs _fprintf_p(ptr str)
-@ stub _fprintf_p_l
+@ varargs _fprintf_p_l(ptr str ptr)
 @ stub _fprintf_s_l
 @ cdecl _fputc_nolock(long ptr)
 @ cdecl _fputchar(long)

dlls/msvcr110/msvcr110.spec

@@ -1176,7 +1176,7 @@
 @ cdecl _fpreset()
 @ varargs _fprintf_l(ptr str ptr)
 @ varargs _fprintf_p(ptr str)
-@ stub _fprintf_p_l
+@ varargs _fprintf_p_l(ptr str ptr)
 @ stub _fprintf_s_l
 @ cdecl _fputc_nolock(long ptr)
 @ cdecl _fputchar(long)

dlls/msvcr120/msvcr120.spec

@@ -1177,7 +1177,7 @@
 @ cdecl _fpreset()
 @ varargs _fprintf_l(ptr str ptr)
 @ varargs _fprintf_p(ptr str)
-@ stub _fprintf_p_l
+@ varargs _fprintf_p_l(ptr str ptr)
 @ stub _fprintf_s_l
 @ cdecl _fputc_nolock(long ptr)
 @ cdecl _fputchar(long)

dlls/msvcr120_app/msvcr120_app.spec

@@ -1106,7 +1106,7 @@
 @ cdecl _fpreset() msvcr120._fpreset
 @ varargs _fprintf_l(ptr str ptr) msvcr120._fprintf_l
 @ varargs _fprintf_p(ptr str) msvcr120._fprintf_p
-@ stub _fprintf_p_l
+@ varargs _fprintf_p_l(ptr str ptr) msvcr120._fprintf_p_l
 @ stub _fprintf_s_l
 @ cdecl _fputc_nolock(long ptr) msvcr120._fputc_nolock
 @ cdecl _fputchar(long) msvcr120._fputchar

dlls/msvcr80/msvcr80.spec

@@ -495,7 +495,7 @@
 @ cdecl _fpreset()
 @ varargs _fprintf_l(ptr str ptr)
 @ varargs _fprintf_p(ptr str)
-@ stub _fprintf_p_l
+@ varargs _fprintf_p_l(ptr str ptr)
 @ stub _fprintf_s_l
 @ cdecl _fputc_nolock(long ptr)
 @ cdecl _fputchar(long)

dlls/msvcr90/msvcr90.spec

@@ -478,7 +478,7 @@
 @ cdecl _fpreset()
 @ varargs _fprintf_l(ptr str ptr)
 @ varargs _fprintf_p(ptr str)
-@ stub _fprintf_p_l
+@ varargs _fprintf_p_l(ptr str ptr)
 @ stub _fprintf_s_l
 @ cdecl _fputc_nolock(long ptr)
 @ cdecl _fputchar(long)

dlls/msvcrt/file.c

@@ -5609,6 +5609,19 @@ int CDECL _fprintf_p(FILE* file, const char *format, ...)
 }
 
 /*********************************************************************
+ *    _fprintf_p_l (MSVCRT.@)
+ */
+int CDECL _fprintf_p_l(FILE* file, const char *format, _locale_t locale, ...)
+{
+    va_list valist;
+    int res;
+    va_start(valist, locale);
+    res = _vfprintf_p_l(file, format, locale, valist);
+    va_end(valist);
+    return res;
+}
+
+/*********************************************************************
  *		fwprintf (MSVCRT.@)
  */
 int WINAPIV fwprintf(FILE* file, const wchar_t *format, ...)

dlls/msvcrt/msvcrt.spec

@@ -462,7 +462,7 @@
 @ cdecl _fpreset()
 @ varargs _fprintf_l(ptr str ptr)
 @ varargs _fprintf_p(ptr str)
-# stub _fprintf_p_l(ptr str ptr)
+@ varargs _fprintf_p_l(ptr str ptr)
 # stub _fprintf_s_l(ptr str ptr)
 @ cdecl _fputchar(long)
 @ cdecl _fputwchar(long)