aboutsummaryrefslogtreecommitdiff
path: root/gas/config/tc-i370.c
diff options
context:
space:
mode:
authorNick Clifton <nickc@redhat.com>2007-10-17 16:45:56 +0000
committerNick Clifton <nickc@redhat.com>2007-10-17 16:45:56 +0000
commit499ac353610f24006acf82c32503d8d15d0f278c (patch)
treea85388693f1bb562345a7f7a28875fd962bd16f0 /gas/config/tc-i370.c
parent25b07cd9c40077c076d68f9e7d5a113828fbebbf (diff)
downloadgdb-499ac353610f24006acf82c32503d8d15d0f278c.zip
gdb-499ac353610f24006acf82c32503d8d15d0f278c.tar.gz
gdb-499ac353610f24006acf82c32503d8d15d0f278c.tar.bz2
Remove duplicate definitions of the md_atof() function
Diffstat (limited to 'gas/config/tc-i370.c')
-rw-r--r--gas/config/tc-i370.c46
1 files changed, 3 insertions, 43 deletions
diff --git a/gas/config/tc-i370.c b/gas/config/tc-i370.c
index c6bedb7..af3b284 100644
--- a/gas/config/tc-i370.c
+++ b/gas/config/tc-i370.c
@@ -958,6 +958,7 @@ i370_dc (int unused ATTRIBUTE_UNUSED)
emit_expr (&exp, nbytes);
break;
case 'E': /* 32-bit */
+ type = 'f';
case 'D': /* 64-bit */
md_atof (type, tmp, &nbytes);
p = frag_more (nbytes);
@@ -2355,53 +2356,12 @@ i370_tc (int ignore ATTRIBUTE_UNUSED)
}
}
-/* Turn a string in input_line_pointer into a floating point constant
- of type TYPE, and store the appropriate bytes in *LITP. The number
- of LITTLENUMS emitted is stored in *SIZEP. An error message is
- returned, or NULL on OK. */
-
char *
md_atof (int type, char *litp, int *sizep)
{
- int prec;
- LITTLENUM_TYPE words[4];
- char *t;
- int i;
-
- switch (type)
- {
- case 'f':
- case 'E':
- type = 'f';
- prec = 2;
- break;
-
- case 'd':
- case 'D':
- type = 'd';
- prec = 4;
- break;
-
- default:
- *sizep = 0;
- return "bad call to md_atof";
- }
-
/* 360/370/390 have two float formats: an old, funky 360 single-precision
- * format, and the ieee format. Support only the ieee format. */
- t = atof_ieee (input_line_pointer, type, words);
- if (t)
- input_line_pointer = t;
-
- *sizep = prec * 2;
-
- for (i = 0; i < prec; i++)
- {
- md_number_to_chars (litp, (valueT) words[i], 2);
- litp += 2;
- }
-
- return NULL;
+ format, and the ieee format. Support only the ieee format. */
+ return ieee_md_atof (type, litp, sizep, TRUE);
}
/* Write a value out to the object file, using the appropriate