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   1847 use strict;
  278         516  
  278         7723  
4 278     278   1277 use warnings;
  278         537  
  278         39942  
5              
6             sub __api {
7 167403     167403   219188 my $self = shift;
8 167403 50       283251 if (@_) {
9 0         0 $self->{__api} = $_[0];
10 0         0 return $self;
11             }
12             else {
13 167403         472571 return $self->{__api};
14             }
15             }
16              
17 92 50   92   51354 sub __get_type_name { my $ret; eval { $ret = shift->_xs___get_type_name(@_) }; if ($@) { confess $@ } $ret; }
  92         169  
  92         3038  
  92         1415  
  0         0  
  92         529  
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