comparison graal/com.oracle.truffle.api.codegen.test/src/com/oracle/truffle/api/codegen/test/TypeSystemTest.java @ 8249:aad7e9f4f71c

A few additions to codegen tests.
author Christian Humer <christian.humer@gmail.com>
date Tue, 12 Mar 2013 11:38:24 +0100
parents
children a80bf36c6a1e
comparison
equal deleted inserted replaced
8248:c4c3f50fa9c2 8249:aad7e9f4f71c
1 /*
2 * Copyright (c) 2012, 2012, 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 package com.oracle.truffle.api.codegen.test;
24
25 import com.oracle.truffle.api.codegen.*;
26 import com.oracle.truffle.api.codegen.test.RuntimeStringTest.RuntimeString;
27 import com.oracle.truffle.api.frame.*;
28 import com.oracle.truffle.api.nodes.*;
29
30 public class TypeSystemTest {
31
32 @TypeSystem({int.class, RuntimeString.class})
33 static class SimpleTypes {
34 }
35
36 @TypeSystemReference(SimpleTypes.class)
37 abstract static class ValueNode extends Node {
38
39 int executeInt() throws UnexpectedResultException {
40 return SimpleTypesGen.SIMPLETYPES.expectInteger(execute());
41 }
42
43 RuntimeString executeString() {
44 return new RuntimeString(execute().toString());
45 }
46
47 @SuppressWarnings("static-method")
48 final long executeSpecial() {
49 return 42L;
50 }
51
52 abstract Object execute();
53
54 }
55
56 @TypeSystemReference(SimpleTypes.class)
57 static class TestRootNode extends RootNode {
58
59 @Child private ValueNode node;
60
61 public TestRootNode(ValueNode node) {
62 this.node = adoptChild(node);
63 }
64
65 @Override
66 public Object execute(VirtualFrame frame) {
67 return node.execute();
68 }
69 }
70
71 }