From 2c831f2234456862260d1a9f75a957e8b25b760a Mon Sep 17 00:00:00 2001
From: Per Hedbor <ph@opera.com>
Date: Sun, 22 Mar 1998 02:44:37 +0100
Subject: [PATCH] werror with autmatic sprintf
Rev: lib/master.pike:1.66
---
lib/master.pike | 11 ++++++++++-
1 file changed, 10 insertions(+), 1 deletion(-)
diff --git a/lib/master.pike b/lib/master.pike
index ee1d30dd91..86bd031586 100644
--- a/lib/master.pike
+++ b/lib/master.pike
@@ -1,4 +1,4 @@
-/* $Id: master.pike,v 1.65 1998/01/28 01:52:39 hubbe Exp $
+/* $Id: master.pike,v 1.66 1998/03/22 01:44:37 per Exp $
*
* Master-file for Pike.
*/
@@ -294,8 +294,17 @@ object new(mixed prog, mixed ... args)
/* Note that create is called before add_precompiled_program
*/
+void my_werror(mixed ... args)
+{
+ if(sizeof(args) == 1)
+ werror(@args);
+ else
+ werror(sprintf(@args));
+}
+
void create()
{
+ add_constant("werror", my_werror);
add_constant("basename",basename);
add_constant("dirname",dirname);
add_constant("is_absolute_path",is_absolute_path);
--
GitLab