[rkward-cvs] SF.net SVN: rkward:[2830] trunk/rkward/tests/all_tests.R

[tfry at users.sourceforge.net]

Revision: 2830
          http://rkward.svn.sourceforge.net/rkward/?rev=2830&view=rev
Author:   tfry
Date:     2010-04-21 11:25:19 +0000 (Wed, 21 Apr 2010)

Log Message:
-----------
Change order of output so results are at bottom. Add R.version info.

Modified Paths:
--------------
    trunk/rkward/tests/all_tests.R

Modified: trunk/rkward/tests/all_tests.R
===================================================================
--- trunk/rkward/tests/all_tests.R	2010-04-21 11:04:29 UTC (rev 2829)
+++ trunk/rkward/tests/all_tests.R	2010-04-21 11:25:19 UTC (rev 2830)
@@ -5,6 +5,10 @@
 
 plugintest.outfile <- 'make_plugintests.txt'
 sink (file = plugintest.outfile, append=FALSE, type="output", split=TRUE)
+cat ("R-Version:\n")
+print (R.version)
+cat ("\n\nInstalled packages:\n")
+print (subset(installed.packages(),select=c(LibPath,Version)))
 
 allresults <- new ("RKTestResult")
 for (testsuite in testsuites) {
@@ -16,8 +20,6 @@
 cat ("\n\nOverall results:\n")
 print (allresults)
 
-cat ("\n\nInstalled packages:\n")
-print (subset(installed.packages(),select=c(LibPath,Version)))
 sink()
 
 cat (paste ("\n\nThese output are saved in: ", paste (getwd(), plugintest.outfile, sep=.Platform$file.sep), ".\nIf needed, send them to rkward-devel at lists.sourceforge.net\n", sep=""))


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.