comparison graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/SLMain.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/SimpleLanguage.java@69d2e4baa215
children b16ec83edc73
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;
24
25 import java.io.*;
26
27 import com.oracle.truffle.api.*;
28 import com.oracle.truffle.api.nodes.*;
29 import com.oracle.truffle.api.source.*;
30 import com.oracle.truffle.sl.parser.*;
31 import com.oracle.truffle.sl.runtime.*;
32
33 public class SLMain {
34
35 private static final Object[] NO_ARGUMENTS = new Object[0];
36
37 public static void main(String[] args) {
38 SourceManager sourceManager = new SourceManager();
39 Source source = sourceManager.get(args[0]);
40 SLContext context = new SLContext(sourceManager, System.err);
41 run(context, source, System.out, 1);
42 }
43
44 public static void run(SLContext context, Source source, PrintStream logOutput, int repeats) {
45 if (logOutput != null) {
46 logOutput.println("== running on " + Truffle.getRuntime().getName());
47 }
48
49 Parser.parseSL(context, source);
50 SLFunction main = context.getFunctionRegistry().lookup("main");
51 if (main.getCallTarget() == null) {
52 throw new SLException("No function main() found.");
53 }
54
55 if (logOutput != null) {
56 printScript(context, logOutput);
57 }
58 try {
59 for (int i = 0; i < repeats; i++) {
60 long start = System.nanoTime();
61 Object result = main.getCallTarget().call(null, new SLArguments(NO_ARGUMENTS));
62 long end = System.nanoTime();
63
64 if (result != SLNull.INSTANCE) {
65 context.getPrintOutput().println(result);
66 }
67 if (logOutput != null) {
68 logOutput.printf("== iteration %d: %.3f ms\n", (i + 1), (end - start) / 1000000.0);
69 }
70 }
71
72 } finally {
73 if (logOutput != null) {
74 printScript(context, logOutput);
75 }
76 }
77 }
78
79 private static void printScript(SLContext context, PrintStream logOutput) {
80 for (SLFunction function : context.getFunctionRegistry().getFunctions()) {
81 if (function.getCallTarget() != null) {
82 logOutput.println("=== function " + function.getName());
83 NodeUtil.printTree(logOutput, function.getCallTarget().getRootNode());
84 }
85 }
86 }
87 }