X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?p=subdirmk.git;a=blobdiff_plain;f=generate;h=22e8aff57e36abf60d977acebd89ddeebaa91236;hp=48db65246e79683812062458da23e654ac1c0a98;hb=e149e53837aae5e1cfb39b44bb0a00ea8b185016;hpb=ff11733b6b7d7920033f81c4669ebba9131b984f diff --git a/generate b/generate index 48db652..22e8aff 100755 --- a/generate +++ b/generate @@ -99,12 +99,13 @@ sub write_makefile ($$) { my $cd = $depth ? join('/', ('..',) x $depth) : '.'; o < $dir_prefix, + '^' => "\$(top_srcdir)${dir_suffix}/", + '~' => "\$(top_srcdir)/", + ); + while (<$input>) { if (s#^\s*$esc\:##) { $buffering_output=''; @@ -147,19 +154,13 @@ sub process_input_mk ($$$$$$$$) { $targets->{$t} //= [ ]; } elsif (m{^(?=$caps_re)}) { o $var_prefix } - elsif (m{^(?=$lc_re)}) { o $dir_prefix } + elsif (s{^([~^]?)(?=$lc_re)}{}) { o $pfxmap{$1} } elsif (s{^_}{}) { o $var_prefix } - elsif (s{^/}{}) { o $dir_prefix } elsif (s{^=_}{}) { o $var_prefix } + elsif (s{^([~^]?)/}{}) { o $pfxmap{$1} } elsif (s{^=/}{}) { o $dir_name } - elsif (s{^\^}{}) { o "\$(top_srcdir)${dir_suffix}" } - elsif (s{^\}}{}) { o "\$(abs_top_srcdir)${dir_suffix}" } - elsif (s{^(?:[ \t]+([~^]))?(?=[ \t])}{}) { - my $prefix = - !$1 ? $dir_prefix : - $1 eq '~' ? '$(abs_top_srcdir)'.$dir_suffix : - $1 eq '~' ? '$(abs_top_srcdir)'.$dir_suffix : - die; + elsif (s{^([~^]?)(?=[ \t])}{}) { + my $prefix = $pfxmap{$1} // die; my $after=''; if (m{([ \t])$esc}) { ($_,$after) = ($`, $1.$'); } s{(?<=[ \t])(?=\S)(?!\\\s*$)}{$prefix}g; @@ -264,7 +265,7 @@ sub process_tree() { foreach my $v (qw(top_srcdir abs_top_srcdir)) { o "$v=\@$v@\n"; } - o "MAKEFILES :=\n"; + o "SUBDIRMK_MAKEFILES :=\n"; o "MAKEFILE_TEMPLATES :=\n"; o "SUBDIRMK_MAKEFILES += Subdir.mk\n"; foreach my $subdir (@subdirs) {