S_querylocale_2008_i: Add caller's line# param

This will be helpful in debugging

embed.fnc

@@ -4423,7 +4423,8 @@ S	|bool	|bool_setlocale_2008_i					\
 				|NN const char *new_locale		\
 				|const line_t line
 S	|const char *|querylocale_2008_i				\
-				|const unsigned int index
+				|const unsigned int index		\
+				|const line_t line
 S	|const char *|setlocale_from_aggregate_LC_ALL			\
 				|NN const char *locale			\
 				|const line_t line

embed.h

@@ -1306,7 +1306,7 @@
 #       endif
 #       if defined(USE_POSIX_2008_LOCALE)
 #         define bool_setlocale_2008_i(a,b,c)   S_bool_setlocale_2008_i(aTHX_ a,b,c)
-#         define querylocale_2008_i(a)          S_querylocale_2008_i(aTHX_ a)
+#         define querylocale_2008_i(a,b)        S_querylocale_2008_i(aTHX_ a,b)
 #         define setlocale_from_aggregate_LC_ALL(a,b) S_setlocale_from_aggregate_LC_ALL(aTHX_ a,b)
 #         define use_curlocale_scratch()        S_use_curlocale_scratch(aTHX)
 #         if !defined(USE_QUERYLOCALE)

locale.c

@@ -1656,12 +1656,12 @@ S_less_dicey_bool_setlocale_r(pTHX_ const int cat, const char * locale)
 #    include <libintl.h>
 #  endif
 
-#  define querylocale_i(i)    querylocale_2008_i(i)
+#  define querylocale_i(i)    querylocale_2008_i(i, __LINE__)
 #  define querylocale_c(cat)  querylocale_i(cat##_INDEX_)
 #  define querylocale_r(cat)  querylocale_i(get_category_index(cat))
 
 STATIC const char *
-S_querylocale_2008_i(pTHX_ const unsigned int index)
+S_querylocale_2008_i(pTHX_ const unsigned int index, const line_t caller_line)
 {
     PERL_ARGS_ASSERT_QUERYLOCALE_2008_I;
     assert(index <= LC_ALL_INDEX_);