X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Fpath-finding%2Fpath-finding.factor;h=39ea8a8f22ebce4c394712e219b9dad998284d15;hp=e5048da6f762da854511532352c85be78ad775b8;hb=0d57b1b43bcfbd6498745ec78be836c45233c6a0;hpb=6d4293b5822d769619f66e46e64b704ddfe41b43 diff --git a/extra/path-finding/path-finding.factor b/extra/path-finding/path-finding.factor index e5048da6f7..39ea8a8f22 100644 --- a/extra/path-finding/path-finding.factor +++ b/extra/path-finding/path-finding.factor @@ -67,12 +67,12 @@ TUPLE: (astar) astar goal origin in-open-set open-set ; TUPLE: astar-simple < astar cost heuristic neighbors ; M: astar-simple cost cost>> call( n1 n2 -- c ) ; M: astar-simple heuristic heuristic>> call( n1 n2 -- c ) ; -M: astar-simple neighbors neighbours>> call( n -- neighbours ) ; +M: astar-simple neighbors neighbors>> call( n -- neighbors ) ; TUPLE: bfs < astar neighbors ; M: bfs cost 3drop 1 ; M: bfs heuristic 3drop 0 ; -M: bfs neighbors neighbours>> at ; +M: bfs neighbors neighbors>> at ; TUPLE: dijkstra < astar costs ; M: dijkstra cost costs>> swapd at at ;