diff options
author | zack <zack@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-09-29 21:52:25 +0000 |
---|---|---|
committer | zack <zack@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-09-29 21:52:25 +0000 |
commit | 0a8544b88dd2b777ee4355d06aa045243c321ffb (patch) | |
tree | 655df51044c5457d7e7c67586a4506277270a387 /gcc/dwarf2out.c | |
parent | b613c3d11075666e450fa129cb24fd167bc5be43 (diff) | |
download | gcc-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.c | 19 |
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); } |