From 6a2d2601fc1ebfdfaa74ce00943f7128790a994f Mon Sep 17 00:00:00 2001
From: Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
Date: Tue, 26 Feb 2008 01:39:59 +0100
Subject: [PATCH] Release all events left upon Simulator::Destroy

---
 src/simulator/simulator.cc | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/src/simulator/simulator.cc b/src/simulator/simulator.cc
index 35b774e5e..4514feafd 100644
--- a/src/simulator/simulator.cc
+++ b/src/simulator/simulator.cc
@@ -124,6 +124,10 @@ SimulatorPrivate::~SimulatorPrivate ()
           ev->Invoke ();
         }
     }
+  while (!m_events->IsEmpty ())
+    {
+      EventId next = m_events->RemoveNext ();
+    }
   delete m_events;
   m_events = (Scheduler *)0xdeadbeaf;
 }
@@ -1059,7 +1063,11 @@ SimulatorTests::RunTests (void)
 
   Simulator::Run ();
   Simulator::Destroy ();
-  
+
+  Simulator::Schedule (Seconds (10.0), &SimulatorTests::baz1, this, 0);
+  Simulator::StopAt (Seconds (1.0));
+  Simulator::Run ();
+  Simulator::Destroy ();
 
   return result;
 }