src/cpu/s390/vm/c1_LIRAssembler_s390.cpp

rev 12273 : 8169317: [s390] Various minor bug fixes and adaptions.

*** 1073,1084 ****
      case T_ARRAY : // fall through
      case T_OBJECT:
        {
          if (UseCompressedOops && !wide) {
            Register compressed_src = Z_R14;
!           __ z_lgr(compressed_src, from->as_register());
!           __ encode_heap_oop(compressed_src);
            offset = code_offset();
            if (short_disp) {
              __ z_st(compressed_src,  disp_value, disp_reg, dest);
            } else {
              __ z_sty(compressed_src, disp_value, disp_reg, dest);
--- 1073,1083 ----
      case T_ARRAY : // fall through
      case T_OBJECT:
        {
          if (UseCompressedOops && !wide) {
            Register compressed_src = Z_R14;
!           __ oop_encoder(compressed_src, from->as_register(), true, (disp_reg != Z_R1) ? Z_R1 : Z_R0, -1, true);
            offset = code_offset();
            if (short_disp) {
              __ z_st(compressed_src,  disp_value, disp_reg, dest);
            } else {
              __ z_sty(compressed_src, disp_value, disp_reg, dest);