From 8fe2efd8816c9ab8e5953e26284cb23cc9530846 Mon Sep 17 00:00:00 2001 From: David Moon Date: Fri, 8 Nov 2024 14:33:46 -0500 Subject: [PATCH] mv --- src/core/structure/Cell.re | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/src/core/structure/Cell.re b/src/core/structure/Cell.re index c06c5399..f9f813c0 100644 --- a/src/core/structure/Cell.re +++ b/src/core/structure/Cell.re @@ -134,6 +134,10 @@ let rec mark_degrouted = (~side: Dir.t, c: t) => {...c, meld: Some(M(l, w, r))}; } }; +let unmark_degrouted = (c: t) => { + let marks = {...c.marks, degrouted: Path.Map.empty}; + {...c, marks}; +}; let rec end_path = (~sans_padding=false, ~side: Dir.t, c: t) => switch (c.meld) { @@ -257,11 +261,6 @@ module Space = { }; let is_space = c => Option.is_some(get(c)); - let unmark_degrouted = (c: t) => { - let marks = {...c.marks, degrouted: Path.Map.empty}; - {...c, marks}; - }; - let mk = (cs: list(t), ts: list(Token.t)) => switch (cs, ts) { | ([c], []) => c