Changes to m4/m4/utility.c,v

[Eric Blake]

CVSROOT:        /sources/m4
Module name:    m4
Changes by:     Eric Blake <ericb>      06/10/04 03:57:01

Index: m4/utility.c
===================================================================
RCS file: /sources/m4/m4/m4/utility.c,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -b -r1.49 -r1.50
--- m4/utility.c        26 Sep 2006 13:19:26 -0000      1.49
+++ m4/utility.c        4 Oct 2006 03:57:00 -0000       1.50
@@ -21,10 +21,10 @@
 #include <config.h>
 
 #include "m4private.h"
+#include "progname.h"
 #include "verror.h"
 #include "xvasprintf.h"
 
-
 static const char * skip_space (m4 *, const char *);
 
 
@@ -198,3 +198,22 @@
       free (full_format);
     }
 }
+
+
+/* Wrap the gnulib progname module, to avoid exporting a global
+   variable from a library.  Retrieve the program name for use in
+   error messages and the __program__ macro.  */
+const char *
+m4_get_program_name (void)
+{
+  return program_name;
+}
+
+/* Wrap the gnulib progname module, to avoid exporting a global
+   variable from a library.  Set the program name for use in error
+   messages and the __program__ macro to argv[0].  */
+void
+m4_set_program_name (const char *name)
+{
+  set_program_name (name);
+}