diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/run.lua | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/tests/run.lua b/tests/run.lua index 7e47330..cbca8d9 100644 --- a/tests/run.lua +++ b/tests/run.lua @@ -4595,6 +4595,25 @@ test("Lower-case descriptors scan direct previews forward", function() end end) +test("Upper-case descriptors scan direct previews backward", function() + local view = text_topology.new({ "abcde" }, "utf-8") + local planner = direct_preview_planner.new() + local origin = domain.Position.new(1, 5) + + for _, descriptor in ipairs({ "F", "T" }) do + local records = planner:scan_for_descriptor(view, origin, descriptor) + same(4, #records) + same("d", records[1].character) + same(domain.Position.new(1, 4), records[1].position) + same("a", records[4].character) + same(domain.Position.new(1, 1), records[4].position) + end + same( + domain.Direction.BACKWARD, + direct_preview_planner.direction_for_descriptor("F") + ) +end) + for _, item in ipairs(tests) do local ok, failure = xpcall(item.body, debug.traceback) if not ok then |