hotspot/src/cpu/sparc/vm/vmreg_sparc.inline.hpp
author twisti
Fri, 13 Feb 2009 09:09:35 -0800
changeset 2031 24e034f56dcb
parent 1 489c9b5090e2
child 5547 f4b087cbb361
permissions -rw-r--r--
6800154: Add comments to long_by_long_mulhi() for better understandability Summary: This patch adds a comment pointing to the Hacker's Delight version of the algorithm plus a verbatim copy of it. Furthermore it adds inline comments. Reviewed-by: kvn, jrose
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
     1
/*
489c9b5090e2 Initial load
duke
parents:
diff changeset
     2
 * Copyright 2006-2007 Sun Microsystems, Inc.  All Rights Reserved.
489c9b5090e2 Initial load
duke
parents:
diff changeset
     3
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
489c9b5090e2 Initial load
duke
parents:
diff changeset
     4
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
     5
 * This code is free software; you can redistribute it and/or modify it
489c9b5090e2 Initial load
duke
parents:
diff changeset
     6
 * under the terms of the GNU General Public License version 2 only, as
489c9b5090e2 Initial load
duke
parents:
diff changeset
     7
 * published by the Free Software Foundation.
489c9b5090e2 Initial load
duke
parents:
diff changeset
     8
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
     9
 * This code is distributed in the hope that it will be useful, but WITHOUT
489c9b5090e2 Initial load
duke
parents:
diff changeset
    10
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
489c9b5090e2 Initial load
duke
parents:
diff changeset
    11
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
489c9b5090e2 Initial load
duke
parents:
diff changeset
    12
 * version 2 for more details (a copy is included in the LICENSE file that
489c9b5090e2 Initial load
duke
parents:
diff changeset
    13
 * accompanied this code).
489c9b5090e2 Initial load
duke
parents:
diff changeset
    14
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    15
 * You should have received a copy of the GNU General Public License version
489c9b5090e2 Initial load
duke
parents:
diff changeset
    16
 * 2 along with this work; if not, write to the Free Software Foundation,
489c9b5090e2 Initial load
duke
parents:
diff changeset
    17
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    18
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    19
 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
489c9b5090e2 Initial load
duke
parents:
diff changeset
    20
 * CA 95054 USA or visit www.sun.com if you need additional information or
489c9b5090e2 Initial load
duke
parents:
diff changeset
    21
 * have any questions.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    22
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    23
 */
489c9b5090e2 Initial load
duke
parents:
diff changeset
    24
489c9b5090e2 Initial load
duke
parents:
diff changeset
    25
inline VMReg RegisterImpl::as_VMReg() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    26
  if( this==noreg ) return VMRegImpl::Bad();
489c9b5090e2 Initial load
duke
parents:
diff changeset
    27
  return VMRegImpl::as_VMReg(encoding() << 1 );
489c9b5090e2 Initial load
duke
parents:
diff changeset
    28
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    29
489c9b5090e2 Initial load
duke
parents:
diff changeset
    30
inline VMReg FloatRegisterImpl::as_VMReg() { return VMRegImpl::as_VMReg( ConcreteRegisterImpl::max_gpr + encoding() ); }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    31
489c9b5090e2 Initial load
duke
parents:
diff changeset
    32
489c9b5090e2 Initial load
duke
parents:
diff changeset
    33
inline bool VMRegImpl::is_Register() { return value() >= 0 && value() < ConcreteRegisterImpl::max_gpr; }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    34
inline bool VMRegImpl::is_FloatRegister() { return value() >= ConcreteRegisterImpl::max_gpr &&
489c9b5090e2 Initial load
duke
parents:
diff changeset
    35
                                                   value() < ConcreteRegisterImpl::max_fpr; }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    36
inline Register VMRegImpl::as_Register() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    37
489c9b5090e2 Initial load
duke
parents:
diff changeset
    38
  assert( is_Register() && is_even(value()), "even-aligned GPR name" );
489c9b5090e2 Initial load
duke
parents:
diff changeset
    39
  // Yuk
489c9b5090e2 Initial load
duke
parents:
diff changeset
    40
  return ::as_Register(value()>>1);
489c9b5090e2 Initial load
duke
parents:
diff changeset
    41
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    42
489c9b5090e2 Initial load
duke
parents:
diff changeset
    43
inline FloatRegister VMRegImpl::as_FloatRegister() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    44
  assert( is_FloatRegister(), "must be" );
489c9b5090e2 Initial load
duke
parents:
diff changeset
    45
  // Yuk
489c9b5090e2 Initial load
duke
parents:
diff changeset
    46
  return ::as_FloatRegister( value() - ConcreteRegisterImpl::max_gpr );
489c9b5090e2 Initial load
duke
parents:
diff changeset
    47
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    48
489c9b5090e2 Initial load
duke
parents:
diff changeset
    49
inline   bool VMRegImpl::is_concrete() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    50
  assert(is_reg(), "must be");
489c9b5090e2 Initial load
duke
parents:
diff changeset
    51
  int v = value();
489c9b5090e2 Initial load
duke
parents:
diff changeset
    52
  if ( v  <  ConcreteRegisterImpl::max_gpr ) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    53
    return is_even(v);
489c9b5090e2 Initial load
duke
parents:
diff changeset
    54
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    55
  // F0..F31
489c9b5090e2 Initial load
duke
parents:
diff changeset
    56
  if ( v <= ConcreteRegisterImpl::max_gpr + 31) return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
    57
  if ( v <  ConcreteRegisterImpl::max_fpr) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    58
    return is_even(v);
489c9b5090e2 Initial load
duke
parents:
diff changeset
    59
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    60
  assert(false, "what register?");
489c9b5090e2 Initial load
duke
parents:
diff changeset
    61
  return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
    62
}