From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 27 Sep 2020 16:45:44 +0000 (+0100)
Subject: refactor layout algorithm to allow clash avoidance
X-Git-Tag: otter-0.2.0~843
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=be6fba93cc905679d696a515365a939ecc52f739;p=otter.git

refactor layout algorithm to allow clash avoidance

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/src/bin/otter.rs b/src/bin/otter.rs
index a90d39fb..32dd3a21 100644
--- a/src/bin/otter.rs
+++ b/src/bin/otter.rs
@@ -768,12 +768,15 @@ mod library_add {
       fn place(&mut self, bbox: &[Pos;2]) -> Option<Pos> {
         let PosC([w,h]) = bbox[1] - bbox[0];
 
-        let (ncbot, tlhs) = loop {
+        let (ncbot, tlhs) = 'search : loop {
           let ncbot = max(self.cbot, self.top + h);
           if ncbot > self.bot { None? }
           let tlhs = self.clhs;
-          self.clhs += w;
-          if self.clhs <= self.rhs { break (ncbot, tlhs) }
+          'within_line: loop {
+            self.clhs += w;
+            if self.clhs > self.rhs { break 'within_line }
+            break 'search (ncbot, tlhs);
+          }
           // line is full
           self.top = self.cbot;
           self.clhs = self.lhs;