bump version to 1.25
[gitmo/Moose.git] / lib / Moose / Meta / Method / Accessor / Native / Number / abs.pm
CommitLineData
f23ffd15 1package Moose::Meta::Method::Accessor::Native::Number::abs;
2
3use strict;
4use warnings;
5
0c3879e8 6our $VERSION = '1.25';
f23ffd15 7$VERSION = eval $VERSION;
8our $AUTHORITY = 'cpan:STEVAN';
9
8b9641b8 10use Moose::Role;
11
12with 'Moose::Meta::Method::Accessor::Native::Writer' => {
13 -excludes => [
14 qw(
15 _maximum_arguments
16 _inline_optimized_set_new_value
17 )
18 ]
7f5ec80d 19 };
f23ffd15 20
f23ffd15 21sub _maximum_arguments {0}
22
23sub _potential_value {
24 my ( $self, $slot_access ) = @_;
25
584540d9 26 return "abs($slot_access)";
f23ffd15 27}
28
29sub _inline_optimized_set_new_value {
30 my ( $self, $inv, $new, $slot_access ) = @_;
31
32 return "$slot_access = abs($slot_access)";
33}
34
8b9641b8 35no Moose::Role;
36
f23ffd15 371;