This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix CORE::glob
authorFather Chrysostomos <sprout@cpan.org>
Wed, 26 Oct 2011 00:56:32 +0000 (17:56 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Thu, 27 Oct 2011 01:22:18 +0000 (18:22 -0700)
commitd67594ff366291f164fb41e4dcc791494ec4bb0e
tree3ec3aa27ad2ba46ff773fe14e6a18e31c4882b07
parent1bb8785ab1af03172a3a220f8948d33bdc3dd374
Fix CORE::glob

This commit makes CORE::glob bypassing glob overrides.

A side effect of the fix is that, with the default glob implementa-
tion, undefining *CORE::GLOBAL::glob no longer results in an ‘unde-
fined subroutine’ error.

Another side effect is that compilation of a glob op no longer assumes
that the loading of File::Glob will create the *CORE::GLOB::glob type-
glob.  ‘++$INC{"File/Glob.pm"}; sub File::Glob::csh_glob; eval '<*>';’
used to crash.

This is accomplished using a mechanism similar to lock() and
threads::shared.  There is a new PL_globhook interpreter varia-
ble that pp_glob calls when there is no override present.  Thus,
File::Glob (which is supposed to be transparent, as it *is* the
built-in implementation) no longer interferes with the user mechanism
for overriding glob.

This removes one tier from the five or so hacks that constitute glob’s
implementation, and which work together to make it one of the buggiest
and most inconsistent areas of Perl.
embedvar.h
ext/File-Glob/Glob.xs
intrpvar.h
op.c
op.h
perl.h
pp_sys.c
sv.c
t/op/glob.t
toke.c