From 5d104ea769afd5a9319be297bb8b450e7c0aa8c2 Mon Sep 17 00:00:00 2001 From: Philipp Gesang Date: Wed, 22 Feb 2012 14:39:39 +0100 Subject: [elementary] replaced broken lpeg --- .../tex/context/third/simpleslides/automata/automata-eca.lua | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) (limited to 'module/tex/context/third/simpleslides/automata/automata-eca.lua') diff --git a/module/tex/context/third/simpleslides/automata/automata-eca.lua b/module/tex/context/third/simpleslides/automata/automata-eca.lua index 4dcf3c7..a8011c4 100644 --- a/module/tex/context/third/simpleslides/automata/automata-eca.lua +++ b/module/tex/context/third/simpleslides/automata/automata-eca.lua @@ -61,11 +61,15 @@ function eca.next_line(from, rule) --from = string.format("0%s0", from) -- too slow local cell = C(S"01") - local cells= Ct(cell * #(cell * cell)) / function (t) -- I ♡ LPEG - local three = t[1]..t[2]..t[3] - new = new .. rule[three] + --local cells= Ct(cell * #(cell * cell)) / function (t) -- I ♡ LPEG + -- local three = t[1]..t[2]..t[3] + -- new = new .. rule[three] + --end + --lpeg.match(cells^1, from) + for i=1, #from - 2 do + local three = from:sub(i, i+2) + new = new .. rule[three] end - lpeg.match(cells^1, from) return new end -- cgit v1.2.3