Mercurial > hg > truffle

annotate truffle/com.oracle.truffle.tools.test/src/com/oracle/truffle/tools/test/ToolTestUtil.java @ 22343:76f80b4b48bc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Truffle/Instrumentation: language-specific WrapperNode classes are no longer required to explicitly propagate KillException or QuitException.
author Michael Van De Vanter <michael.van.de.vanter@oracle.com>
date Wed, 04 Nov 2015 20:32:52 -0800
parents 260e3cdf11ec
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
1 /*
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
2 * Copyright (c) 2015, 2015, Oracle and/or its affiliates. All rights reserved.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
4 *
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
5 * This code is free software; you can redistribute it and/or modify it
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
6 * under the terms of the GNU General Public License version 2 only, as
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
7 * published by the Free Software Foundation. Oracle designates this
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
8 * particular file as subject to the "Classpath" exception as provided
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
9 * by Oracle in the LICENSE file that accompanied this code.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
10 *
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
11 * This code is distributed in the hope that it will be useful, but WITHOUT
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
14 * version 2 for more details (a copy is included in the LICENSE file that
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
15 * accompanied this code).
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
16 *
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
17 * You should have received a copy of the GNU General Public License version
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
18 * 2 along with this work; if not, write to the Free Software Foundation,
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
20 *
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
22 * or visit www.oracle.com if you need additional information or have any
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
23 * questions.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
24 */
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
25 package com.oracle.truffle.tools.test;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
26
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
27 import java.io.IOException;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
28
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
29 import com.oracle.truffle.api.CallTarget;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
30 import com.oracle.truffle.api.Truffle;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
31 import com.oracle.truffle.api.TruffleLanguage;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
32 import com.oracle.truffle.api.TruffleRuntime;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
33 import com.oracle.truffle.api.frame.MaterializedFrame;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
34 import com.oracle.truffle.api.frame.VirtualFrame;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
35 import com.oracle.truffle.api.instrument.ASTProber;
22226
c896a8e70777 Truffle/Instrumentation:
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22223
diff changeset
36 import com.oracle.truffle.api.instrument.EventHandlerNode;
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
37 import com.oracle.truffle.api.instrument.Instrumenter;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
38 import com.oracle.truffle.api.instrument.Probe;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
39 import com.oracle.truffle.api.instrument.SyntaxTag;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
40 import com.oracle.truffle.api.instrument.Visualizer;
22227
68a0c3dcea10 Truffle/Instrumentation: remove extraneous overrides of deprecated Node methods
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22226
diff changeset
41 import com.oracle.truffle.api.instrument.WrapperNode;
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
42 import com.oracle.truffle.api.nodes.Node;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
43 import com.oracle.truffle.api.nodes.NodeCost;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
44 import com.oracle.truffle.api.nodes.NodeInfo;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
45 import com.oracle.truffle.api.nodes.NodeVisitor;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
46 import com.oracle.truffle.api.nodes.RootNode;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
47 import com.oracle.truffle.api.source.Source;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
48 import com.oracle.truffle.api.source.SourceSection;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
49
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
50 public class ToolTestUtil {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
51
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
52 static final String MIME_TYPE = "text/x-toolTest";
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
53
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
54 static enum ToolTestTag implements SyntaxTag {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
55
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
56 ADD_TAG("addition", "test language addition node"),
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
57
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
58 VALUE_TAG("value", "test language value node");
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
59
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
60 private final String name;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
61 private final String description;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
62
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
63 private ToolTestTag(String name, String description) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
64 this.name = name;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
65 this.description = description;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
66 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
67
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
68 public String getName() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
69 return name;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
70 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
71
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
72 public String getDescription() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
73 return description;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
74 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
75 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
76
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
77 static Source createTestSource(String description) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
78 return Source.fromText("6\n+\n7\n" + description, description).withMimeType(MIME_TYPE);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
79 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
80
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
81 @TruffleLanguage.Registration(name = "toolTestLanguage", version = "0", mimeType = MIME_TYPE)
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
82 public static final class ToolTestLang extends TruffleLanguage<Object> {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
83
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
84 public static final ToolTestLang INSTANCE = new ToolTestLang();
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
85
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
86 private ToolTestLang() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
87 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
88
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
89 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
90 protected CallTarget parse(Source source, Node context, String... argumentNames) throws IOException {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
91 final TestValueNode leftValueNode = new TestValueNode(6, source.createSection("6", 0, 1));
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
92 final TestValueNode rightValueNode = new TestValueNode(7, source.createSection("7", 4, 1));
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
93 final TestAdditionNode addNode = new TestAdditionNode(leftValueNode, rightValueNode, source.createSection("+", 2, 1));
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
94 final InstrumentationTestRootNode rootNode = new InstrumentationTestRootNode(addNode);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
95 final TruffleRuntime runtime = Truffle.getRuntime();
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
96 final CallTarget callTarget = runtime.createCallTarget(rootNode);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
97 return callTarget;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
98 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
99
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
100 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
101 protected Object findExportedSymbol(Object context, String globalName, boolean onlyExplicit) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
102 return null;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
103 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
104
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
105 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
106 protected Object getLanguageGlobal(Object context) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
107 return null;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
108 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
109
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
110 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
111 protected boolean isObjectOfLanguage(Object object) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
112 return false;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
113 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
114
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
115 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
116 protected Visualizer getVisualizer() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
117 return null;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
118 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
119
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
120 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
121 protected boolean isInstrumentable(Node node) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
122 return node instanceof TestAdditionNode || node instanceof TestValueNode;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
123 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
124
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
125 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
126 protected WrapperNode createWrapperNode(Node node) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
127 if (isInstrumentable(node)) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
128 return new ToolTestWrapperNode((ToolTestLangNode) node);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
129 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
130 return null;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
131 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
132
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
133 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
134 protected Object evalInContext(Source source, Node node, MaterializedFrame mFrame) throws IOException {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
135 return null;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
136 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
137
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
138 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
139 protected Object createContext(Env env) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
140 return null;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
141 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
142 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
143
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
144 static final class TestASTProber implements ASTProber {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
145
22253
ffb52d4126bb Truffle/Instrumentation: change signature of ASTProber to apply only to RootNodes
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22244
diff changeset
146 public void probeAST(final Instrumenter instrumenter, RootNode startNode) {
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
147 startNode.accept(new NodeVisitor() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
148
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
149 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
150 public boolean visit(Node node) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
151 if (node instanceof ToolTestLangNode) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
152
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
153 final ToolTestLangNode testNode = (ToolTestLangNode) node;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
154
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
155 if (node instanceof TestValueNode) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
156 instrumenter.probe(testNode).tagAs(ToolTestTag.VALUE_TAG, null);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
157
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
158 } else if (node instanceof TestAdditionNode) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
159 instrumenter.probe(testNode).tagAs(ToolTestTag.ADD_TAG, null);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
160
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
161 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
162 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
163 return true;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
164 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
165 });
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
166 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
167 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
168
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
169 abstract static class ToolTestLangNode extends Node {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
170 public abstract Object execute(VirtualFrame vFrame);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
171
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
172 protected ToolTestLangNode(SourceSection ss) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
173 super(ss);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
174 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
175 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
176
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
177 @NodeInfo(cost = NodeCost.NONE)
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
178 static class ToolTestWrapperNode extends ToolTestLangNode implements WrapperNode {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
179 @Child private ToolTestLangNode child;
22226
c896a8e70777 Truffle/Instrumentation:
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22223
diff changeset
180 @Child private EventHandlerNode eventHandlerNode;
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
181
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
182 public ToolTestWrapperNode(ToolTestLangNode child) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
183 super(null);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
184 assert !(child instanceof ToolTestWrapperNode);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
185 this.child = child;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
186 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
187
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
188 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
189 public String instrumentationInfo() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
190 return "Wrapper node for testing";
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
191 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
192
22226
c896a8e70777 Truffle/Instrumentation:
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22223
diff changeset
193 public void insertEventHandlerNode(EventHandlerNode eventHandler) {
c896a8e70777 Truffle/Instrumentation:
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22223
diff changeset
194 this.eventHandlerNode = eventHandler;
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
195 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
196
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
197 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
198 public Probe getProbe() {
22226
c896a8e70777 Truffle/Instrumentation:
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22223
diff changeset
199 return eventHandlerNode.getProbe();
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
200 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
201
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
202 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
203 public Node getChild() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
204 return child;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
205 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
206
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
207 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
208 public Object execute(VirtualFrame vFrame) {
22226
c896a8e70777 Truffle/Instrumentation:
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22223
diff changeset
209 eventHandlerNode.enter(child, vFrame);
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
210 Object result;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
211 try {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
212 result = child.execute(vFrame);
22226
c896a8e70777 Truffle/Instrumentation:
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22223
diff changeset
213 eventHandlerNode.returnValue(child, vFrame, result);
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
214 } catch (Exception e) {
22226
c896a8e70777 Truffle/Instrumentation:
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents: 22223
diff changeset
215 eventHandlerNode.returnExceptional(child, vFrame, e);
22223
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
216 throw (e);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
217 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
218 return result;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
219 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
220 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
221
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
222 /**
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
223 * A simple node for our test language to store a value.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
224 */
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
225 static class TestValueNode extends ToolTestLangNode {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
226 private final int value;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
227
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
228 public TestValueNode(int value, SourceSection s) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
229 super(s);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
230 this.value = value;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
231 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
232
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
233 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
234 public Object execute(VirtualFrame vFrame) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
235 return new Integer(this.value);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
236 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
237 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
238
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
239 /**
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
240 * A node for our test language that adds up two {@link TestValueNode}s.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
241 */
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
242 static class TestAdditionNode extends ToolTestLangNode {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
243 @Child private ToolTestLangNode leftChild;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
244 @Child private ToolTestLangNode rightChild;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
245
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
246 public TestAdditionNode(TestValueNode leftChild, TestValueNode rightChild, SourceSection s) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
247 super(s);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
248 this.leftChild = insert(leftChild);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
249 this.rightChild = insert(rightChild);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
250 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
251
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
252 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
253 public Object execute(VirtualFrame vFrame) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
254 return new Integer(((Integer) leftChild.execute(vFrame)).intValue() + ((Integer) rightChild.execute(vFrame)).intValue());
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
255 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
256 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
257
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
258 /**
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
259 * Truffle requires that all guest languages to have a {@link RootNode} which sits atop any AST
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
260 * of the guest language. This is necessary since creating a {@link CallTarget} is how Truffle
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
261 * completes an AST. The root nodes serves as our entry point into a program.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
262 */
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
263 static class InstrumentationTestRootNode extends RootNode {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
264 @Child private ToolTestLangNode body;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
265
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
266 /**
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
267 * This constructor emulates the global machinery that applies registered probers to every
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
268 * newly created AST. Global registry is not used, since that would interfere with other
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
269 * tests run in the same environment.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
270 */
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
271 public InstrumentationTestRootNode(ToolTestLangNode body) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
272 super(ToolTestLang.class, null, null);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
273 this.body = body;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
274 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
275
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
276 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
277 public Object execute(VirtualFrame vFrame) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
278 return body.execute(vFrame);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
279 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
280
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
281 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
282 public boolean isCloningAllowed() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
283 return true;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
284 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
285
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
286 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
287
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
288 /**
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
289 * Truffle requires that all guest languages to have a {@link RootNode} which sits atop any AST
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
290 * of the guest language. This is necessary since creating a {@link CallTarget} is how Truffle
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
291 * completes an AST. The root nodes serves as our entry point into a program.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
292 */
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
293 static class TestRootNode extends RootNode {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
294 @Child private ToolTestLangNode body;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
295
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
296 final Instrumenter instrumenter;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
297
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
298 /**
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
299 * This constructor emulates the global machinery that applies registered probers to every
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
300 * newly created AST. Global registry is not used, since that would interfere with other
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
301 * tests run in the same environment.
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
302 */
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
303 public TestRootNode(ToolTestLangNode body, Instrumenter instrumenter) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
304 super(ToolTestLang.class, null, null);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
305 this.instrumenter = instrumenter;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
306 this.body = body;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
307 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
308
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
309 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
310 public Object execute(VirtualFrame vFrame) {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
311 return body.execute(vFrame);
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
312 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
313
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
314 @Override
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
315 public boolean isCloningAllowed() {
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
316 return true;
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
317 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
318 }
964e789e17f7 Truffle/Tools; rewrite tests for simple counting tools, e.g. CoverageTracker
Michael Van De Vanter <michael.van.de.vanter@oracle.com>
parents:
diff changeset
319 }