Bump version to 1.9900 for new version numbering scheme
[gitmo/Moose.git] / lib / Moose / Meta / Method / Accessor / Native / Hash / clear.pm
1 package Moose::Meta::Method::Accessor::Native::Hash::clear;
2
3 use strict;
4 use warnings;
5
6 our $VERSION = '1.9900';
7 $VERSION = eval $VERSION;
8 our $AUTHORITY = 'cpan:STEVAN';
9
10 use Moose::Role;
11
12 with 'Moose::Meta::Method::Accessor::Native::Hash::Writer' => {
13     -excludes => [
14         qw(
15             _maximum_arguments
16             _inline_optimized_set_new_value
17             _return_value
18             )
19     ]
20 };
21
22 sub _maximum_arguments { 0 }
23
24 sub _adds_members { 0 }
25
26 sub _potential_value { '{}' }
27
28 sub _inline_optimized_set_new_value {
29     my $self = shift;
30     my ($inv, $new, $slot_access) = @_;
31
32     return $slot_access . ' = {};';
33 }
34
35 sub _return_value { '' }
36
37 no Moose::Role;
38
39 1;