File Coverage

blib/lib/SPVM/BlessedObject.pm
Criterion Covered Total %
statement 14 17 82.3
branch 2 4 50.0
condition n/a
subroutine 4 4 100.0
pod n/a
total 20 25 80.0


line stmt bran cond sub pod time code
1             package SPVM::BlessedObject;
2              
3 278     278   1846 use strict;
  278         559  
  278         8090  
4 278     278   1395 use warnings;
  278         546  
  278         41852  
5              
6             sub __api {
7 162623     162623   221264 my $self = shift;
8 162623 50       284623 if (@_) {
9 0         0 $self->{__api} = $_[0];
10 0         0 return $self;
11             }
12             else {
13 162623         475958 return $self->{__api};
14             }
15             }
16              
17 92 50   92   49943 sub __get_type_name { my $ret; eval { $ret = shift->_xs___get_type_name(@_) }; if ($@) { confess $@ } $ret; }
  92         170  
  92         3174  
  92         1431  
  0         0  
  92         580  
18              
19             1;
20              
21             =head1 Name
22              
23             SPVM::BlessedObject - SPVM object
24              
25             =head1 Description
26              
27             The object of the C class holds a SPVM object.
28              
29             =head1 Instance Methods
30              
31             =head2 __api
32              
33             my $api = $self->__api;
34             $self->__api($api);
35              
36             Gets and sets a L object.
37              
38             =head2 __get_type_name
39              
40             my $type_name = $self->__get_type_name;
41              
42             Gets the SPVM type name of the object.
43              
44             =head1 Well Known Child Classes
45              
46             =over 2
47              
48             =item * L
49              
50             =item * L
51              
52             =item * L
53              
54             =back
55              
56             =head1 Copyright & License
57              
58             Copyright (c) 2023 Yuki Kimoto
59              
60             MIT License