Revision: 583
http://rpy.svn.sourceforge.net/rpy/?rev=583&view=rev
Author: lgautier
Date: 2008-07-21 16:07:33 +0000 (Mon, 21 Jul 2008)
Log Message:
-----------
- Test for the bug fix in rinterface
- features for switching debugging options (commented out)
Modified Paths:
--------------
branches/rpy_nextgen/rpy/rinterface/tests/test_SexpVector.py
branches/rpy_nextgen/setup.py
Modified: branches/rpy_nextgen/rpy/rinterface/tests/test_SexpVector.py
===================================================================
--- branches/rpy_nextgen/rpy/rinterface/tests/test_SexpVector.py
2008-07-21 16:05:10 UTC (rev 582)
+++ branches/rpy_nextgen/rpy/rinterface/tests/test_SexpVector.py
2008-07-21 16:07:33 UTC (rev 583)
@@ -196,6 +196,13 @@
letters_R[0] = ri.SexpVector(["z", ], ri.STRSXP)
self.assertTrue(letters_R[0] == "z")
+ def testMissingRPreserveObjectBug(self):
+ rgc = ri.baseNameSpaceEnv['gc']
+ xx = range(100000)
+ x = ri.SexpVector(xx, ri.INTSXP)
+ rgc()
+ self.assertEquals(0, x[0])
+
def suite():
suite = unittest.TestLoader().loadTestsFromTestCase(SexpVectorTestCase)
return suite
Modified: branches/rpy_nextgen/setup.py
===================================================================
--- branches/rpy_nextgen/setup.py 2008-07-21 16:05:10 UTC (rev 582)
+++ branches/rpy_nextgen/setup.py 2008-07-21 16:07:33 UTC (rev 583)
@@ -99,6 +99,12 @@
define_macros.append(('R_INTERFACE_PTRS', 1))
define_macros.append(('CSTACK_DEFNS', 1))
+
+ # defines for debugging
+ #define_macros.append(('RPY_DEBUG_PRESERVE', 1))
+ #define_macros.append(('RPY_DEBUG_PROMISE', 1))
+ #define_macros.append(('RPY_DEBUG_OBJECTINIT', 1))
+
rinterface_ext = Extension(
pack_name + '.rinterface.rinterface',
@@ -111,6 +117,7 @@
library_dirs = r_libs,
define_macros = define_macros,
runtime_library_dirs = r_libs,
+ #extra_compile_args=['-O0', '-g'],
extra_link_args = get_rconfig(RHOME, '--ldflags') +\
get_rconfig(RHOME, 'LAPACK_LIBS') +\
get_rconfig(RHOME, 'BLAS_LIBS'),
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
rpy-list mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/rpy-list
