{
gpointer addr;
gint32 displace;
- int reg, base;
+ int reg;
+ guchar* base;
unsigned short opcode;
char *fname;
MonoJitInfo *codeJi,
if (code) {
/* The top bit needs to be ignored on S/390 */
- (guint32) code &= 0x7fffffff;
+ code = (guchar*)((guint32)code & 0x7fffffff);
fname = mono_method_full_name (method, TRUE);
codeJi = mono_jit_info_table_find (mono_domain_get(), code);
reg = *code >> 4;
displace = *((short *)code) & 0x0fff;
if (reg > 5)
- base = *((int *) (sp + S390_REG_SAVE_OFFSET+
+ base = *((guchar **) (sp + S390_REG_SAVE_OFFSET+
sizeof(int)*(reg-6)));
else
- base = *((int *) (sp + CREATE_GR_OFFSET+
+ base = *((guchar **) (sp + CREATE_GR_OFFSET+
sizeof(int)*(reg-2)));
if ((method->klass->valuetype) &&