From 9e2f460998c85976f00f6f5d75a0098155ba196c Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Thu, 7 Jun 2007 21:11:56 +0000
Subject: reimport from latest checkout

---
 test/diff.pl | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100755 test/diff.pl

(limited to 'test/diff.pl')

diff --git a/test/diff.pl b/test/diff.pl
new file mode 100755
index 0000000..e081986
--- /dev/null
+++ b/test/diff.pl
@@ -0,0 +1,19 @@
+#!/usr/bin/perl
+
+use lib qw(/usr/lib/libDrakX);
+use Xconfig::glx;
+use MDK::Common;
+
+use Data::Dumper;
+
+my ($extension, $file1, $file2) = @ARGV;
+
+my ($extensions1, $extensions2) = map {
+    print Dumper(Xconfig::glx::parse_glxinfo(file => $_));
+    Xconfig::glx::parse_glxinfo(file => $_)->{extensions}{$extension};
+} $file1, $file2;
+
+print Dumper(
+    [ difference2($extensions1, $extensions2) ],
+    [ difference2($extensions2, $extensions1) ],
+);
-- 
cgit v1.2.1