comparison graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/nodes/SLRootNode.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/FunctionRootNode.java@40fd9958cdf5
children 739194d1e813
comparison
equal deleted inserted replaced
13760:a12017c18d5d 13761:7c418666c6c9
1 /*
2 * Copyright (c) 2012, 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;
24
25 import com.oracle.truffle.api.*;
26 import com.oracle.truffle.api.dsl.*;
27 import com.oracle.truffle.api.frame.*;
28 import com.oracle.truffle.api.nodes.*;
29 import com.oracle.truffle.sl.builtins.*;
30 import com.oracle.truffle.sl.nodes.controlflow.*;
31 import com.oracle.truffle.sl.nodes.local.*;
32 import com.oracle.truffle.sl.runtime.*;
33
34 public final class SLRootNode extends RootNode {
35
36 @Child private SLExpressionNode body;
37
38 private final SLExpressionNode uninitializedBody;
39 private final String name;
40 private final boolean inlineImmediatly;
41
42 public static RootCallTarget createFunction(String name, FrameDescriptor frameDescriptor, SLStatementNode body) {
43 SLFunctionBodyNode bodyContainer = new SLFunctionBodyNode(frameDescriptor, body);
44 SLRootNode root = new SLRootNode(frameDescriptor, bodyContainer, name, false);
45 return Truffle.getRuntime().createCallTarget(root);
46 }
47
48 public static RootCallTarget createBuiltin(SLContext context, NodeFactory<? extends SLBuiltinNode> factory, String name) {
49 int argumentCount = factory.getExecutionSignature().size();
50 SLExpressionNode[] arguments = new SLExpressionNode[argumentCount];
51 for (int i = 0; i < arguments.length; i++) {
52 arguments[i] = new SLReadArgumentNode(i);
53 }
54 SLBuiltinNode buitinBody = factory.createNode(arguments, context);
55 SLRootNode root = new SLRootNode(new FrameDescriptor(), buitinBody, name, true);
56 return Truffle.getRuntime().createCallTarget(root);
57 }
58
59 private SLRootNode(FrameDescriptor frameDescriptor, SLExpressionNode body, String name, boolean inlineImmediatly) {
60 super(null, frameDescriptor);
61 this.uninitializedBody = NodeUtil.cloneNode(body);
62 this.body = adoptChild(body);
63 this.name = name;
64 this.inlineImmediatly = inlineImmediatly;
65 }
66
67 @Override
68 public Object execute(VirtualFrame frame) {
69 return body.executeGeneric(frame);
70 }
71
72 public boolean isInlineImmediatly() {
73 return inlineImmediatly;
74 }
75
76 public SLExpressionNode inline() {
77 return NodeUtil.cloneNode(uninitializedBody);
78 }
79
80 public Node getUninitializedBody() {
81 return uninitializedBody;
82 }
83
84 @Override
85 public String toString() {
86 return "function " + name;
87 }
88 }