Ereigniszustellung und Hostgrenzen korrigieren und Change archivieren

crates/tb-cli/tests/compat.rs

@@ -265,6 +265,12 @@ impl tb_runtime::host::Host for EreignisHost {
         }
     }
 
+    fn warten(&mut self, deadline_ms: Option<u64>) -> Option<tb_runtime::host::Ereignis> {
+        if let Some(event) = self.next_event(false) {
+            return Some(event);
+        }
+        self.inner.warten(deadline_ms)
+    }
     fn jetzt_ms(&mut self) -> u64 {
         self.inner.jetzt_ms()
     }
@@ -318,6 +324,12 @@ impl tb_runtime::host::Host for UhrHost {
     fn next_event(&mut self, blockierend: bool) -> Option<tb_runtime::host::Ereignis> {
         self.inner.next_event(blockierend)
     }
+    fn warten(&mut self, deadline_ms: Option<u64>) -> Option<tb_runtime::host::Ereignis> {
+        if let Some(event) = self.next_event(false) {
+            return Some(event);
+        }
+        self.inner.warten(deadline_ms)
+    }
     fn jetzt_ms(&mut self) -> u64 {
         let jetzt = self.inner.jetzt_ms();
         self.inner.uhr_vorruecken(self.schritt_ms);