Mercurial > hg > truffle

comparison src/share/vm/ci/ciConstant.cpp @ 0:a61af66fc99e jdk7-b24

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial load
author duke
date Sat, 01 Dec 2007 00:00:00 +0000
parents
children 1c9c45172908
comparison
equal deleted inserted replaced
-1:000000000000 0:a61af66fc99e
1 /*
2 * Copyright 1999-2005 Sun Microsystems, Inc. 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 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
20 * CA 95054 USA or visit www.sun.com if you need additional information or
21 * have any questions.
22 *
23 */
24
25 #include "incls/_precompiled.incl"
26 #include "incls/_ciConstant.cpp.incl"
27
28 // ciConstant
29 //
30 // This class represents a constant value.
31
32 // ------------------------------------------------------------------
33 // ciConstant::print
34 void ciConstant::print() {
35 tty->print("<ciConstant type=%s value=",
36 basictype_to_str(basic_type()));
37 switch (basic_type()) {
38 case T_BOOLEAN:
39 tty->print("%s", bool_to_str(_value._int == 0));
40 break;
41 case T_CHAR:
42 case T_BYTE:
43 case T_SHORT:
44 case T_INT:
45 tty->print("%d", _value._int);
46 break;
47 case T_LONG:
48 tty->print(INT64_FORMAT, _value._long);
49 break;
50 case T_FLOAT:
51 tty->print("%f", _value._float);
52 break;
53 case T_DOUBLE:
54 tty->print("%lf", _value._double);
55 break;
56 case T_OBJECT:
57 case T_ARRAY:
58 _value._object->print();
59 break;
60 default:
61 tty->print("ILLEGAL");
62 break;
63 }
64 tty->print(">");
65 }