--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/share/vm/ci/ciType.cpp	Sat Dec 01 00:00:00 2007 +0000
@@ -0,0 +1,144 @@
+/*
+ * Copyright 2000-2002 Sun Microsystems, Inc.  All Rights Reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
+ * CA 95054 USA or visit www.sun.com if you need additional information or
+ * have any questions.
+ *
+ */
+
+#include "incls/_precompiled.incl"
+#include "incls/_ciType.cpp.incl"
+
+ciType* ciType::_basic_types[T_CONFLICT+1];
+
+// ciType
+//
+// This class represents either a class (T_OBJECT), array (T_ARRAY),
+// or one of the primitive types such as T_INT.
+
+// ------------------------------------------------------------------
+// ciType::ciType
+//
+ciType::ciType(BasicType basic_type) : ciObject() {
+  assert(basic_type >= T_BOOLEAN && basic_type <= T_CONFLICT, "range check");
+  assert(basic_type != T_OBJECT && basic_type != T_ARRAY, "not a reference type");
+  _basic_type = basic_type;
+}
+
+ciType::ciType(KlassHandle k) : ciObject(k) {
+  _basic_type = Klass::cast(k())->oop_is_array() ? T_ARRAY : T_OBJECT;
+}
+
+ciType::ciType(ciKlass* klass) : ciObject(klass) {
+  _basic_type = klass->is_array_klass_klass() ? T_ARRAY : T_OBJECT;
+}
+
+
+// ------------------------------------------------------------------
+// ciType::is_subtype_of
+//
+bool ciType::is_subtype_of(ciType* type) {
+  if (this == type)  return true;
+  if (is_klass() && type->is_klass())
+    return this->as_klass()->is_subtype_of(type->as_klass());
+  return false;
+}
+
+// ------------------------------------------------------------------
+// ciType::print_impl
+//
+// Implementation of the print method.
+void ciType::print_impl(outputStream* st) {
+  st->print(" type=");
+  print_name_on(st);
+}
+
+// ------------------------------------------------------------------
+// ciType::print_name
+//
+// Print the name of this type
+void ciType::print_name_on(outputStream* st) {
+  st->print(type2name(basic_type()));
+}
+
+
+
+// ------------------------------------------------------------------
+// ciType::java_mirror
+//
+ciInstance* ciType::java_mirror() {
+  VM_ENTRY_MARK;
+  return CURRENT_THREAD_ENV->get_object(Universe::java_mirror(basic_type()))->as_instance();
+}
+
+// ------------------------------------------------------------------
+// ciType::box_klass
+//
+ciKlass* ciType::box_klass() {
+  if (!is_primitive_type())  return this->as_klass();  // reference types are "self boxing"
+
+  // Void is "boxed" with a null.
+  if (basic_type() == T_VOID)  return NULL;
+
+  VM_ENTRY_MARK;
+  return CURRENT_THREAD_ENV->get_object(SystemDictionary::box_klass(basic_type()))->as_instance_klass();
+}
+
+
+// ------------------------------------------------------------------
+// ciType::make
+//
+// Produce the ciType for a given primitive BasicType.
+// As a bonus, produce the right reference type for T_OBJECT.
+// Does not work on T_ARRAY.
+ciType* ciType::make(BasicType t) {
+  // short, etc.
+  // Note: Bare T_ADDRESS means a raw pointer type, not a return_address.
+  assert((uint)t < T_CONFLICT+1, "range check");
+  if (t == T_OBJECT)  return ciEnv::_Object;  // java/lang/Object
+  assert(_basic_types[t] != NULL, "domain check");
+  return _basic_types[t];
+}
+
+// ciReturnAddress
+//
+// This class represents the type of a specific return address in the
+// bytecodes.
+
+// ------------------------------------------------------------------
+// ciReturnAddress::ciReturnAddress
+//
+ciReturnAddress::ciReturnAddress(int bci) : ciType(T_ADDRESS) {
+  assert(0 <= bci, "bci cannot be negative");
+  _bci = bci;
+}
+
+// ------------------------------------------------------------------
+// ciReturnAddress::print_impl
+//
+// Implementation of the print method.
+void ciReturnAddress::print_impl(outputStream* st) {
+  st->print(" bci=%d", _bci);
+}
+
+// ------------------------------------------------------------------
+// ciReturnAddress::make
+ciReturnAddress* ciReturnAddress::make(int bci) {
+  GUARDED_VM_ENTRY(return CURRENT_ENV->get_return_address(bci);)
+}