File Coverage

blib/lib/Iterator/Flex/Role/Reset/Closure.pm

Criterion	Covered	Total	%
statement	36	36	100.0
branch			n/a
condition			n/a
subroutine	11	11	100.0
pod	1	1	100.0
total	48	48	100.0

package Iterator::Flex::Role::Reset::Closure;

# ABSTRACT: Implement reset as a closure stored in the registry

use v5.28;
use strict;
use warnings;

our $VERSION = '0.33';

use Scalar::Util;
use List::Util;

use Iterator::Flex::Base  ();
use Iterator::Flex::Utils qw( :default REG_ITERATOR REG_ITER_RESET );
use Role::Tiny;
use experimental 'signatures';

use namespace::clean;











sub reset ( $self ) {    ## no critic (BuiltinHomonyms)
    $self->_apply_method_to_depends( 'reset' );

    $REGISTRY{ refaddr $self }[REG_ITERATOR][REG_ITER_RESET]->( $self );
    $self->_clear_state;

    return;
}
*__reset__ = \&reset;


requires '_clear_state';
1;

#
# This file is part of Iterator-Flex
#
# This software is Copyright (c) 2018 by Smithsonian Astrophysical Observatory.
#
# This is free software, licensed under:
#
#   The GNU General Public License, Version 3, June 2007
#

__END__