src/hotspot/cpu/s390/c1_LIR_s390.cpp
author naoto
Tue, 09 Jul 2019 08:05:38 -0700
changeset 55627 9c1885fb2a42
parent 47216 71c04702a3d5
permissions -rw-r--r--
8227127: Era designator not displayed correctly using the COMPAT provider Reviewed-by: rriggs
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
42065
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     1
/*
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     2
 * Copyright (c) 2016, Oracle and/or its affiliates. All rights reserved.
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     3
 * Copyright (c) 2016 SAP SE. All rights reserved.
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     4
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     5
 *
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     6
 * This code is free software; you can redistribute it and/or modify it
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     7
 * under the terms of the GNU General Public License version 2 only, as
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     8
 * published by the Free Software Foundation.
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
     9
 *
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    10
 * This code is distributed in the hope that it will be useful, but WITHOUT
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    11
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    12
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    13
 * version 2 for more details (a copy is included in the LICENSE file that
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    14
 * accompanied this code).
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    15
 *
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    16
 * You should have received a copy of the GNU General Public License version
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    17
 * 2 along with this work; if not, write to the Free Software Foundation,
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    18
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    19
 *
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    20
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    21
 * or visit www.oracle.com if you need additional information or have any
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    22
 * questions.
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    23
 *
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    24
 */
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    25
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    26
#include "precompiled.hpp"
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    27
#include "asm/register.hpp"
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    28
#include "c1/c1_FrameMap.hpp"
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    29
#include "c1/c1_LIR.hpp"
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    30
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    31
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    32
FloatRegister LIR_OprDesc::as_float_reg() const {
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    33
  return FrameMap::nr2floatreg(fpu_regnr());
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    34
}
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    35
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    36
FloatRegister LIR_OprDesc::as_double_reg() const {
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    37
  return FrameMap::nr2floatreg(fpu_regnrHi());
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    38
}
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    39
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    40
// Reg2 unused.
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    41
LIR_Opr LIR_OprFact::double_fpu(int reg1, int reg2) {
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    42
  assert(!as_FloatRegister(reg2)->is_valid(), "Not used on this platform");
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    43
  return (LIR_Opr)(intptr_t)((reg1 << LIR_OprDesc::reg1_shift) |
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    44
                             (reg1 << LIR_OprDesc::reg2_shift) |
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    45
                             LIR_OprDesc::double_type          |
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    46
                             LIR_OprDesc::fpu_register         |
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    47
                             LIR_OprDesc::double_size);
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    48
}
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    49
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    50
#ifndef PRODUCT
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    51
void LIR_Address::verify() const {
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    52
  assert(base()->is_cpu_register(), "wrong base operand");
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    53
  assert(index()->is_illegal() || index()->is_double_cpu(), "wrong index operand");
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    54
  assert(base()->type() == T_OBJECT || base()->type() == T_LONG || base()->type() == T_METADATA,
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    55
         "wrong type for addresses");
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    56
}
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    57
#endif // PRODUCT
6032b31e3719 8167673: [s390] The s390 port.
goetz
parents:
diff changeset
    58