NAME

Sub::Meta::Finder::SubWrapInType - finder of Sub::WrapInType

SYNOPSIS

    use Sub::Meta::Creator;
    use Sub::Meta::Finder::SubWrapInType;

    my $creator = Sub::Meta::Creator->new(
        finders => [ \&Sub::Meta::Finder::SubWrapInType::find_materials ],
    );

    use Sub::WrapInType;
    use Types::Standard -types;

    my $foo = wrap_method [Int, Int] => Int, sub { };
    my $meta = $creator->create($foo);
    # =>
    # Sub::Meta
    #   args [
    #       [0] Sub::Meta::Param->new(type => Int),
    #       [1] Sub::Meta::Param->new(type => Int),
    #   ],
    #   returns {
    #       list   => Int,
    #       scalar => Int,
    #   }
    #   invocant   Sub::Meta::Param->(invocant => 1),
    #   nshift     1,
    #   slurpy     !!0

FUNCTIONS

find_materials

LICENSE

Copyright (C) kfly8.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

kfly8 <kfly@cpan.org>