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>