< prev index next >

src/hotspot/cpu/ppc/c1_FrameMap_ppc.cpp

Print this page
rev 56376 : 8231448: s390 and ppc - replace JVM type comparisons to T_OBJECT and T_ARRAY with call to is_reference_type
   1 /*
   2  * Copyright (c) 1999, 2015, Oracle and/or its affiliates. All rights reserved.
   3  * Copyright (c) 2012, 2015 SAP SE. All rights reserved.
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This code is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU General Public License version 2 only, as
   8  * published by the Free Software Foundation.
   9  *
  10  * This code is distributed in the hope that it will be useful, but WITHOUT
  11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  12  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  13  * version 2 for more details (a copy is included in the LICENSE file that
  14  * accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License version
  17  * 2 along with this work; if not, write to the Free Software Foundation,
  18  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  19  *
  20  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  21  * or visit www.oracle.com if you need additional information or have any
  22  * questions.
  23  *


  35 
  36 LIR_Opr FrameMap::map_to_opr(BasicType type, VMRegPair* reg, bool outgoing) {
  37   LIR_Opr opr = LIR_OprFact::illegalOpr;
  38   VMReg r_1 = reg->first();
  39   VMReg r_2 = reg->second();
  40   if (r_1->is_stack()) {
  41     // Convert stack slot to an SP offset.
  42     // The calling convention does not count the SharedRuntime::out_preserve_stack_slots() value
  43     // so we must add it in here.
  44     int st_off = (r_1->reg2stack() + SharedRuntime::out_preserve_stack_slots()) * VMRegImpl::stack_slot_size;
  45     opr = LIR_OprFact::address(new LIR_Address(SP_opr, st_off + STACK_BIAS, type));
  46   } else if (r_1->is_Register()) {
  47     Register reg = r_1->as_Register();
  48     //if (outgoing) {
  49     //  assert(!reg->is_in(), "should be using I regs");
  50     //} else {
  51     //  assert(!reg->is_out(), "should be using O regs");
  52     //}
  53     if (r_2->is_Register() && (type == T_LONG || type == T_DOUBLE)) {
  54       opr = as_long_opr(reg);
  55     } else if (type == T_OBJECT || type == T_ARRAY) {
  56       opr = as_oop_opr(reg);
  57     } else {
  58       opr = as_opr(reg);
  59     }
  60   } else if (r_1->is_FloatRegister()) {
  61     assert(type == T_DOUBLE || type == T_FLOAT, "wrong type");
  62     FloatRegister f = r_1->as_FloatRegister();
  63     if (type == T_DOUBLE) {
  64       opr = as_double_opr(f);
  65     } else {
  66       opr = as_float_opr(f);
  67     }
  68   }
  69   return opr;
  70 }
  71 
  72 //               FrameMap
  73 //--------------------------------------------------------
  74 
  75 FloatRegister FrameMap::_fpu_regs [FrameMap::nof_fpu_regs];


   1 /*
   2  * Copyright (c) 1999, 2019, Oracle and/or its affiliates. All rights reserved.
   3  * Copyright (c) 2012, 2019 SAP SE. All rights reserved.
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This code is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU General Public License version 2 only, as
   8  * published by the Free Software Foundation.
   9  *
  10  * This code is distributed in the hope that it will be useful, but WITHOUT
  11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  12  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  13  * version 2 for more details (a copy is included in the LICENSE file that
  14  * accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License version
  17  * 2 along with this work; if not, write to the Free Software Foundation,
  18  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  19  *
  20  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  21  * or visit www.oracle.com if you need additional information or have any
  22  * questions.
  23  *


  35 
  36 LIR_Opr FrameMap::map_to_opr(BasicType type, VMRegPair* reg, bool outgoing) {
  37   LIR_Opr opr = LIR_OprFact::illegalOpr;
  38   VMReg r_1 = reg->first();
  39   VMReg r_2 = reg->second();
  40   if (r_1->is_stack()) {
  41     // Convert stack slot to an SP offset.
  42     // The calling convention does not count the SharedRuntime::out_preserve_stack_slots() value
  43     // so we must add it in here.
  44     int st_off = (r_1->reg2stack() + SharedRuntime::out_preserve_stack_slots()) * VMRegImpl::stack_slot_size;
  45     opr = LIR_OprFact::address(new LIR_Address(SP_opr, st_off + STACK_BIAS, type));
  46   } else if (r_1->is_Register()) {
  47     Register reg = r_1->as_Register();
  48     //if (outgoing) {
  49     //  assert(!reg->is_in(), "should be using I regs");
  50     //} else {
  51     //  assert(!reg->is_out(), "should be using O regs");
  52     //}
  53     if (r_2->is_Register() && (type == T_LONG || type == T_DOUBLE)) {
  54       opr = as_long_opr(reg);
  55     } else if (is_reference_type(type)) {
  56       opr = as_oop_opr(reg);
  57     } else {
  58       opr = as_opr(reg);
  59     }
  60   } else if (r_1->is_FloatRegister()) {
  61     assert(type == T_DOUBLE || type == T_FLOAT, "wrong type");
  62     FloatRegister f = r_1->as_FloatRegister();
  63     if (type == T_DOUBLE) {
  64       opr = as_double_opr(f);
  65     } else {
  66       opr = as_float_opr(f);
  67     }
  68   }
  69   return opr;
  70 }
  71 
  72 //               FrameMap
  73 //--------------------------------------------------------
  74 
  75 FloatRegister FrameMap::_fpu_regs [FrameMap::nof_fpu_regs];


< prev index next >