| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
# [[[ HEADER ]]] |
|
2
|
|
|
|
|
|
|
package RPerl::DataStructure; |
|
3
|
9
|
|
|
9
|
|
3175
|
use strict; |
|
|
9
|
|
|
|
|
23
|
|
|
|
9
|
|
|
|
|
230
|
|
|
4
|
9
|
|
|
9
|
|
44
|
use warnings; |
|
|
9
|
|
|
|
|
21
|
|
|
|
9
|
|
|
|
|
239
|
|
|
5
|
9
|
|
|
9
|
|
58
|
use RPerl::AfterSubclass; |
|
|
9
|
|
|
|
|
23
|
|
|
|
9
|
|
|
|
|
1159
|
|
|
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
|
|
58
|
use parent qw(RPerl::DataType); |
|
|
9
|
|
|
|
|
21
|
|
|
|
9
|
|
|
|
|
53
|
|
|
14
|
9
|
|
|
9
|
|
505
|
use RPerl::DataType; |
|
|
9
|
|
|
|
|
31
|
|
|
|
9
|
|
|
|
|
287
|
|
|
15
|
|
|
|
|
|
|
|
|
16
|
|
|
|
|
|
|
1; # end of package |