[rkward-cvs] SF.net SVN: rkward:[3117] trunk/rkward/rkward/rbackend/rembedinternal.cpp

[tfry at users.sourceforge.net]

Revision: 3117
          http://rkward.svn.sourceforge.net/rkward/?rev=3117&view=rev
Author:   tfry
Date:     2010-10-08 16:56:32 +0000 (Fri, 08 Oct 2010)

Log Message:
-----------
restore C stack limit after saving

Modified Paths:
--------------
    trunk/rkward/rkward/rbackend/rembedinternal.cpp

Modified: trunk/rkward/rkward/rbackend/rembedinternal.cpp
===================================================================
--- trunk/rkward/rkward/rbackend/rembedinternal.cpp	2010-10-07 16:46:53 UTC (rev 3116)
+++ trunk/rkward/rkward/rbackend/rembedinternal.cpp	2010-10-08 16:56:32 UTC (rev 3117)
@@ -239,8 +239,10 @@
 	RK_TRACE (RBACKEND);
 
 	// we're probably in a signal handler, and the stack base has changed.
+	uintptr_t old_lim = R_CStackLimit;
 	R_CStackLimit = (uintptr_t)-1;
 	if (R_DirtyImage) R_SaveGlobalEnvToFile (RKCommonFunctions::getUseableRKWardSavefileName ("rkward_recover", ".RData").toLocal8Bit ());
+	R_CStackLimit = old_lim;
 }
 
 QStringList charPArrayToQStringList (const char** chars, int count) {


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