summaryrefslogtreecommitdiff
path: root/gcc/dwarf2out.c
diff options
context:
space:
mode:
authorzack <zack@138bc75d-0d04-0410-961f-82ee72b054a4>2003-09-29 21:52:25 +0000
committerzack <zack@138bc75d-0d04-0410-961f-82ee72b054a4>2003-09-29 21:52:25 +0000
commit0a8544b88dd2b777ee4355d06aa045243c321ffb (patch)
tree655df51044c5457d7e7c67586a4506277270a387 /gcc/dwarf2out.c
parentb613c3d11075666e450fa129cb24fd167bc5be43 (diff)
downloadgcc-0a8544b88dd2b777ee4355d06aa045243c321ffb.tar.gz
* dwarf2out.c (add_const_value_attribute): Use real_to_target.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@71918 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/dwarf2out.c')
-rw-r--r--gcc/dwarf2out.c19
1 files changed, 1 insertions, 18 deletions
diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c
index 8362a698f16..6ff9079fe6d 100644
--- a/gcc/dwarf2out.c
+++ b/gcc/dwarf2out.c
@@ -9105,24 +9105,7 @@ add_const_value_attribute (dw_die_ref die, rtx rtl)
REAL_VALUE_TYPE rv;
REAL_VALUE_FROM_CONST_DOUBLE (rv, rtl);
- switch (mode)
- {
- case SFmode:
- REAL_VALUE_TO_TARGET_SINGLE (rv, array[0]);
- break;
-
- case DFmode:
- REAL_VALUE_TO_TARGET_DOUBLE (rv, array);
- break;
-
- case XFmode:
- case TFmode:
- REAL_VALUE_TO_TARGET_LONG_DOUBLE (rv, array);
- break;
-
- default:
- abort ();
- }
+ real_to_target (array, &rv, mode);
add_AT_float (die, DW_AT_const_value, length, array);
}