Optimizations for better usage of XS code

This commit is contained in:
Alessandro Ranellucci committed 2013-08-29 01:36:42 +02:00
1 parent 9254ff9704
commit 5d6fd7f4d9
22 files changed
+68 -42

No files matched your search

+2 -2
View File
@@ -589,8 +589,8 @@ sub _detect_bridge_direction {
# remove any line not having both endpoints within anchors
@clipped_lines = grep {
my $line = $_;
!(first { $_->encloses_point_quick($line->[A]) } @$anchors)
&& !(first { $_->encloses_point_quick($line->[B]) } @$anchors);
!(first { $_->encloses_point_quick($line->a) } @$anchors)
&& !(first { $_->encloses_point_quick($line->b) } @$anchors);
} @clipped_lines;
# sum length of bridged lines