Mercurial > hg > truffle

annotate truffle/com.oracle.truffle.api/src/com/oracle/truffle/api/impl/DefaultIndirectCallNode.java @ 22157:dc83cc1f94f2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Using fully qualified imports
author Jaroslav Tulach <jaroslav.tulach@oracle.com>
date Wed, 16 Sep 2015 11:33:22 +0200
parents 9c8c0937da41
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
15093
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
1 /*
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
2 * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
4 *
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
5 * This code is free software; you can redistribute it and/or modify it
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
6 * under the terms of the GNU General Public License version 2 only, as
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
7 * published by the Free Software Foundation. Oracle designates this
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
8 * particular file as subject to the "Classpath" exception as provided
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
9 * by Oracle in the LICENSE file that accompanied this code.
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
10 *
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
11 * This code is distributed in the hope that it will be useful, but WITHOUT
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
14 * version 2 for more details (a copy is included in the LICENSE file that
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
15 * accompanied this code).
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
16 *
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
17 * You should have received a copy of the GNU General Public License version
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
18 * 2 along with this work; if not, write to the Free Software Foundation,
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
20 *
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
22 * or visit www.oracle.com if you need additional information or have any
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
23 * questions.
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
24 */
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
25 package com.oracle.truffle.api.impl;
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
26
22157
dc83cc1f94f2 Using fully qualified imports
Jaroslav Tulach <jaroslav.tulach@oracle.com>
parents: 21951
diff changeset
27 import com.oracle.truffle.api.CallTarget;
dc83cc1f94f2 Using fully qualified imports
Jaroslav Tulach <jaroslav.tulach@oracle.com>
parents: 21951
diff changeset
28 import com.oracle.truffle.api.Truffle;
dc83cc1f94f2 Using fully qualified imports
Jaroslav Tulach <jaroslav.tulach@oracle.com>
parents: 21951
diff changeset
29 import com.oracle.truffle.api.frame.Frame;
dc83cc1f94f2 Using fully qualified imports
Jaroslav Tulach <jaroslav.tulach@oracle.com>
parents: 21951
diff changeset
30 import com.oracle.truffle.api.frame.FrameInstance;
dc83cc1f94f2 Using fully qualified imports
Jaroslav Tulach <jaroslav.tulach@oracle.com>
parents: 21951
diff changeset
31 import com.oracle.truffle.api.frame.VirtualFrame;
dc83cc1f94f2 Using fully qualified imports
Jaroslav Tulach <jaroslav.tulach@oracle.com>
parents: 21951
diff changeset
32 import com.oracle.truffle.api.nodes.IndirectCallNode;
dc83cc1f94f2 Using fully qualified imports
Jaroslav Tulach <jaroslav.tulach@oracle.com>
parents: 21951
diff changeset
33 import com.oracle.truffle.api.nodes.Node;
15093
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
34
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
35 /**
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
36 * This is runtime specific API. Do not use in a guest language.
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
37 */
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
38 final class DefaultIndirectCallNode extends IndirectCallNode {
16697
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
39 @Override
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
40 public Object call(final VirtualFrame frame, final CallTarget target, Object[] arguments) {
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
41 DefaultTruffleRuntime truffleRuntime = (DefaultTruffleRuntime) Truffle.getRuntime();
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
42 final CallTarget currentCallTarget = truffleRuntime.getCurrentFrame().getCallTarget();
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
43 FrameInstance frameInstance = new FrameInstance() {
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
44 public Frame getFrame(FrameAccess access, boolean slowPath) {
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
45 return frame;
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
46 }
15093
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
47
16697
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
48 public boolean isVirtualFrame() {
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
49 return false;
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
50 }
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
51
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
52 public Node getCallNode() {
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
53 return DefaultIndirectCallNode.this;
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
54 }
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
55
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
56 public CallTarget getCallTarget() {
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
57 return currentCallTarget;
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
58 }
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
59 };
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
60 truffleRuntime.pushFrame(frameInstance);
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
61 try {
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
62 return target.call(arguments);
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
63 } finally {
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
64 truffleRuntime.popFrame();
5f9c3335edd7 Truffle: fix stack trace for indirect calls with default runtime
Andreas Woess <andreas.woess@jku.at>
parents: 15093
diff changeset
65 }
15093
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
66 }
5634b199c4da Truffle: API-change: renamed CallNode to DirectCallNode and added IndirectCallNode.
Christian Humer <christian.humer@gmail.com>
parents:
diff changeset
67 }