Mercurial > hg > truffle

comparison truffle/com.oracle.truffle.api.dsl.test/src/com/oracle/truffle/api/dsl/test/SpecializationGroupingTest.java @ 21951:9c8c0937da41

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Moving all sources into truffle subdirectory
author Jaroslav Tulach <jaroslav.tulach@oracle.com>
date Wed, 17 Jun 2015 10:58:08 +0200
parents graal/com.oracle.truffle.api.dsl.test/src/com/oracle/truffle/api/dsl/test/SpecializationGroupingTest.java@f4792a544170
children dc83cc1f94f2
comparison
equal deleted inserted replaced
21950:2a5011c7e641 21951:9c8c0937da41
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.dsl.test;
24
25 import org.junit.*;
26
27 import com.oracle.truffle.api.*;
28 import com.oracle.truffle.api.dsl.*;
29 import com.oracle.truffle.api.dsl.test.SpecializationGroupingTestFactory.TestElseConnectionBug1Factory;
30 import com.oracle.truffle.api.dsl.test.SpecializationGroupingTestFactory.TestElseConnectionBug2Factory;
31 import com.oracle.truffle.api.dsl.test.TypeSystemTest.ValueNode;
32 import com.oracle.truffle.api.frame.*;
33 import com.oracle.truffle.api.nodes.*;
34
35 /**
36 * Tests execution counts of guards. While we do not make guarantees for guard invocation except for
37 * their execution order our implementation reduces the calls to guards as much as possible for the
38 * generic case.
39 */
40 public class SpecializationGroupingTest {
41
42 @Test
43 public void testElseConnectionBug1() {
44 CallTarget target = TestHelper.createCallTarget(TestElseConnectionBug1Factory.create(new GenericInt()));
45 Assert.assertEquals(42, target.call());
46 }
47
48 @SuppressWarnings("unused")
49 @NodeChild(value = "genericChild", type = GenericInt.class)
50 public abstract static class TestElseConnectionBug1 extends ValueNode {
51
52 @Specialization(rewriteOn = {SlowPathException.class}, guards = "isInitialized(value)")
53 public int do1(int value) throws SlowPathException {
54 throw new SlowPathException();
55 }
56
57 @Specialization(contains = "do1", guards = "isInitialized(value)")
58 public int do2(int value) {
59 return value == 42 ? value : 0;
60 }
61
62 @Specialization(guards = "!isInitialized(value)")
63 public Object do3(int value) {
64 throw new AssertionError();
65 }
66
67 boolean isInitialized(int value) {
68 return true;
69 }
70 }
71
72 public static final class GenericInt extends ValueNode {
73
74 @Override
75 public Object execute(VirtualFrame frame) {
76 return executeInt(frame);
77 }
78
79 @Override
80 public int executeInt(VirtualFrame frame) {
81 return 42;
82 }
83
84 }
85
86 @Test
87 public void testElseConnectionBug2() {
88 TestHelper.assertRuns(TestElseConnectionBug2Factory.getInstance(), new Object[]{42}, new Object[]{42});
89 }
90
91 @SuppressWarnings("unused")
92 @NodeChild
93 public abstract static class TestElseConnectionBug2 extends ValueNode {
94
95 @Specialization(guards = "guard0(value)")
96 public int do1(int value) {
97 throw new AssertionError();
98 }
99
100 @Specialization(guards = "guard1(value)")
101 public int do2(int value) {
102 throw new AssertionError();
103 }
104
105 @Specialization(guards = "!guard0(value)")
106 public int do3(int value) {
107 return value;
108 }
109
110 boolean guard0(int value) {
111 return false;
112 }
113
114 boolean guard1(int value) {
115 return false;
116 }
117 }
118
119 }