comparison graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/nodes/call/SLUninitializedCallNode.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
children 533b21375e58
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.*;
26 import com.oracle.truffle.api.frame.*;
27 import com.oracle.truffle.sl.runtime.*;
28
29 final class SLUninitializedCallNode extends SLAbstractDispatchNode {
30
31 @Override
32 protected Object executeCall(VirtualFrame frame, SLFunction function, SLArguments arguments) {
33 CompilerDirectives.transferToInterpreterAndInvalidate();
34
35 SLAbstractDispatchNode cur = this;
36 int depth = 0;
37 while (cur.getParent() instanceof SLAbstractDispatchNode) {
38 cur = (SLAbstractDispatchNode) cur.getParent();
39 depth++;
40 }
41 SLCallNode callNode = (SLCallNode) cur.getParent();
42
43 SLAbstractDispatchNode specialized;
44 if (depth < INLINE_CACHE_SIZE) {
45 SLAbstractDispatchNode next = new SLUninitializedCallNode();
46 SLAbstractDispatchNode direct = new SLInlinableDirectDispatchNode(next, function);
47 specialized = replace(direct);
48 } else {
49 SLAbstractDispatchNode generic = new SLGenericDispatchNode();
50 specialized = callNode.dispatchNode.replace(generic);
51 }
52
53 return specialized.executeCall(frame, function, arguments);
54 }
55 }