tests: Test &TARGETS feature

[subdirmk.git] / generate

diff --git a/generate b/generate
index e1efc06a95bf11186df3f92c2d10cabf5d5552d4..e853912d622f0a6aebd007179f3ddaaf36b72692 100755 (executable)
--- a/generate
+++ b/generate
@@ -155,6 +155,10 @@ sub process_input_mk ($$$$$$$$$) {
            $buffering_output='';
        } elsif (m#^\s*$esc\:([a-z][-0-9a-z_]*)#) {
            die "unknown directive $1";
+       } elsif (s{^\s*${esc}TARGETS(?:_([0-9a-zA-Z_]+))?(?=\W)}{}) {
+           my $t = $1 // 'all';
+           o target_varname($var_prefix, $t);
+           $targets->{$t} //= [ ];
        }
        for (;;) {
            unless (s{^(.*?)$esc}{}) { o $_; last; }
@@ -162,11 +166,6 @@ sub process_input_mk ($$$$$$$$$) {
            if (s{^\\$esc}{}) { o "$$esclitr" }
            elsif (s{^\\\$}{}) { o '$' }
            elsif (s{^$esc}{}) { o "$$esclitr$$esclitr" }
-           elsif (s{^TARGETS(?:_([0-9a-zA-Z_]+))?(?=\W)}{}) {
-               my $t = $1 // 'all';
-               o target_varname($var_prefix, $t);
-               $targets->{$t} //= [ ];
-           }
            elsif (m{^(?=$caps_re)}) { o $var_prefix }
            elsif (s{^\$([A-Za-z]\w+)}{}) { o "\$(${var_prefix}$1)" }
            elsif (s{^([~^]?)(?=$lc_re)}{}) { o $pfxmap{$1} }