burak / CPAN-Sys-Info-Driver-Unknown

Compatibility layer for Sys::Info (Perl)

commit 14: 233bf6b524b4
parent 13: b7ae4dbaee1a
branch: default
add bitness
Burak Gursoy
12 months ago

Changed (Δ157 bytes):

raw changeset »

Changes (3 lines added, 0 lines removed)

PREREQ (1 lines added, 1 lines removed)

lib/Sys/Info/Driver/Unknown.pm (1 lines added, 1 lines removed)

lib/Sys/Info/Driver/Unknown/Device/CPU.pm (6 lines added, 0 lines removed)

lib/Sys/Info/Driver/Unknown/OS.pm (3 lines added, 1 lines removed)

Up to file-list Changes:

@@ -2,6 +2,9 @@ Revision history for Perl extension Sys:
2
2
3
3
Time zone is GMT+2.
4
4
5
0.69_11 Sat Apr  4 07:17:27 2009
6
    => Add cpu->bitness.
7
5
8
0.69_10 Fri Apr  3 22:38:12 2009
6
9
    => Update test suite.
7
10

Up to file-list PREREQ:

@@ -9,7 +9,7 @@ use vars qw(%PREREQ %RECOMMEND %BUILD_RE
9
9
10
10
%PREREQ = (
11
11
   'IO::File'        => 0,
12
   'Sys::Info::Base' => '0.69_10',
12
   'Sys::Info::Base' => '0.69_11',
13
13
);
14
14
15
15
%RECOMMEND = (

Up to file-list lib/Sys/Info/Driver/Unknown.pm:

@@ -2,7 +2,7 @@ package Sys::Info::Driver::Unknown;
2
2
use strict;
3
3
use vars qw( $VERSION );
4
4
5
$VERSION = '0.69_10';
5
$VERSION = '0.69_11';
6
6
7
7
1;
8
8

Up to file-list lib/Sys/Info/Driver/Unknown/Device/CPU.pm:

@@ -17,6 +17,8 @@ BEGIN {
17
17
18
18
sub load {0}
19
19
20
sub bitness {}
21
20
22
sub identify {
21
23
    my $self = shift;
22
24
    $self->{META_DATA} ||= [
@@ -67,6 +69,10 @@ See identify in L<Sys::Info::Device::CPU
67
69
68
70
See load in L<Sys::Info::Device::CPU>.
69
71
72
=head2 bitness
73
74
See bitness in L<Sys::Info::Device::CPU>.
75
70
76
=head1 SEE ALSO
71
77
72
78
L<Sys::Info>, L<Sys::Info::CPU>, L<Unix::Processors>.

Up to file-list lib/Sys/Info/Driver/Unknown/OS.pm:

@@ -90,7 +90,9 @@ sub login_name {
90
90
    return $name;
91
91
}
92
92
93
sub bitness {}
93
sub bitness {
94
    my $self = shift;
95
}
94
96
95
97
1;
96
98