From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 13 Nov 2019 22:03:57 +0000 (+0000)
Subject: New &# feature
X-Git-Tag: subdirmk/0.1~46
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?p=subdirmk.git;a=commitdiff_plain;h=975c0d74cb53a3c26850329274c9e533827c495d;ds=sidebyside

New &# feature

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/subdirmk/README b/subdirmk/README
index 8dfebc6..cc309f6 100644
--- a/subdirmk/README
+++ b/subdirmk/README
@@ -192,6 +192,9 @@ empty string).
 
 &!<lwsp>	disables & until EOL (and then disappears)
 
+&#	delete everything to end of line
+	(useful if the RHS contains unrecognise & constructions)
+
 &!STUFF
 	changes the escape sequence from & to literally STUFF
 	STUFF may be any series of of non-whitespace characters,
diff --git a/subdirmk/generate b/subdirmk/generate
index 8a5daa6..486bdc5 100755
--- a/subdirmk/generate
+++ b/subdirmk/generate
@@ -165,6 +165,8 @@ sub process_input_mk ($$$$$$$$) {
 		s{(?<=[ \t])(?=\S)(?!\\\s*$)}{$prefix}g;
 		o $_;
 		$_ = $after;
+	    } elsif (s{^\#}{}) {
+		$_ = '';
 	    } elsif (s{^![ \t]+}{}) {
 		o $_;
 		$_ = '';