From: Jesse Luehrs Date: Thu, 21 Oct 2010 05:17:28 +0000 (-0500) Subject: and, memoize making the compiler X-Git-Tag: 0.01~10 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=617171194aaf277e9a9558c478a174b483d6d85e;p=gitmo%2FEval-Closure.git and, memoize making the compiler --- diff --git a/lib/Eval/Closure.pm b/lib/Eval/Closure.pm index aa0777d..c563dc3 100644 --- a/lib/Eval/Closure.pm +++ b/lib/Eval/Closure.pm @@ -8,6 +8,7 @@ use Sub::Exporter -setup => { use Carp; use overload (); +use Memoize; use Scalar::Util qw(reftype); use Try::Tiny; @@ -104,6 +105,7 @@ sub _make_compiler { my $e = $@; return ($compiler, $e); } +memoize('_make_compiler'); sub _make_compiler_source { my ($source, @capture_keys) = @_;