RISC-V: Support assembler modifier %got_pcrel_hi.

[deliverable/binutils-gdb.git] / gas / config / atof-ieee.c

diff --git a/gas/config/atof-ieee.c b/gas/config/atof-ieee.c
index 944c8a46ff486ddc4cedc7fe4679b2e1d862a5f5..2e0f2a9af47064a059656880a0003ec27bc794cb 100644 (file)
--- a/gas/config/atof-ieee.c
+++ b/gas/config/atof-ieee.c
@@ -1,5 +1,5 @@
 /* atof_ieee.c - turn a Flonum into an IEEE floating point number
-   Copyright (C) 1987-2019 Free Software Foundation, Inc.
+   Copyright (C) 1987-2020 Free Software Foundation, Inc.
 
    This file is part of GAS, the GNU Assembler.
 
@@ -146,29 +146,30 @@ make_invalid_floating_point_number (LITTLENUM_TYPE *words)
   words[4] = (LITTLENUM_TYPE) -1;
   words[5] = (LITTLENUM_TYPE) -1;
 }
-\f
-/* Warning: This returns 16-bit LITTLENUMs.  It is up to the caller to
-   figure out any alignment problems and to conspire for the
-   bytes/word to be emitted in the right order.  Bigendians beware!  */
 
-/* Note that atof-ieee always has X and P precisions enabled.  it is up
-   to md_atof to filter them out if the target machine does not support
-   them.  */
+/* Build a floating point constant at str into a IEEE floating
+   point number.  This function does the same thing as atof_ieee
+   however it allows more control over the exact format, i.e.
+   explicitly specifying the precision and number of exponent bits
+   instead of relying on this infomation being deduced from a given type.
 
-/* Returns pointer past text consumed.  */
+   If generic_float_info is not NULL then it will be set to contain generic
+   infomation about the parsed floating point number.
 
+   Returns pointer past text consumed. */
 char *
-atof_ieee (char *str,                  /* Text to convert to binary.  */
-          int what_kind,               /* 'd', 'f', 'x', 'p'.  */
-          LITTLENUM_TYPE *words)       /* Build the binary here.  */
+atof_ieee_detail (char * str,
+                 int precision,
+                 int exponent_bits,
+                 LITTLENUM_TYPE * words,
+                 FLONUM_TYPE * generic_float_info)
 {
   /* Extra bits for zeroed low-order bits.
      The 1st MAX_PRECISION are zeroed, the last contain flonum bits.  */
   static LITTLENUM_TYPE bits[MAX_PRECISION + MAX_PRECISION + GUARD];
   char *return_value;
+
   /* Number of 16-bit words in the format.  */
-  int precision;
-  long exponent_bits;
   FLONUM_TYPE save_gen_flonum;
 
   /* We have to save the generic_floating_point_number because it
@@ -189,6 +190,45 @@ atof_ieee (char *str,                      /* Text to convert to binary.  */
 
   memset (bits, '\0', sizeof (LITTLENUM_TYPE) * MAX_PRECISION);
 
+  generic_floating_point_number.high
+    = generic_floating_point_number.low + precision - 1 + GUARD;
+
+  if (atof_generic (&return_value, ".", EXP_CHARS,
+                   &generic_floating_point_number))
+    {
+      make_invalid_floating_point_number (words);
+      return NULL;
+    }
+
+  if (generic_float_info)
+    *generic_float_info = generic_floating_point_number;
+
+  gen_to_words (words, precision, exponent_bits);
+
+  /* Restore the generic_floating_point_number's storage alloc (and
+     everything else).  */
+  generic_floating_point_number = save_gen_flonum;
+
+  return return_value;
+}
+
+/* Warning: This returns 16-bit LITTLENUMs.  It is up to the caller to
+   figure out any alignment problems and to conspire for the
+   bytes/word to be emitted in the right order.  Bigendians beware!  */
+
+/* Note that atof-ieee always has X and P precisions enabled.  it is up
+   to md_atof to filter them out if the target machine does not support
+   them.  */
+
+/* Returns pointer past text consumed.  */
+char *
+atof_ieee (char *str,                  /* Text to convert to binary.  */
+          int what_kind,               /* 'd', 'f', 'x', 'p'.  */
+          LITTLENUM_TYPE *words)       /* Build the binary here.  */
+{
+  int precision;
+  long exponent_bits;
+
   switch (what_kind)
     {
     case 'h':
@@ -232,22 +272,7 @@ atof_ieee (char *str,                      /* Text to convert to binary.  */
       return (NULL);
     }
 
-  generic_floating_point_number.high
-    = generic_floating_point_number.low + precision - 1 + GUARD;
-
-  if (atof_generic (&return_value, ".", EXP_CHARS,
-                   &generic_floating_point_number))
-    {
-      make_invalid_floating_point_number (words);
-      return NULL;
-    }
-  gen_to_words (words, precision, exponent_bits);
-
-  /* Restore the generic_floating_point_number's storage alloc (and
-     everything else).  */
-  generic_floating_point_number = save_gen_flonum;
-
-  return return_value;
+  return atof_ieee_detail (str, precision, exponent_bits, words, NULL);
 }
 
 /* Turn generic_floating_point_number into a real float/double/extended.  */