< prev index next >

src/cpu/s390/vm/c1_LIRAssembler_s390.cpp

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

@@ -1073,12 +1073,11 @@
     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);
+          __ 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);
< prev index next >