From 9d48fef0aa8882dfe604bc99b5718899879549ad Mon Sep 17 00:00:00 2001
From: Ulrich Drepper <drepper@redhat.com>
Date: Fri, 26 Jan 2001 02:42:11 +0000
Subject: Update.

	* conform/conformtest.pl: Implement handling of recursive
	allow-header.

	* conform/data/locale.h-data: Add new struct lconv members.
---
 conform/conformtest.pl | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

(limited to 'conform/conformtest.pl')

diff --git a/conform/conformtest.pl b/conform/conformtest.pl
index 810d263..e2c3b06 100644
--- a/conform/conformtest.pl
+++ b/conform/conformtest.pl
@@ -268,6 +268,7 @@ while ($#headers >= 0) {
   my($missing);
   my(@allow) = ();
   my(@allowheader) = ();
+  my(%seenheader) = ();
   my($prepend) = $mustprepend{$h};
 
   printf ("Testing <$h>\n");
@@ -730,7 +731,10 @@ while ($#headers >= 0) {
 		   "Macro \"$macro\" is not available.", $missing, 0);
     } elsif (/^allow-header *(.*)/) {
       my($pattern) = $1;
-      push @allowheader, $pattern;
+      if ($seenheader{$pattern} != 1) {
+	push @allowheader, $pattern;
+	$seenheader{$pattern} = 1;
+      }
       next control;
     } elsif (/^allow *(.*)/) {
       my($pattern) = $1;
@@ -782,8 +786,10 @@ while ($#headers >= 0) {
       } elsif (/^macro *([^	]*)/) {
 	push @allow, $1;
       } elsif (/^allow-header *(.*)/) {
-	# XXX We should have a test for recursive dependencies here.
-	push @allowheader, $1;
+	if ($seenheader{$1} != 1) {
+	  push @allowheader, $1;
+	  $seenheader{$1} = 1;
+	}
       } elsif (/^allow *(.*)/) {
 	push @allow, $1;
       }
-- 
cgit v1.1