summaryrefslogtreecommitdiff
path: root/tests/run.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tests/run.lua')
-rw-r--r--tests/run.lua37
1 files changed, 37 insertions, 0 deletions
diff --git a/tests/run.lua b/tests/run.lua
index 1f9b9da..fc89801 100644
--- a/tests/run.lua
+++ b/tests/run.lua
@@ -2618,6 +2618,43 @@ test("FIND requires destinations on the strict motion side", function()
)
end)
+test("First TILL moves accept an adjacent stationary destination", function()
+ local engine = destination_engine.new()
+ local forward_view = text_topology.new({ "ab" }, "utf-8")
+ local forward = motion_plan.build(
+ target_plan.build(target("b"), matching_policy()),
+ "t"
+ )
+ local forward_origin = domain.Position.new(1, 1)
+ local forward_outcome = engine:calculate(
+ forward_view,
+ forward_origin,
+ forward,
+ 1,
+ true
+ )
+ same(domain.SearchStatus.COMPLETE, forward_outcome.status)
+ same(forward_origin, forward_outcome.endpoint)
+ same(1, forward_outcome.successful_steps)
+
+ local backward_view = text_topology.new({ "ba" }, "utf-8")
+ local backward = motion_plan.build(
+ target_plan.build(target("b"), matching_policy()),
+ "T"
+ )
+ local backward_origin = domain.Position.new(1, 2)
+ local backward_outcome = engine:calculate(
+ backward_view,
+ backward_origin,
+ backward,
+ 1,
+ true
+ )
+ same(domain.SearchStatus.COMPLETE, backward_outcome.status)
+ same(backward_origin, backward_outcome.endpoint)
+ same(1, backward_outcome.successful_steps)
+end)
+
for _, item in ipairs(tests) do
local ok, failure = xpcall(item.body, debug.traceback)
if not ok then