Revision: 471
http://rpy.svn.sourceforge.net/rpy/?rev=471&view=rev
Author: lgautier
Date: 2008-03-28 13:35:53 -0700 (Fri, 28 Mar 2008)
Log Message:
-----------
added test for out-of-bounds indexing
Modified Paths:
--------------
branches/rpy_nextgen/rpy/rinterface/tests/test_SexpVector.py
Modified: branches/rpy_nextgen/rpy/rinterface/tests/test_SexpVector.py
===================================================================
--- branches/rpy_nextgen/rpy/rinterface/tests/test_SexpVector.py
2008-03-28 20:29:17 UTC (rev 470)
+++ branches/rpy_nextgen/rpy/rinterface/tests/test_SexpVector.py
2008-03-28 20:35:53 UTC (rev 471)
@@ -102,6 +102,11 @@
for i, li in enumerate(myList):
self.assertEquals(i, myList[i][0])
+ def testGetItemOutOfBound(self):
+ myVec = rinterface.SexpVector([0, 1, 2, 3, 4, 5], rinterface.INTSXP)
+ self.assertRaises(IndexError, myVec.__getitem__, 10)
+ self.assertRaises(IndexError, myVec.__getitem__,
rinterface.R_LEN_T_MAX+1)
+
def testAssignItemDifferentType(self):
c_R = rinterface.globalEnv.get("c")
myVec = c_R(rinterface.SexpVector([0, 1, 2, 3, 4, 5],
rinterface.INTSXP))
@@ -165,6 +170,7 @@
def testAssignItemString(self):
letters_R = rinterface.globalEnv.get("letters")
#letters_R[0] = rinterface.SexpVector(["z", ], rinterface.STRSXP)
+ #import pdb; pdb.set_trace()
self.assertTrue(letters_R[0] == "z") #FIXME: segfault when assigning
value
def suite():
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://ad.doubleclick.net/clk;164216239;13503038;w?http://sf.net/marketplace
_______________________________________________
rpy-list mailing list
rpy-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/rpy-list
