On Thursday 31 December 2009 at 07:21, coke wrote:
> Author: coke
> Date: Thu Dec 31 15:21:15 2009
> New Revision: 43344
> URL: https://trac.parrot.org/parrot/changeset/43344
> --- branches/one_make/tools/dev/checkdepend.pl Thu Dec 31 14:28:42
> 2009
(r43343)
> +++ branches/one_make/tools/dev/checkdepend.pl Thu Dec 31 15:21:15
> 2009
(r43344)
> @@ -84,6 +84,20 @@
> local undef $/;
> $rules = <$mf>;
> }
> +close $mf;
> +
> +# inline all "include"'d Makefiles;
> +while ($rules =~ /^include\s+(.*)$/m) {
> + my $sub_makefile = $1;
> + open my $smf, '<', $sub_makefile;
> + my $subrules;
> + {
> + local undef $/;
local $/; should suffice; I think that stray undef in there clobbers the global
before the localization.
-- c
_______________________________________________
http://lists.parrot.org/mailman/listinfo/parrot-dev