dsl, output, tui: add tests, examples, root dispatchers

tui/src/tui_test.rs

@@ -0,0 +1,35 @@
+use crate::*;
+#[test] fn test_tui_engine () -> Usually<()> {
+    //use std::sync::{Arc, RwLock};
+    struct TestComponent(String);
+    impl Content<TuiOut> for TestComponent {
+        fn content (&self) -> impl Draw<TuiOut> + Layout<TuiOut> {
+            Some(self.0.as_str())
+        }
+    }
+    impl Handle<TuiIn> for TestComponent {
+        fn handle (&mut self, _from: &TuiIn) -> Perhaps<bool> {
+            Ok(None)
+        }
+    }
+    let engine = Tui::new()?;
+    engine.read().unwrap().exited.store(true, std::sync::atomic::Ordering::Relaxed);
+    let state = TestComponent("hello world".into());
+    let _state = std::sync::Arc::new(std::sync::RwLock::new(state));
+    //engine.run(&state)?;
+    Ok(())
+}
+//#[test] fn test_parse_key () {
+    ////use KeyModifiers as Mods;
+    //let _test = |x: &str, y|assert_eq!(KeyMatcher::new(x).build(), Some(Event::Key(y)));
+    ////test(":x",
+        ////KeyEvent::new(KeyCode::Char('x'), Mods::NONE));
+    ////test(":ctrl-x",
+        ////KeyEvent::new(KeyCode::Char('x'), Mods::CONTROL));
+    ////test(":alt-x",
+        ////KeyEvent::new(KeyCode::Char('x'), Mods::ALT));
+    ////test(":shift-x",
+        ////KeyEvent::new(KeyCode::Char('x'), Mods::SHIFT));
+    ////test(":ctrl-alt-shift-x",
+        ////KeyEvent::new(KeyCode::Char('x'), Mods::CONTROL | Mods::ALT | Mods::SHIFT ));
+//}