[truffle] Implement and document running on the SubstrateVM

Author: pmurias

README.pod

@@ -147,4 +147,20 @@ That's passed to nqp::runtruffle.
 Inside the TruffleCompiler (src/vm/jvm/runtime/org/perl6/nqp/truffle/TruffleCompiler.java) that intermediate form is turned into the Truffle tree nodes.
 Those are then interpreted and JITed by the Truffle framework.
 
+=head3 Running on SubstrateVM
+
+To build the truffle6 vm: (Also see https://github.com/oracle/graal/issues/540)
+
+make nqp-truffle-impl.jar
+mkdir <graalvm_root>/jre/languages/nqp
+cp -r nqp-truffle-impl.jar <graalvm_root>/jre/languages/nqp
+cp -r src/vm/jvm/native-image.properties <graalvm_root>/jre/languages/nqp
+native-image --language:nqp org.perl6.nqp.truffle.svm.Truffle6
+cp org.perl6.nqp.truffle.svm.Truffle6 truffle6
+
+To run it
+
+./nqp-j nqp-truffle.nqp --target=bytecode --output=literals.truffle6 t/nqp/001-literals.nqp
+./truffle6 literals.truffle6
+
 =cut

src/vm/jvm/native-image.properties

@@ -0,0 +1,3 @@
+ImageName = truffle6
+Requires = tool:truffle
+Args = -H:MaxRuntimeCompileMethods=100000

src/vm/jvm/runtime/org/perl6/nqp/truffle/svm/Truffle6.java

@@ -0,0 +1,23 @@
+package org.perl6.nqp.truffle.svm;
+
+import java.io.PrintStream;
+import org.perl6.nqp.truffle.ByteCodeRunnerGen;
+
+public class Truffle6 {
+    public static void help(PrintStream stream) {
+        stream.println("USAGE: truffle6 input.truffle6 [program args]");
+        stream.println("       truffle6 --help");
+        stream.println("    --help display this message");
+    }
+
+    public static void main(String[] args) {
+        if (args.length < 1) {
+            System.err.println("ERROR: Missing input file.");
+            help(System.err);
+        } else if (args[0] == "--help") {
+            help(System.out);
+        } else {
+            (new ByteCodeRunnerGen()).runByteCode(args[0]);
+        }
+    }
+}

tools/build/Makefile-JVM.in

@@ -20,6 +20,13 @@ RUNTIME_JAVAS = \
   src/vm/jvm/runtime/org/perl6/nqp/sixmodel/reprs/*.java \
   src/vm/jvm/runtime/org/perl6/nqp/tools/*.java \
 
+TRUFFLE6_JAVAS = \
+  src/vm/jvm/runtime/org/perl6/nqp/truffle/runtime/*.java \
+  src/vm/jvm/runtime/org/perl6/nqp/truffle/nodes/*.java \
+  src/vm/jvm/runtime/org/perl6/nqp/truffle/nodes/*/*.java \
+  src/vm/jvm/runtime/org/perl6/nqp/truffle/*.java \
+  src/vm/jvm/runtime/org/perl6/nqp/truffle/svm/*.java \
+
 DSL_JAVAS = src/vm/jvm/dsl/org/perl6/nqp/dsl/*.java
 
 DSL_JAR = dsl-processor.jar
@@ -34,6 +41,8 @@ JNA = @jna@
 TRUFFLE_API = @truffleapi@
 TRUFFLE_DSL_PROCESSOR = @truffledslprocessor@
 THIRDPARTY_JARS = $(ASM)@cpsep@$(ASMTREE)@cpsep@$(JLINE)@cpsep@$(JNA)@cpsep@$(TRUFFLE_API)@cpsep@$(TRUFFLE_DSL_PROCESSOR)
+THIRDPARY_TRUFFLE6_JARS = $(TRUFFLE_API)@cpsep@$(TRUFFLE_DSL_PROCESSOR)
+
 J_STAGE0_DIR = src/vm/jvm/stage0
 J_STAGE1_DIR = $(JVM_BUILD_DIR)/stage1
 J_STAGE2_DIR = $(JVM_BUILD_DIR)/stage2
@@ -311,6 +320,12 @@ $(P5QREGEX_JAR): $(ALL_OUTPUT) $(P5QREGEX_SOURCES)
 	.@slash@$(J_RUNNER) --target=jar --output=$(P5QREGEX_JAR) \
 	    $(J_STAGE2_DIR)/$(P5QREGEX_COMBINED)
 
+
+nqp-truffle-impl.jar: $(TRUFFLE6_JAVAS) $(DSL_JAR)
+	$(MKPATH) bin-truffle6
+	$(JAVAC) -source 1.8 -cp $(THIRDPARY_TRUFFLE6_JARS):$(DSL_JAR) -g -d bin-truffle6 -encoding UTF8 $(TRUFFLE6_JAVAS)
+	$(JAR) cfe0 nqp-truffle-impl.jar org.perl6.nqp.truffle.svm.Truffle6  -C bin-truffle6/ .
+
 $(TRUFFLE_JAR): $(ALL_OUTPUT) $(J_RUNNER) $(P5QREGEX_JAR) src/vm/jvm/Truffle.nqp
 	.@slash@$(J_RUNNER) --target=jar --output=$(TRUFFLE_JAR) src/vm/jvm/Truffle.nqp