Mercurial > hg > graal-compiler
comparison graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/nodes/call/SLCallNode.java @ 13761:7c418666c6c9
Refactoring and cleanup of Simple Language (more to come soon)
author | Christian Wimmer <christian.wimmer@oracle.com> |
---|---|
date | Fri, 24 Jan 2014 18:16:24 -0800 |
parents | graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/nodes/CallNode.java@c2ed2ce2cfe0 |
children | b16ec83edc73 |
comparison
equal
deleted
inserted
replaced
13760:a12017c18d5d | 13761:7c418666c6c9 |
---|---|
1 /* | |
2 * Copyright (c) 2013, 2013, 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.sl.nodes.call; | |
24 | |
25 import com.oracle.truffle.api.frame.*; | |
26 import com.oracle.truffle.api.nodes.*; | |
27 import com.oracle.truffle.sl.nodes.*; | |
28 import com.oracle.truffle.sl.runtime.*; | |
29 | |
30 public final class SLCallNode extends SLExpressionNode { | |
31 | |
32 public static SLCallNode create(SLExpressionNode function, SLExpressionNode[] arguments) { | |
33 return new SLCallNode(function, arguments, new SLUninitializedCallNode()); | |
34 } | |
35 | |
36 @Child protected SLExpressionNode functionNode; | |
37 @Children protected final SLExpressionNode[] argumentNodes; | |
38 @Child protected SLAbstractDispatchNode dispatchNode; | |
39 | |
40 private SLCallNode(SLExpressionNode functionNode, SLExpressionNode[] argumentNodes, SLAbstractDispatchNode dispatchNode) { | |
41 this.functionNode = adoptChild(functionNode); | |
42 this.argumentNodes = adoptChildren(argumentNodes); | |
43 this.dispatchNode = adoptChild(dispatchNode); | |
44 } | |
45 | |
46 @Override | |
47 @ExplodeLoop | |
48 public Object executeGeneric(VirtualFrame frame) { | |
49 SLFunction function; | |
50 try { | |
51 function = functionNode.executeFunction(frame); | |
52 } catch (UnexpectedResultException e) { | |
53 throw new UnsupportedOperationException("Call to " + e.getMessage() + " not supported."); | |
54 } | |
55 | |
56 Object[] argumentValues = new Object[argumentNodes.length]; | |
57 for (int i = 0; i < argumentNodes.length; i++) { | |
58 argumentValues[i] = argumentNodes[i].executeGeneric(frame); | |
59 } | |
60 SLArguments arguments = new SLArguments(argumentValues); | |
61 | |
62 return dispatchNode.executeCall(frame, function, arguments); | |
63 } | |
64 } |