From e74cde76c104df82b120a7b13964cb786da8f565 Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Mon, 22 May 2023 20:18:50 +0200
Subject: community -> extra

---
 extra/haskell-servant-swagger/PKGBUILD | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100644 extra/haskell-servant-swagger/PKGBUILD

(limited to 'extra/haskell-servant-swagger')

diff --git a/extra/haskell-servant-swagger/PKGBUILD b/extra/haskell-servant-swagger/PKGBUILD
new file mode 100644
index 00000000..dff1fac9
--- /dev/null
+++ b/extra/haskell-servant-swagger/PKGBUILD
@@ -0,0 +1,30 @@
+# first, we replace the hardcoded min/max of int
+
+eval "$(
+  declare -f check | \
+    sed '
+      3 a find . -type f -exec sed -i '"'"'s/922337203685477580\\([78]\\)/214748364\\1/g; s/9\\.22337203685477580\\([78]\\)e18/2.14748364\\1e9/g'"'"' {} \\;
+      s/runhaskell Setup test/_check_diff \\0/
+    '
+)"
+
+# and then we make the check insensitive to changes of order
+
+_check_diff() {
+  if ! "$@" > check.log; then
+    if ! diff -u <(
+      grep '^\s*expected:' check.log | \
+        sed 's/^[^:]*://' | \
+        tr '{},' '\n' | \
+        sort
+    ) <(
+      grep '^\s*but got:' check.log | \
+        sed 's/^[^:]*://' | \
+        tr '{},' '\n' | \
+        sort
+    ); then
+      cat check.log
+      return 1
+    fi
+  fi
+}
-- 
cgit v1.2.3-54-g00ecf