X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?p=subdirmk.git;a=blobdiff_plain;f=generate;fp=generate;h=510612993f34fe82f8c6f60689d73552d5d7eeb6;hp=bae0995bef30dc90fbd19e7cb511d61a0887b99a;hb=40c6be70076365e0bc2b69e4368b7338a2e452a8;hpb=ee2747a8e9407fb19f226f3daa682c3f45b2778a

diff --git a/generate b/generate
index bae0995..5106129 100755
--- a/generate
+++ b/generate
@@ -177,6 +177,7 @@ our @warn_ena_dfl = map { $_ => 1 } qw(
     local+global
     single-char-var
     unknown-warning
+    broken-var-ref
 );
 our %warn_ena = @warn_ena_dfl;
 
@@ -332,6 +333,10 @@ sub process_input_mk ($$$$) {
 		    wrn 'single-char-var',
 		    'possibly confusing unbracketed single-char $-expansion';
 		}
+		elsif (m{^$esc}) {
+		    wrn 'broken-var-ref',
+		    'broken $&... expansion; you probably meant &$';
+		}
 		elsif (m{^\(($esc)?([^()\$]+)\)} ||
 		       m{^\{($esc)?([^{}\$]+)\}}) {
 		    $note_varref->($2,!!$1);