From e967c5e75f5342bb5893df530e1aca1c7eb83364 Mon Sep 17 00:00:00 2001
From: Florian Angerer <florian.angerer@oracle.com>
Date: Wed, 26 Jul 2017 17:04:08 +0200
Subject: [PATCH] Added mx command 'pta' for running the package test analyzer.

---
 mx.fastr/mx_fastr.py      |  1 +
 mx.fastr/mx_fastr_pkgs.py | 12 ++++++++++++
 2 files changed, 13 insertions(+)

diff --git a/mx.fastr/mx_fastr.py b/mx.fastr/mx_fastr.py
index 64c10a19d0..7f5fcea552 100644
--- a/mx.fastr/mx_fastr.py
+++ b/mx.fastr/mx_fastr.py
@@ -500,6 +500,7 @@ _commands = {
     'r-cp' : [r_classpath, '[options]'],
     'pkgtest' : [mx_fastr_pkgs.pkgtest, ['options']],
     'pkgtest-cmp' : [mx_fastr_pkgs.pkgtest_cmp, ['gnur_path fastr_path']],
+    'pta' : [mx_fastr_pkgs.pta, ['options']],
     'installpkgs' : [mx_fastr_pkgs.installpkgs, '[options]'],
     'mkgramrd': [mx_fastr_mkgramrd.mkgramrd, '[options]'],
     'rcopylib' : [mx_copylib.copylib, '[]'],
diff --git a/mx.fastr/mx_fastr_pkgs.py b/mx.fastr/mx_fastr_pkgs.py
index 0e7fe3319f..95a3694320 100644
--- a/mx.fastr/mx_fastr_pkgs.py
+++ b/mx.fastr/mx_fastr_pkgs.py
@@ -145,6 +145,18 @@ def _installpkgs(args, **kwargs):
         _ensure_R_on_PATH(env, os.path.dirname(_graalvm_rscript()))
         return mx.run([_graalvm_rscript(), script] + args, **kwargs)
 
+_pta_main_class = 'com.oracle.truffle.r.test.packages.analyzer.PTAMain'
+
+def _pta_project():
+    return 'com.oracle.truffle.r.test.packages.analyzer'
+
+def pta(args, **kwargs):
+    '''
+    Run analysis for package installation/testing results.
+    '''
+    vmArgs = mx.get_runtime_jvm_args(_pta_project())
+    vmArgs += [_pta_main_class]
+    mx.run_java(vmArgs + args)
 
 def pkgtest(args):
     '''
-- 
GitLab