Mercurial > hg > truffle
comparison truffle/com.oracle.truffle.api/src/com/oracle/truffle/api/impl/DefaultIndirectCallNode.java @ 21951:9c8c0937da41
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/src/com/oracle/truffle/api/impl/DefaultIndirectCallNode.java@5f9c3335edd7 |
children | dc83cc1f94f2 |
comparison
equal
deleted
inserted
replaced
21950:2a5011c7e641 | 21951:9c8c0937da41 |
---|---|
1 /* | |
2 * Copyright (c) 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. Oracle designates this | |
8 * particular file as subject to the "Classpath" exception as provided | |
9 * by Oracle in the LICENSE file that accompanied this code. | |
10 * | |
11 * This code is distributed in the hope that it will be useful, but WITHOUT | |
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
14 * version 2 for more details (a copy is included in the LICENSE file that | |
15 * accompanied this code). | |
16 * | |
17 * You should have received a copy of the GNU General Public License version | |
18 * 2 along with this work; if not, write to the Free Software Foundation, | |
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. | |
20 * | |
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA | |
22 * or visit www.oracle.com if you need additional information or have any | |
23 * questions. | |
24 */ | |
25 package com.oracle.truffle.api.impl; | |
26 | |
27 import com.oracle.truffle.api.*; | |
28 import com.oracle.truffle.api.frame.*; | |
29 import com.oracle.truffle.api.nodes.*; | |
30 | |
31 /** | |
32 * This is runtime specific API. Do not use in a guest language. | |
33 */ | |
34 final class DefaultIndirectCallNode extends IndirectCallNode { | |
35 @Override | |
36 public Object call(final VirtualFrame frame, final CallTarget target, Object[] arguments) { | |
37 DefaultTruffleRuntime truffleRuntime = (DefaultTruffleRuntime) Truffle.getRuntime(); | |
38 final CallTarget currentCallTarget = truffleRuntime.getCurrentFrame().getCallTarget(); | |
39 FrameInstance frameInstance = new FrameInstance() { | |
40 public Frame getFrame(FrameAccess access, boolean slowPath) { | |
41 return frame; | |
42 } | |
43 | |
44 public boolean isVirtualFrame() { | |
45 return false; | |
46 } | |
47 | |
48 public Node getCallNode() { | |
49 return DefaultIndirectCallNode.this; | |
50 } | |
51 | |
52 public CallTarget getCallTarget() { | |
53 return currentCallTarget; | |
54 } | |
55 }; | |
56 truffleRuntime.pushFrame(frameInstance); | |
57 try { | |
58 return target.call(arguments); | |
59 } finally { | |
60 truffleRuntime.popFrame(); | |
61 } | |
62 } | |
63 } |