summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordoy <doy@tozt.net>2008-12-14 18:08:11 -0500
committerdoy <doy@tozt.net>2008-12-14 18:08:11 -0500
commit49f82b159caf0a420180dd7338adba75cd0b3b29 (patch)
treece0317a20848210b65342020246a8779657f6b44
parent4da95a651d8d2bf4682ef992f990ec6205122409 (diff)
downloadgraph-implicit-49f82b159caf0a420180dd7338adba75cd0b3b29.tar.gz
graph-implicit-49f82b159caf0a420180dd7338adba75cd0b3b29.zip
we no longer store the path in the heap for dijkstra/astar
-rw-r--r--lib/Graph/Implicit.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Graph/Implicit.pm b/lib/Graph/Implicit.pm
index 78537f0..49dde40 100644
--- a/lib/Graph/Implicit.pm
+++ b/lib/Graph/Implicit.pm
@@ -103,7 +103,7 @@ sub astar {
$pq->key_insert(0, $from);
while ($pq->count) {
my $cost = $pq->top_key;
- my ($vertex, $path) = @{ $pq->extract_top };
+ my $vertex = $pq->extract_top;
if ($scorer) {
my $score = $scorer->($vertex);
return (\%pred, $vertex) if $score eq 'q';