[rkward-cvs] SF.net SVN: rkward:[2868] trunk/rkward/tests

[tfry at users.sourceforge.net]

Revision: 2868
          http://rkward.svn.sourceforge.net/rkward/?rev=2868&view=rev
Author:   tfry
Date:     2010-05-19 09:16:15 +0000 (Wed, 19 May 2010)

Log Message:
-----------
Add test for https://sourceforge.net/tracker/?func=detail&atid=459007&aid=3002439&group_id=50231

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

Added Paths:
-----------
    trunk/rkward/tests/rkward_application_tests_strange_object.RData

Modified: trunk/rkward/tests/rkward_application_tests.R
===================================================================
--- trunk/rkward/tests/rkward_application_tests.R	2010-05-18 10:07:51 UTC (rev 2867)
+++ trunk/rkward/tests/rkward_application_tests.R	2010-05-19 09:16:15 UTC (rev 2868)
@@ -53,6 +53,16 @@
 			rktest.initializeEnvironment ()	# restore options
 
 			rk.graph.on (device.type="SVG", width=300); plot (1, 1); rk.graph.off ()
+		}),
+		new ("RKTest", id="no_crash_on_strange_objects", call=function () {
+			# This object was created by library (XML) v. 3.1-0
+			# xmlTreeParse ("<log><description>An unclosed quote\"</description></log>")
+			#
+			# In R 2.11.0, str (x) produces an error "subecript out of bounds"
+			# The main concern is that we should handle this object gracefully, i.e. do not crash while syncing it.
+			load ("../rkward_application_tests_strange_object.RData")
+			rk.sync.global ()
+			rk.sync (x)
 		})
 	# postCalls are run *after* all tests. Use this to clean up
 	), postCalls = list (

Added: trunk/rkward/tests/rkward_application_tests_strange_object.RData
===================================================================
(Binary files differ)


Property changes on: trunk/rkward/tests/rkward_application_tests_strange_object.RData
___________________________________________________________________
Added: svn:mime-type
   + application/octet-stream


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