diff src/ov-mapper.cc @ 4987:bad4898b468e

[project @ 2004-09-10 20:24:05 by jwe]
author jwe
date Fri, 10 Sep 2004 20:24:06 +0000
parents 80842ad3f85c
children 48d0defe9445
line wrap: on
line diff
--- a/src/ov-mapper.cc
+++ b/src/ov-mapper.cc
@@ -287,6 +287,8 @@
     {
       if (args(0).is_defined ())
 	{
+	  unwind_protect::begin_frame ("mapper_func_eval");
+
 	  unwind_protect_ptr (curr_function);
 	  unwind_protect_ptr (curr_caller_function);
 
@@ -295,7 +297,7 @@
 
 	  retval = apply (args(0));
 
-	  unwind_protect::run ();
+	  unwind_protect::run_frame ("mapper_func_eval");
 	}
       else
 	::error ("%s: argument undefined", name().c_str ());