Mercurial > pub > Impl

comparison lib/IMPL/declare.pm @ 422:b0481c071bea ref20150831

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
IMPL::Config::Container tests, YAMLConfiguration now works and tested
author cin
date Sun, 20 Aug 2017 00:20:41 +0300
parents 3ed0c58e9da3
children
comparison
equal deleted inserted replaced
421:7798345304bc 422:b0481c071bea
28 28
29 $IMPL::require::PENDING{$caller} = 1; 29 $IMPL::require::PENDING{$caller} = 1;
30 _trace("declare $caller"); 30 _trace("declare $caller");
31 $IMPL::require::level++; 31 $IMPL::require::level++;
32 32
33 my $tcaller = $caller;
33 *{"${caller}::SELF"} = sub () { 34 *{"${caller}::SELF"} = sub () {
34 $caller; 35 $tcaller;
35 }; 36 };
36 37
37 while ( my ( $alias, $class ) = each %$aliases ) { 38 while ( my ( $alias, $class ) = each %$aliases ) {
38 _trace("$alias => $class"); 39 _trace("$alias => $class");
39 $IMPL::require::level++; 40 $IMPL::require::level++;