1 /*
   2  * Copyright (c) 1999, 2014, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.
   8  *
   9  * This code is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12  * version 2 for more details (a copy is included in the LICENSE file that
  13  * accompanied this code).
  14  *
  15  * You should have received a copy of the GNU General Public License version
  16  * 2 along with this work; if not, write to the Free Software Foundation,
  17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  20  * or visit www.oracle.com if you need additional information or have any
  21  * questions.
  22  *
  23  */
  24 
  25 #include "precompiled.hpp"
  26 #include "ci/ciConstant.hpp"
  27 #include "ci/ciUtilities.hpp"
  28 #include "memory/allocation.hpp"
  29 #include "memory/allocation.inline.hpp"
  30 
  31 // ciConstant
  32 //
  33 // This class represents a constant value.
  34 
  35 // ------------------------------------------------------------------
  36 // ciConstant::print
  37 void ciConstant::print() {
  38   tty->print("<ciConstant type=%s value=",
  39              basictype_to_str(basic_type()));
  40   switch (basic_type()) {
  41   case T_BOOLEAN:
  42     tty->print("%s", bool_to_str(_value._int != 0));
  43     break;
  44   case T_CHAR:
  45   case T_BYTE:
  46   case T_SHORT:
  47   case T_INT:
  48     tty->print("%d", _value._int);
  49     break;
  50   case T_LONG:
  51     tty->print(INT64_FORMAT, (int64_t)(_value._long));
  52     break;
  53   case T_FLOAT:
  54     tty->print("%f", _value._float);
  55     break;
  56   case T_DOUBLE:
  57     tty->print("%lf", _value._double);
  58     break;
  59   case T_OBJECT:
  60   case T_ARRAY:
  61     _value._object->print();
  62     break;
  63   default:
  64     tty->print("ILLEGAL");
  65     break;
  66   }
  67   tty->print(">");
  68 }