Mercurial > hg > graal-jvmci-8

comparison graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/nodes/ReadFunctionNode.java @ 12752:71991b7a0f14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
SL: Enhanced SimpleLanguage with support for if statements, function calls, function caching + inlining and builtins.
author Christian Humer <christian.humer@gmail.com>
date Mon, 11 Nov 2013 21:34:44 +0100
parents
children d4c6dd07be76
comparison
equal deleted inserted replaced
12712:882a0aadfed6 12752:71991b7a0f14
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.CompilerDirectives.CompilationFinal;
27 import com.oracle.truffle.api.frame.*;
28 import com.oracle.truffle.sl.runtime.*;
29
30 public final class ReadFunctionNode extends TypedNode {
31
32 private final SLFunctionRegistry registry;
33 private final String name;
34
35 @CompilationFinal private boolean seenInvalidFunction;
36
37 public ReadFunctionNode(SLFunctionRegistry registry, String name) {
38 this.registry = registry;
39 this.name = name;
40 }
41
42 @Override
43 public Object executeGeneric(VirtualFrame frame) {
44 return executeCallTarget(frame);
45 }
46
47 @Override
48 public CallTarget executeCallTarget(VirtualFrame frame) {
49 CallTarget target = registry.lookup(name);
50 if (target != null) {
51 return target;
52 }
53 if (!seenInvalidFunction) {
54 CompilerDirectives.transferToInterpreter();
55 seenInvalidFunction = true;
56 }
57 if (seenInvalidFunction) {
58 throw new RuntimeException("Function with name '" + name + "' not found.");
59 }
60 return null;
61 }
62
63 }