view graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/SLScript.java @ 12752:71991b7a0f14

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 69d2e4baa215
line wrap: on
line source

/*
 * Copyright (c) 2012, 2012, Oracle and/or its affiliates. All rights reserved.
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 *
 * This code is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License version 2 only, as
 * published by the Free Software Foundation.
 *
 * This code is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 * version 2 for more details (a copy is included in the LICENSE file that
 * accompanied this code).
 *
 * You should have received a copy of the GNU General Public License version
 * 2 along with this work; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
 *
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
 * or visit www.oracle.com if you need additional information or have any
 * questions.
 */
package com.oracle.truffle.sl;

import java.io.*;

import javax.script.*;

import com.oracle.truffle.api.*;
import com.oracle.truffle.sl.parser.*;
import com.oracle.truffle.sl.runtime.*;

public final class SLScript {

    private final SLContext context;
    private final CallTarget main;

    private SLScript(SLContext context, CallTarget mainFunction) {
        this.context = context;
        this.main = mainFunction;
    }

    public SLContext getContext() {
        return context;
    }

    public CallTarget getMain() {
        return main;
    }

    public Object run(Object... arguments) {
        return main.call(null, new SLArguments(arguments));
    }

    @Override
    public String toString() {
        return main.toString();
    }

    public static SLScript create(SLContext context, String input) throws ScriptException {
        return create(context, new ByteArrayInputStream(input.getBytes()));

    }

    public static SLScript create(SLContext context, InputStream input) throws ScriptException {
        SLNodeFactory factory = new SLNodeFactory(context);
        Parser parser = new Parser(new Scanner(input), factory);
        factory.setParser(parser);
        factory.setSource(new Source() {
            public String getName() {
                return "Unknown";
            }

            public String getCode() {
                return null;
            }
        });
        String error = parser.ParseErrors();
        if (!error.isEmpty()) {
            throw new ScriptException(String.format("Error(s) parsing script: %s", error));
        }

        CallTarget main = context.getFunctionRegistry().lookup("main");
        if (main == null) {
            throw new ScriptException("No main function found.");
        }
        return new SLScript(context, main);
    }
}