line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package Neo4j::Bolt::CTypeHandlers; |
2
|
|
|
|
|
|
|
BEGIN { |
3
|
6
|
|
|
6
|
|
28
|
our $VERSION = "0.4200"; |
4
|
6
|
|
|
|
|
28
|
require XSLoader; |
5
|
6
|
|
|
|
|
3747
|
XSLoader::load(); |
6
|
|
|
|
|
|
|
} |
7
|
|
|
|
|
|
|
|
8
|
6
|
|
|
6
|
|
4696
|
use JSON::PP; # operator overloading for boolean values |
|
6
|
|
|
|
|
93369
|
|
|
6
|
|
|
|
|
457
|
|
9
|
6
|
|
|
6
|
|
2818
|
use Neo4j::Bolt::Node; |
|
6
|
|
|
|
|
16
|
|
|
6
|
|
|
|
|
193
|
|
10
|
6
|
|
|
6
|
|
2647
|
use Neo4j::Bolt::Relationship; |
|
6
|
|
|
|
|
16
|
|
|
6
|
|
|
|
|
182
|
|
11
|
6
|
|
|
6
|
|
2585
|
use Neo4j::Bolt::Path; |
|
6
|
|
|
|
|
16
|
|
|
6
|
|
|
|
|
242
|
|
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
=head1 NAME |
14
|
|
|
|
|
|
|
|
15
|
|
|
|
|
|
|
Neo4j::Bolt::TypeHandlersC - Low level Perl to Bolt converters |
16
|
|
|
|
|
|
|
|
17
|
|
|
|
|
|
|
=head1 SYNOPSIS |
18
|
|
|
|
|
|
|
|
19
|
|
|
|
|
|
|
// how Neo4j::Bolt::ResultStream uses it |
20
|
|
|
|
|
|
|
for (i=0; i
|
21
|
|
|
|
|
|
|
value = neo4j_result_field(result, i); |
22
|
|
|
|
|
|
|
perl_value = neo4j_value_to_SV(value); |
23
|
|
|
|
|
|
|
Inline_Stack_Push( perl_value ); |
24
|
|
|
|
|
|
|
} |
25
|
|
|
|
|
|
|
|
26
|
|
|
|
|
|
|
=head1 DESCRIPTION |
27
|
|
|
|
|
|
|
|
28
|
|
|
|
|
|
|
L is all C code, managed by L. |
29
|
|
|
|
|
|
|
It tediously defines methods to convert Perl structures to Bolt |
30
|
|
|
|
|
|
|
representations, and also tediously defines methods convert Bolt |
31
|
|
|
|
|
|
|
data to Perl representations. |
32
|
|
|
|
|
|
|
|
33
|
|
|
|
|
|
|
=head1 METHODS |
34
|
|
|
|
|
|
|
|
35
|
|
|
|
|
|
|
=over |
36
|
|
|
|
|
|
|
|
37
|
|
|
|
|
|
|
=item neo4j_value_t SV_to_neo4j_value(SV *sv) |
38
|
|
|
|
|
|
|
|
39
|
|
|
|
|
|
|
Attempt to create the appropriate |
40
|
|
|
|
|
|
|
L |
41
|
|
|
|
|
|
|
representation of the Perl SV argument. |
42
|
|
|
|
|
|
|
|
43
|
|
|
|
|
|
|
=item SV* neo4j_value_to_SV( neo4j_value_t value ) |
44
|
|
|
|
|
|
|
|
45
|
|
|
|
|
|
|
Attempt to create the appropriate Perl SV representation of the |
46
|
|
|
|
|
|
|
L |
47
|
|
|
|
|
|
|
neo4j_value_t argument. |
48
|
|
|
|
|
|
|
|
49
|
|
|
|
|
|
|
=back |
50
|
|
|
|
|
|
|
|
51
|
|
|
|
|
|
|
=head1 SEE ALSO |
52
|
|
|
|
|
|
|
|
53
|
|
|
|
|
|
|
L, L, L, |
54
|
|
|
|
|
|
|
L. |
55
|
|
|
|
|
|
|
|
56
|
|
|
|
|
|
|
=head1 AUTHOR |
57
|
|
|
|
|
|
|
|
58
|
|
|
|
|
|
|
Mark A. Jensen |
59
|
|
|
|
|
|
|
CPAN: MAJENSEN |
60
|
|
|
|
|
|
|
majensen -at- cpan -dot- org |
61
|
|
|
|
|
|
|
|
62
|
|
|
|
|
|
|
=head1 LICENSE |
63
|
|
|
|
|
|
|
|
64
|
|
|
|
|
|
|
This software is Copyright (c) 2019-2020 by Mark A. Jensen. |
65
|
|
|
|
|
|
|
|
66
|
|
|
|
|
|
|
This is free software, licensed under: |
67
|
|
|
|
|
|
|
|
68
|
|
|
|
|
|
|
The Apache License, Version 2.0, January 2004 |
69
|
|
|
|
|
|
|
|
70
|
|
|
|
|
|
|
=cut |
71
|
|
|
|
|
|
|
|
72
|
|
|
|
|
|
|
1; |
73
|
|
|
|
|
|
|
|