From 66185b48ea73336d3eed4e013e553d07fb602743 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 28 Dec 2019 12:58:46 +0000
Subject: [PATCH] Warnings: generate: Basic `wrn' function

This is sufficient to add warnning calls to the code.  We'll soup it
up later.  No callers yet.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 generate | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/generate b/generate
index f5c416d..9be1cfb 100755
--- a/generate
+++ b/generate
@@ -176,6 +176,11 @@ sub err ($) {
     die "subdirmk: ${err_file}:$.: $m\n";
 }
 
+sub wrn ($) {
+    my ($m) = @_;
+    print STDERR "subdirmk: warning: ${err_file}:$.: $m\n";
+}
+
 sub ddbl_only ($) {
     my ($e) = @_;
     return if $ddbl;
-- 
2.30.2