calls instead of machine instructions, using the C calling
convention.
- $Id: builtin.c 8044 2007-06-07 19:24:35Z twisti $
+ $Id: builtin.c 8046 2007-06-07 22:02:16Z pm $
*/
break;
case TYPE_FLT:
+#if defined(__S390__)
+ imu.l = value;
+ /* The below won't work on S390 */
+#else
imu.i = (s4) value;
+#endif
sprintf(logtext + strlen(logtext), "%g (0x%08x)", imu.f, imu.i);
break;
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
02110-1301, USA.
- $Id: emit.c 7966 2007-05-25 12:41:03Z pm $
+ $Id: emit.c 8046 2007-06-07 22:02:16Z pm $
*/
if (IS_FLT_DBL_TYPE(t)) {
if (fargctr < 2) { /* passed in register */
- N_STD(REG_FA0 + fargctr, doff, RN, REG_SP);
+ N_STD(abi_registers_float_argument[fargctr], doff, RN, REG_SP);
fargctr += 1;
} else { /* passed on stack */
if (IS_2_WORD_TYPE(t)) {