From: Eric Blake <ebb9@byu.net>
Date: Tue, 9 Dec 2008 17:47:19 +0000 (-0700)
Subject: Fix m4_location inside m4_wrap with m4 1.4.5.
X-Git-Tag: v2.63b~60
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=0aae415c0c873d72b660927e6d1b648a7b438afe;p=thirdparty%2Fautoconf.git

Fix m4_location inside m4_wrap with m4 1.4.5.

* lib/m4sugar/m4sugar.m4 (m4_undefine): Redefine m4_location
inside wrapped text if older m4 is detected.
Reported by William Pursell.

Signed-off-by: Eric Blake <ebb9@byu.net>
---

diff --git a/ChangeLog b/ChangeLog
index 17eadc780..fb31bfdd4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2008-12-09  Eric Blake  <ebb9@byu.net>
+
+	Fix m4_location inside m4_wrap with m4 1.4.5.
+	* lib/m4sugar/m4sugar.m4 (m4_undefine): Redefine m4_location
+	inside wrapped text if older m4 is detected.
+	Reported by William Pursell.
+
 2008-12-08  William Pursell  <bill.pursell@gmail.com>  (tiny change)
 	and Eric Blake  <ebb9@byu.net>
 
diff --git a/lib/m4sugar/m4sugar.m4 b/lib/m4sugar/m4sugar.m4
index e3b712adc..fe6af4fb5 100644
--- a/lib/m4sugar/m4sugar.m4
+++ b/lib/m4sugar/m4sugar.m4
@@ -200,6 +200,7 @@ m4_copy([m4_undefine], [_m4_undefine])
 
 # m4_location
 # -----------
+# Output the current file, colon, and the current line number.
 m4_define([m4_location],
 [__file__:__line__])
 
@@ -3055,15 +3056,19 @@ m4_pattern_forbid([^dnl$])
 # is available for faster checks of dereferencing undefined macros.
 # But if it is missing, we assume we are being run by M4 1.4.x, that
 # $@ recursion is quadratic, and that we need foreach-based
-# replacement macros.  Use the raw builtin to avoid tripping up
-# include tracing.  Meanwhile, avoid m4_copy, since it temporarily
-# undefines m4_defn.
+# replacement macros.  Also, m4 prior to 1.4.8 loses track of location
+# during m4wrap text; __line__ should never be 0.
+#
+# Use the raw builtin to avoid tripping up include tracing.
+# Meanwhile, avoid m4_copy, since it temporarily undefines m4_defn.
 m4_ifdef([__m4_version__],
 [m4_debugmode([+d])
 m4_define([m4_defn], _m4_defn([_m4_defn]))
 m4_define([m4_popdef], _m4_defn([_m4_popdef]))
 m4_define([m4_undefine], _m4_defn([_m4_undefine]))],
-[m4_builtin([include], [m4sugar/foreach.m4])])
+[m4_builtin([include], [m4sugar/foreach.m4])
+m4_wrap_lifo([m4_if(__line__, [0], [m4_pushdef([m4_location],
+]]m4_dquote(m4_dquote(m4_dquote(__file__:__line__)))[[)])])])
 
 # Rewrite the first entry of the diversion stack.
 m4_divert([KILL])