/* 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-2020 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
- 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,
You should have received a copy of the GNU General Public License
along with GAS; see the file COPYING. If not, write to the Free
- Software Foundation, 59 Temple Place - Suite 330, Boston, MA
- 02111-1307, USA. */
+ Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
+ 02110-1301, USA. */
#include "as.h"
/* Number of chars in flonum type 'letter'. */
-static int
+static unsigned int
atof_vax_sizeof (int letter)
{
int return_value;
/* 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. */
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.
#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;
- int number_of_chars;
+ unsigned int number_of_chars;
LITTLENUM_TYPE *littlenumP;
switch (what_statement_type)
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");
}