Code perfectionism.

* gettext-tools/src/format-lisp.c (VERIFY_LIST): Remove first, unused definition
of this macro.
* gettext-tools/src/format-scheme.c (VERIFY_LIST): Likewise.

diff --git a/gettext-tools/src/format-lisp.c b/gettext-tools/src/format-lisp.c
index 81e89f3a17c977197cedcca1103476f0a0cd1c27..2491256db66d07c13fae2dd909af6063ba084ae5 100644 (file)
--- a/gettext-tools/src/format-lisp.c
+++ b/gettext-tools/src/format-lisp.c
@@ -34,9 +34,8 @@
 #define _(str) gettext (str)
 
 
-/* Assertion macros.  Could be defined to empty for speed.  */
+/* Assertion macro.  Could be defined to empty for speed.  */
 #define ASSERT(expr) if (!(expr)) abort ();
-#define VERIFY_LIST(list) verify_list (list)
 
 
 /* Lisp format strings are described in the Common Lisp HyperSpec,
@@ -181,6 +180,7 @@ verify_list (const struct format_arg_list *list)
   ASSERT (total_repcount == list->repeated.length);
 }
 
+/* Assertion macro.  Could be defined to empty for speed.  */
 #define VERIFY_LIST(list) verify_list (list)
 
 

diff --git a/gettext-tools/src/format-scheme.c b/gettext-tools/src/format-scheme.c
index e473a985672be7f93737dec7fb449355b3969c3c..0264cf892d2b6b2f9f4abeca1e436c179eb68710 100644 (file)
--- a/gettext-tools/src/format-scheme.c
+++ b/gettext-tools/src/format-scheme.c
@@ -36,9 +36,8 @@
 #define _(str) gettext (str)
 
 
-/* Assertion macros.  Could be defined to empty for speed.  */
+/* Assertion macro.  Could be defined to empty for speed.  */
 #define ASSERT(expr) if (!(expr)) abort ();
-#define VERIFY_LIST(list) verify_list (list)
 
 
 /* Scheme format strings are described in the GNU guile documentation,
@@ -184,6 +183,7 @@ verify_list (const struct format_arg_list *list)
   ASSERT (total_repcount == list->repeated.length);
 }
 
+/* Assertion macro.  Could be defined to empty for speed.  */
 #define VERIFY_LIST(list) verify_list (list)