From 37d3d244e1a0ca7e7ac89b8e768e665adbb2e2d8 Mon Sep 17 00:00:00 2001
From: Rajalakshmi Srinivasaraghavan <raji@linux.vnet.ibm.com>
Date: Sat, 30 Jun 2018 06:54:34 +0530
Subject: [PATCH] Add long double input for strfmon test

This patch adds long double type inputs in strfmon_l test
which will help in long double migration.

Tested for powerpc64le.
---
 ChangeLog              |  4 ++++
 stdlib/tst-strfmon_l.c | 38 ++++++++++++++++++++++++++++----------
 2 files changed, 32 insertions(+), 10 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index b62394c305..8d451c81d5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2018-06-29  Rajalakshmi Srinivasaraghavan  <raji@linux.vnet.ibm.com>
+
+	* stdlib/tst-strfmon_l.c: Add tests for long double.
+
 2018-06-29  Michael Wolf  <milupo@sorbzilla.de>
 
 	[BZ #23208]
diff --git a/stdlib/tst-strfmon_l.c b/stdlib/tst-strfmon_l.c
index 1994d623eb..c43fe99256 100644
--- a/stdlib/tst-strfmon_l.c
+++ b/stdlib/tst-strfmon_l.c
@@ -70,16 +70,24 @@ static bool errors;
 
 /* Test one value using the locale loc.  */
 static void
-test_one (const char *format, double value, const char *expected)
+test_one (const char *format, double value, const char *ldformat,
+	  long double ldvalue, const char *expected)
 {
-  static char actual[64];
+  static char actual[64], actualld[64];
   int result = strfmon_l (actual, sizeof (actual), loc, format, value);
+  int res_ld = strfmon_l (actualld, sizeof (actualld), loc, ldformat, ldvalue);
   if (result < 0)
     {
       printf ("error: locale %s, format \"%s\", value %g: strfmon_l: %m\n",
               loc_name, format, value);
       errors = true;
     }
+  else if (res_ld < 0)
+    {
+      printf ("error: locale %s, format \"%s\", value %Lg: strfmon_l: %m\n",
+	      loc_name, ldformat, ldvalue);
+      errors = true;
+    }
   else if (strcmp (actual, expected) != 0)
     {
       printf ("error: locale %s, format \"%s\", value %g: mismatch\n",
@@ -88,21 +96,31 @@ test_one (const char *format, double value, const char *expected)
       printf ("error:   actual:   \"%s\"\n", actual);
       errors = true;
     }
+  else if (strcmp (actualld, expected) != 0)
+    {
+      printf ("error: locale %s, format \"%s\", value %Lg: mismatch\n",
+	      loc_name, ldformat, ldvalue);
+      printf ("error:   expected: \"%s\"\n", expected);
+      printf ("error:   actual:   \"%s\"\n", actualld);
+      errors = true;
+    }
 }
 
 static void
 test_pair (const struct testcase_pair *pair)
 {
   double positive = 1234567.89;
-  test_one ("%i", positive, pair->positive.i);
-  test_one ("%n", positive, pair->positive.n);
-  test_one ("%^i", positive, pair->positive.i_ungrouped);
-  test_one ("%^n", positive, pair->positive.n_ungrouped);
+  long double pos = 1234567.89L;
+  test_one ("%i", positive, "%Li", pos, pair->positive.i);
+  test_one ("%n", positive, "%Ln", pos, pair->positive.n);
+  test_one ("%^i", positive, "%^Li", pos, pair->positive.i_ungrouped);
+  test_one ("%^n", positive, "%^Ln", pos, pair->positive.n_ungrouped);
   double negative = -1234567.89;
-  test_one ("%i", negative, pair->negative.i);
-  test_one ("%n", negative, pair->negative.n);
-  test_one ("%^i", negative, pair->negative.i_ungrouped);
-  test_one ("%^n", negative, pair->negative.n_ungrouped);
+  long double neg = -1234567.89L;
+  test_one ("%i", negative, "%Li", neg, pair->negative.i);
+  test_one ("%n", negative, "%Ln", neg, pair->negative.n);
+  test_one ("%^i", negative, "%^Li", neg, pair->negative.i_ungrouped);
+  test_one ("%^n", negative, "%^Ln", neg, pair->negative.n_ungrouped);
 }
 
 static const struct testcase_pair en_us =