Mercurial > hg > graal-compiler
view graal/com.oracle.truffle.api.codegen.test/src/com/oracle/truffle/api/codegen/test/TypeSystemTest.java @ 9033:35a52b195f28
remove debug counters
author | Lukas Stadler <lukas.stadler@jku.at> |
---|---|
date | Fri, 12 Apr 2013 10:53:37 +0200 |
parents | 6ef9fc7375c7 |
children | 5f7f0d3e3638 |
line wrap: on
line source
/* * Copyright (c) 2012, 2013, Oracle and/or its affiliates. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA * or visit www.oracle.com if you need additional information or have any * questions. */ package com.oracle.truffle.api.codegen.test; import com.oracle.truffle.api.*; import com.oracle.truffle.api.codegen.*; import com.oracle.truffle.api.codegen.test.BuiltinTest.Str; import com.oracle.truffle.api.frame.*; import com.oracle.truffle.api.nodes.*; public class TypeSystemTest { @TypeSystem({int.class, Str.class}) static class SimpleTypes { } @TypeSystemReference(SimpleTypes.class) abstract static class ValueNode extends Node { int executeInt(VirtualFrame frame) throws UnexpectedResultException { return SimpleTypesGen.SIMPLETYPES.expectInteger(execute(frame)); } Str executeStr(VirtualFrame frame) throws UnexpectedResultException { return SimpleTypesGen.SIMPLETYPES.expectStr(execute(frame)); } abstract Object execute(VirtualFrame frame); } @TypeSystemReference(SimpleTypes.class) abstract static class ChildrenNode extends ValueNode { @Children protected ValueNode[] children; public ChildrenNode(ValueNode... children) { this.children = adoptChildren(children); } public ChildrenNode(ChildrenNode node) { this(node.children); } } @TypeSystemReference(SimpleTypes.class) static class TestRootNode<E extends ValueNode> extends RootNode { @Child private E node; public TestRootNode(E node) { this.node = adoptChild(node); } @Override public Object execute(VirtualFrame frame) { return node.execute(frame); } public E getNode() { return node; } } static class TestArguments extends Arguments { private final Object[] values; public TestArguments(Object... values) { this.values = values; } public Object[] getValues() { return values; } public Object get(int index) { return values[index]; } } static class ArgumentNode extends ValueNode { final int index; public ArgumentNode(int index) { this.index = index; } @Override Object execute(VirtualFrame frame) { return ((TestArguments) frame.getArguments()).get(index); } } }