From c4ff7f32e34e963683d1e8b27e0c8dbe0ebcf441 Mon Sep 17 00:00:00 2001
From: Arne Goedeke <el@laramies.com>
Date: Wed, 12 Jun 2013 02:45:58 +0200
Subject: [PATCH] missing UNSET_ONERROR

---
 src/object.c | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/object.c b/src/object.c
index 3cf37f5a1c..38be7a5ab7 100644
--- a/src/object.c
+++ b/src/object.c
@@ -831,8 +831,12 @@ PMOD_EXPORT void destruct_object (struct object *o, enum object_destruct_reason
     else fputs(", is destructed\n", stderr);
   }
 #endif
-  if( !(p = o->prog) )
+  if( !(p = o->prog) ) {
+#ifdef PIKE_DEBUG
+      UNSET_ONERROR(uwp);
+#endif
       return;
+  }
   add_ref( o );
   if( object_has_destroy( o ) )
   {
-- 
GitLab