From d5825747ca79cd7459d471b89a9a53d471b7f6b9 Mon Sep 17 00:00:00 2001
From: Jens Petersen <petersen@redhat.com>
Date: Mon, 23 Mar 2015 11:45:54 +0900
Subject: [PATCH] a primitive ABI checking script

---
 abi-check.sh | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 abi-check.sh

diff --git a/abi-check.sh b/abi-check.sh
new file mode 100644
index 0000000..f2a47fd
--- /dev/null
+++ b/abi-check.sh
@@ -0,0 +1,14 @@
+#!/bin/sh
+
+REL=$(rpm -q --qf "%{release}" ghc-compiler)
+ARCH=$(arch)
+PKGS=$(rpm -qa | grep -- -$REL | grep -v -- -devel | sort | sed -e "s/-[0-9.]\+-.*//")
+
+for i in $PKGS; do
+    LOCAL=$(rpm -q --provides $i | grep ^ghc\( | grep -v =)
+    REPO=$(dnf repoquery -q --provides $i | grep ^ghc\( | grep -v = | sort | uniq)
+    if [ "$LOCAL" != "$REPO" ]; then
+        echo $LOCAL
+        echo $REPO
+    fi
+done