| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
# [[[ HEADER ]]] |
|
2
|
|
|
|
|
|
|
package RPerl::DataStructure; |
|
3
|
9
|
|
|
9
|
|
3154
|
use strict; |
|
|
9
|
|
|
|
|
20
|
|
|
|
9
|
|
|
|
|
223
|
|
|
4
|
9
|
|
|
9
|
|
44
|
use warnings; |
|
|
9
|
|
|
|
|
17
|
|
|
|
9
|
|
|
|
|
207
|
|
|
5
|
9
|
|
|
9
|
|
51
|
use RPerl::AfterSubclass; |
|
|
9
|
|
|
|
|
21
|
|
|
|
9
|
|
|
|
|
1136
|
|
|
6
|
|
|
|
|
|
|
our $VERSION = 0.002_000; |
|
7
|
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
# [[[ OO INHERITANCE ]]] |
|
9
|
|
|
|
|
|
|
# DEV NOTE: RPerl Data Structures are RPerl Data Types, |
|
10
|
|
|
|
|
|
|
# because we have explicitly implemented each RPerl Data Structure to be usable as a native, compound Data Type; |
|
11
|
|
|
|
|
|
|
# other Data Structures, such as MathPerl::DataStructure::*, are not implemented as native RPerl Data Types, |
|
12
|
|
|
|
|
|
|
# instead they are left as RPerl Classes |
|
13
|
9
|
|
|
9
|
|
59
|
use parent qw(RPerl::DataType); |
|
|
9
|
|
|
|
|
16
|
|
|
|
9
|
|
|
|
|
52
|
|
|
14
|
9
|
|
|
9
|
|
453
|
use RPerl::DataType; |
|
|
9
|
|
|
|
|
21
|
|
|
|
9
|
|
|
|
|
305
|
|
|
15
|
|
|
|
|
|
|
|
|
16
|
|
|
|
|
|
|
1; # end of package |