index fcb8f6801d20ea037a5e906b40cc2dcc9cb28c07..5bdb2268fea812f1dc3ca8afc0f76e2335dddf33 100644 (file)
--- a/src/game/z_aabbtree.pas
+++ b/src/game/z_aabbtree.pas
begin
if not assigned(checker) then begin result := -1; exit; end;
//if not assigned(visitor) then begin result := -1; exit; end;
- try
+ //try
{$IFDEF aabbtree_query_count}
mNodesVisited := 0;
mNodesDeepVisited := 0;
{$IFDEF aabbtree_query_count}Inc(mNodesDeepVisited);{$ENDIF}
if ((node.tag and tagmask) <> 0) and assigned(visitor) then
begin
- if (visitor(node.flesh, node.tag)) then begin result := nodeId; exit; end;
+ if (visitor(node.flesh, node.tag)) then begin result := nodeId; bigstack := nil; exit; end;
end;
end
else
end;
result := -1; // oops
- finally
bigstack := nil;
- end;
+ //finally
+ // bigstack := nil;
+ //end;
end;