line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
MODULE = Geo::Geos PACKAGE = Geo::Geos::Noding::SinglePassNoder |
2
|
|
|
|
|
|
|
PROTOTYPES: DISABLE |
3
|
|
|
|
|
|
|
|
4
|
|
|
|
|
|
|
void SinglePassNoder::setSegmentIntersector(SV *newSegInt = NULL) { |
5
|
0
|
0
|
|
|
|
|
Object self{ST(0)}; |
6
|
|
|
|
|
|
|
|
7
|
0
|
0
|
|
|
|
|
SegmentIntersector* si = newSegInt ? xs::in(newSegInt) : NULL; |
|
|
0
|
|
|
|
|
|
8
|
0
|
0
|
|
|
|
|
if (si) { |
9
|
0
|
0
|
|
|
|
|
self.payload_attach(SvRV(newSegInt), &payload_marker); |
10
|
|
|
|
|
|
|
} |
11
|
0
|
0
|
|
|
|
|
else if (self.payload_exists(&payload_marker)) { |
12
|
0
|
0
|
|
|
|
|
self.payload_detach(&payload_marker); |
13
|
|
|
|
|
|
|
} |
14
|
|
|
|
|
|
|
|
15
|
0
|
0
|
|
|
|
|
THIS->setSegmentIntersector(si); |
16
|
|
|
|
|
|
|
} |
17
|
|
|
|
|
|
|
|
18
|
|
|
|
|
|
|
|
19
|
0
|
|
|
|
|
|
int CLONE_SKIP (...) { PERL_UNUSED_VAR(items); RETVAL = 1; } |
20
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
BOOT { |
22
|
46
|
50
|
|
|
|
|
Stash(__PACKAGE__).inherit("Geo::Geos::Noding::Noder"); |
|
|
50
|
|
|
|
|
|
23
|
|
|
|
|
|
|
} |