[latex3-commits] [git/LaTeX3-latex3-luaotfload] dev: Fix bugs in discretionary code (71f14fa)

[Marcel Fabian Krüger]

Repository : https://github.com/latex3/luaotfload
On branch  : dev
Link       : https://github.com/latex3/luaotfload/commit/71f14facc971011b55d6a2bb2e99686575b758eb

>---------------------------------------------------------------

commit 71f14facc971011b55d6a2bb2e99686575b758eb
Author: Marcel Fabian Krüger <tex at 2krueger.de>
Date:   Sat Oct 31 17:13:18 2020 +0100

    Fix bugs in discretionary code


>---------------------------------------------------------------

71f14facc971011b55d6a2bb2e99686575b758eb
 src/luaotfload-harf-plug.lua | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/luaotfload-harf-plug.lua b/src/luaotfload-harf-plug.lua
index 5cc3772..9a5904a 100644
--- a/src/luaotfload-harf-plug.lua
+++ b/src/luaotfload-harf-plug.lua
@@ -599,14 +599,14 @@ function shape(head, firstnode, run)
                 codepoint = 0xFFFC,
               }
             end
-            i = disc_glyph
-            node = discs.disc
-            cluster = disc_cluster
+            i = disc_glyph + 1
+            assert(node == getnext(discs.disc))
+            cluster = disc_cluster + 1
 
             disc_cluster = nil
             discs = discs.next
             while discs and discs.anchor_cluster + offset < cluster do
-              free(discs.disc)
+              freenode(discs.disc)
               discs = discs.next
             end
             if not discs then break end