File Coverage

blib/lib/RPerl/DataStructure/Array.pm
Criterion Covered Total %
statement 65 65 100.0
branch n/a
condition n/a
subroutine 23 23 100.0
pod n/a
total 88 88 100.0


line stmt bran cond sub pod time code
1             # [[[ HEADER ]]]
2             package RPerl::DataStructure::Array;
3 7     7   36 use strict;
  7         13  
  7         155  
4 7     7   29 use warnings;
  7         10  
  7         133  
5 7     7   30 use RPerl::AfterSubclass;
  7         13  
  7         816  
6             our $VERSION = 0.008_000;
7              
8             # [[[ OO INHERITANCE ]]]
9 7     7   40 use parent qw(RPerl::DataStructure);
  7         10  
  7         34  
10 7     7   212 use RPerl::DataStructure;
  7         15  
  7         131  
11              
12 7     7   31 use Carp;
  7         12  
  7         1164  
13              
14             # [[[ SUB-TYPES BEFORE INCLUDES ]]]
15 7     7   2364 use RPerl::DataStructure::Array::SubTypes;
  7         17  
  7         47  
16              
17             # [[[ INCLUDES ]]]
18             # for type-checking via SvIOKp(), SvNOKp(), and SvPOKp(); inside INIT to delay until after 'use MyConfig'
19             #INIT { RPerl::diag("in Array.pm, loading C++ helper functions for type-checking...\n"); }
20             INIT {
21 7     7   2206 use RPerl::HelperFunctions_cpp;
  7         24  
  7         379  
22 7     7   155 RPerl::HelperFunctions_cpp::cpp_load();
23             }
24              
25 7     7   43 use RPerl::DataType::Void;
  7         15  
  7         154  
26 7     7   36 use RPerl::DataType::Boolean;
  7         17  
  7         61  
27 7     7   48 use RPerl::DataType::UnsignedInteger;
  7         15  
  7         46  
28 7     7   41 use RPerl::DataType::Integer;
  7         18  
  7         44  
29 7     7   45 use RPerl::DataType::Number;
  7         18  
  7         56  
30 7     7   44 use RPerl::DataType::Character;
  7         13  
  7         54  
31 7     7   44 use RPerl::DataType::String;
  7         14  
  7         49  
32 7     7   44 use RPerl::DataType::Scalar;
  7         15  
  7         197  
33 7     7   36 use RPerl::DataType::Unknown;
  7         16  
  7         140  
34 7     7   2855 use RPerl::DataStructure::Hash;
  7         23  
  7         47  
35              
36             # [[[ EXPORTS ]]]
37             # DEV NOTE: avoid "Undefined subroutine &main::integer_to_string called"
38 7     7   65 use RPerl::Exporter 'import';
  7         14  
  7         40  
39             our @EXPORT = ( @RPerl::DataType::Void::EXPORT,
40             @RPerl::DataType::Boolean::EXPORT,
41             @RPerl::DataType::UnsignedInteger::EXPORT,
42             @RPerl::DataType::Integer::EXPORT,
43             @RPerl::DataType::Number::EXPORT,
44             @RPerl::DataType::Character::EXPORT,
45             @RPerl::DataType::String::EXPORT,
46             @RPerl::DataType::Scalar::EXPORT,
47             @RPerl::DataType::Unknown::EXPORT,
48             @RPerl::DataStructure::Hash::EXPORT);
49              
50             # DEV NOTE, CORRELATION #rp018: RPerl::DataStructure::Array & Hash can not 'use RPerl;' so *__MODE_ID() subroutines are hard-coded here
51             package main;
52 7     7   49 use strict;
  7         14  
  7         174  
53 7     7   45 use warnings;
  7         17  
  7         408  
54 3     3   936 sub RPerl__DataStructure__Array__MODE_ID { return 0; }
55              
56             1; # end of class