Skip to content

R
riscv-gcc-1
Commit 0b540bf4 by Richard Stallman
Options

(ASM_OUTPUT_DOUBLE, PRINT_OPERAND): 

Use new REAL_VALUE... macros.

From-SVN: r3967
parent 0fa83258
Showing with 16 additions and 13 deletions
gcc/config/m68k/crds.h
...@@ -4,7 +4,7 @@ ...@@ -4,7 +4,7 @@
Written by Gary E. Miller Written by Gary E. Miller
bug reports to Gary_Edmunds_Miller@cup.portal.com bug reports to Gary_Edmunds_Miller@cup.portal.com
Copyright (C) 1987 Free Software Foundation, Inc. Copyright (C) 1987, 1993 Free Software Foundation, Inc.
This file is part of GNU CC. This file is part of GNU CC.
...@@ -168,9 +168,9 @@ bss_section () \ ...@@ -168,9 +168,9 @@ bss_section () \
#undef ASM_OUTPUT_DOUBLE #undef ASM_OUTPUT_DOUBLE
#define ASM_OUTPUT_DOUBLE(FILE,VALUE) \ #define ASM_OUTPUT_DOUBLE(FILE,VALUE) \
do { union { double f; long l[2];} tem; \ do { long l[2]; \
tem.f = (VALUE); \ REAL_VALUE_TO_TARGET_DOUBLE (VALUE, l); \
fprintf (FILE, "\t.long 0x%x, 0x%x\n", tem.l[0], tem.l[1]); \ fprintf (FILE, "\t.long 0x%x, 0x%x\n", l[0], l[1]); \
} while (0) } while (0)
/*unos has no .skip :-( */ /*unos has no .skip :-( */
...@@ -300,18 +300,21 @@ do { union { double f; long l[2];} tem; \ ...@@ -300,18 +300,21 @@ do { union { double f; long l[2];} tem; \
&& (i = standard_sun_fpa_constant_p (X))) \ && (i = standard_sun_fpa_constant_p (X))) \
fprintf (FILE, "%%%d", i & 0x1ff); \ fprintf (FILE, "%%%d", i & 0x1ff); \
else if (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) == SFmode) \ else if (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) == SFmode) \
{ union { double d; int i[2]; } u; \ { REAL_VALUE_TYPE r; long l; \
union { float f; int i; } u1; \ REAL_VALUE_FROM_CONST_DOUBLE (r, X); \
u.i[0] = CONST_DOUBLE_LOW (X); u.i[1] = CONST_DOUBLE_HIGH (X); \
u1.f = u.d; \
if (CODE == 'f') \ if (CODE == 'f') \
ASM_OUTPUT_FLOAT_OPERAND (FILE, u1.f); \ ASM_OUTPUT_FLOAT_OPERAND (CODE, FILE, r); \
else \ else \
fprintf (FILE, "$0x%x", u1.i); } \ { REAL_VALUE_TO_TARGET_SINGLE (r, l); \
fprintf (FILE, "$0x%x", l); } } \
else if (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) == XFmode) \
{ REAL_VALUE_TYPE r; \
REAL_VALUE_FROM_CONST_DOUBLE (r, X); \
ASM_OUTPUT_LONG_DOUBLE_OPERAND (FILE, r); } \
else if (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) != DImode) \ else if (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) != DImode) \
{ union { double d; int i[2]; } u; \ { REAL_VALUE_TYPE r; \
u.i[0] = CONST_DOUBLE_LOW (X); u.i[1] = CONST_DOUBLE_HIGH (X); \ REAL_VALUE_FROM_CONST_DOUBLE (r, X); \
ASM_OUTPUT_DOUBLE_OPERAND (FILE, u.d); } \ ASM_OUTPUT_DOUBLE_OPERAND (FILE, r); } \
else { putc ('$', FILE); output_addr_const (FILE, X); }} else { putc ('$', FILE); output_addr_const (FILE, X); }}
/* Note that this contains a kludge that knows that the only reason /* Note that this contains a kludge that knows that the only reason
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment