Author: dgilmore
Date: 2012-08-20 16:04:42 -0400 (Mon, 20 Aug 2012)
New Revision: 4014

Modified:
   trunk/osprey/common/com/x8664/targ_em_const.cxx
Log:
Fixed bug 999, C10 constant emission problem.


Modified: trunk/osprey/common/com/x8664/targ_em_const.cxx
===================================================================
--- trunk/osprey/common/com/x8664/targ_em_const.cxx     2012-08-20 20:02:28 UTC 
(rev 4013)
+++ trunk/osprey/common/com/x8664/targ_em_const.cxx     2012-08-20 20:04:42 UTC 
(rev 4014)
@@ -395,11 +395,13 @@
       case MTYPE_C10: {
        INT i;
         char *p = (char *) & TCON_R16(tc);
-       emit_bytes( fl, p, sizeof(TCON_R16(tc)) );
+        // Force the size of MTYPE_F10 to 16 for 64bit code and 12 for 32bit 
code
+       emit_bytes( fl, p, Is_Target_64bit() ? 16 : 12 /* sizeof(TCON_R16(tc)) 
*/ );
        fprintf(fl, "\t%s complex long double real part %#Lg\n", ASM_CMNT, 
TCON_R16(tc) );
 
         p = (char *) & TCON_IR16(tc);
-       emit_bytes( fl, p, sizeof(TCON_IR16(tc)) );
+        // Force the size of MTYPE_F10 to 16 for 64bit code and 12 for 32bit 
code
+       emit_bytes( fl, p, Is_Target_64bit() ? 16 : 12 /* sizeof(TCON_R16(tc)) 
*/ );
        fprintf(fl, "\t%s complex long double imag part %#Lg\n", ASM_CMNT, 
TCON_IR16(tc) );
        --rc;
        break;


------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Open64-devel mailing list
Open64-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/open64-devel

Reply via email to