MIPS/GAS: Relax branches to symbols resolved at link time
[deliverable/binutils-gdb.git] / gas / config / atof-vax.c
index 75756904fb89e846dc9850bb653f10946b4ededc..8ca80b0ef8f6fff843174580b0b679f0153cae7f 100644 (file)
@@ -1,12 +1,11 @@
 /* atof_vax.c - turn a Flonum into a VAX floating point number
 /* atof_vax.c - turn a Flonum into a VAX floating point number
-   Copyright 1987, 1992, 1993, 1995, 1997, 1999, 2000, 2005
-   Free Software Foundation, Inc.
+   Copyright (C) 1987-2016 Free Software Foundation, Inc.
 
    This file is part of GAS, the GNU Assembler.
 
    GAS is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
 
    This file is part of GAS, the GNU Assembler.
 
    GAS is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
-   the Free Software Foundation; either version 2, or (at your option)
+   the Free Software Foundation; either version 3, or (at your option)
    any later version.
 
    GAS is distributed in the hope that it will be useful,
    any later version.
 
    GAS is distributed in the hope that it will be useful,
@@ -35,7 +34,7 @@ int flonum_gen2vax (int, FLONUM_TYPE *, LITTLENUM_TYPE *);
 
 /* Number of chars in flonum type 'letter'.  */
 
 
 /* Number of chars in flonum type 'letter'.  */
 
-static int
+static unsigned int
 atof_vax_sizeof (int letter)
 {
   int return_value;
 atof_vax_sizeof (int letter)
 {
   int return_value;
@@ -295,7 +294,7 @@ flonum_gen2vax (int format_letter,  /* One of 'd' 'f' 'g' 'h'.  */
          /* Seek (and forget) 1st significant bit.  */
          for (exponent_skippage = 0;
               !next_bits (1);
          /* Seek (and forget) 1st significant bit.  */
          for (exponent_skippage = 0;
               !next_bits (1);
-              exponent_skippage++);;
+              exponent_skippage++);
 
          exponent_1 = f->exponent + f->leader + 1 - f->low;
          /* Radix LITTLENUM_RADIX, point just higher than f->leader.  */
 
          exponent_1 = f->exponent + f->leader + 1 - f->low;
          /* Radix LITTLENUM_RADIX, point just higher than f->leader.  */
@@ -380,7 +379,7 @@ flonum_gen2vax (int format_letter,  /* One of 'd' 'f' 'g' 'h'.  */
        Address of where to build floating point literal.
                Assumed to be 'big enough'.
        Address of where to return size of literal (in chars).
        Address of where to build floating point literal.
                Assumed to be 'big enough'.
        Address of where to return size of literal (in chars).
-  
+
    Out:        Input_line_pointer->of next char after floating number.
        Error message, or 0.
        Floating point literal.
    Out:        Input_line_pointer->of next char after floating number.
        Error message, or 0.
        Floating point literal.
@@ -388,14 +387,14 @@ flonum_gen2vax (int format_letter,        /* One of 'd' 'f' 'g' 'h'.  */
 
 #define MAXIMUM_NUMBER_OF_LITTLENUMS  8        /* For .hfloats.  */
 
 
 #define MAXIMUM_NUMBER_OF_LITTLENUMS  8        /* For .hfloats.  */
 
-char *
-md_atof (int what_statement_type,
-        char *literalP,
-        int *sizeP)
+const char *
+vax_md_atof (int what_statement_type,
+            char *literalP,
+            int *sizeP)
 {
   LITTLENUM_TYPE words[MAXIMUM_NUMBER_OF_LITTLENUMS];
   char kind_of_float;
 {
   LITTLENUM_TYPE words[MAXIMUM_NUMBER_OF_LITTLENUMS];
   char kind_of_float;
-  int number_of_chars;
+  unsigned int number_of_chars;
   LITTLENUM_TYPE *littlenumP;
 
   switch (what_statement_type)
   LITTLENUM_TYPE *littlenumP;
 
   switch (what_statement_type)
@@ -447,5 +446,5 @@ md_atof (int what_statement_type,
     number_of_chars = 0;
 
   *sizeP = number_of_chars;
     number_of_chars = 0;
 
   *sizeP = number_of_chars;
-  return kind_of_float ? NULL : _("Bad call to md_atof()");
+  return kind_of_float ? NULL : _("Unrecognized or unsupported floating point constant");
 }
 }
This page took 0.025547 seconds and 4 git commands to generate.