Add typed scalar semantic review to desktop workflow

crates/oa-desktop/src/workflow.rs

@@ -15,6 +15,7 @@ use std::collections::BTreeSet;
 
 #[derive(Debug, Clone)]
 pub enum Event {
+    Semantic(crate::semantic_review::Event),
     Port(crate::port_workflow::Event),
     ExchangeItem(Id, bool),
     Endpoint(bool, EndpointChoice),
@@ -33,6 +34,7 @@ pub enum Event {
     Preview,
 }
 pub enum Workflow {
+    Semantic(Box<crate::semantic_review::State>),
     Ports(Box<crate::port_workflow::State>),
     Relation(Box<Relationship>),
     ManualTrace {
@@ -333,6 +335,11 @@ impl Workflow {
     /// choices and previews never mutate the Session.
     pub fn update(&mut self, p: &Project, event: Event) -> Result<Option<Project>, String> {
         match self {
+            Self::Semantic(_) => {
+                return Err(
+                    "Semantic review commits its exact command batch through Document.".into(),
+                );
+            }
             Self::Ports(state) => return state.update(p, event),
             Self::ManualTrace {
                 name,
@@ -571,6 +578,7 @@ impl Workflow {
     }
     pub fn title(&self) -> &'static str {
         match self {
+            Self::Semantic(_) => "Review semantics",
             Self::Ports(state) => state.title(),
             Self::ManualTrace { .. } => "Link existing counterparts",
             Self::Relation(_) => "Create relationship",
@@ -584,6 +592,9 @@ impl Workflow {
         }
     }
     pub fn view<'a>(&'a self, p: &'a Project) -> Element<'a, Message> {
+        if let Self::Semantic(state) = self {
+            return state.view(p);
+        }
         if let Self::Ports(state) = self {
             return state.view(p);
         }
@@ -594,7 +605,7 @@ impl Workflow {
             None
         };
         match self {
-            Self::Ports(_) => unreachable!("Port dialog returned above"),
+            Self::Ports(_) | Self::Semantic(_) => unreachable!("Dedicated dialog returned above"),
             Self::ManualTrace {
                 name,
                 source,
@@ -1073,6 +1084,7 @@ impl Workflow {
             }
         }
         let enabled = match self {
+            Self::Semantic(_) => false,
             Self::Ports(_) => false,
             Self::ManualTrace { name, target, .. } => target.is_some() && !name.trim().is_empty(),
             Self::Relation(_) => relation_plan.as_ref().is_some_and(Result::is_ok),