From 632660d3d239fdafec46853925185ffbe352505e Mon Sep 17 00:00:00 2001
From: Hideaki Kawai <kayhide@gmail.com>
Date: Mon, 27 Jul 2020 20:05:38 +0900
Subject: [PATCH] Create verify-package script

---
 verify-package | 46 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 46 insertions(+)
 create mode 100755 verify-package

diff --git a/verify-package b/verify-package
new file mode 100755
index 00000000..10ebb7bd
--- /dev/null
+++ b/verify-package
@@ -0,0 +1,46 @@
+#!/usr/bin/env bash
+
+# Script to verify a package to build successfully
+# Provide pacakge name by the first argument
+#
+# Example:
+#  ./verify-package mtl
+# or
+#  ./verify-package mtl-2.2.2
+
+set -eu
+
+die() {
+    >&2 echo "$1"
+    exit 1
+}
+
+package="${1:-}"
+if [[ -z $package ]]; then
+    die "Package name is not given"
+fi
+
+
+here="$(cd "$(dirname "$0")" > /dev/null; pwd)"
+dir="$(mktemp -d tmp.XXXX)"
+
+exit() {
+    cd "$here"
+    rm -rf "$dir"
+}
+trap exit EXIT
+
+cd "$dir"
+stack unpack "$package"
+cd "$(ls | head -n 1)"
+rm -f stack.yaml
+stack init --resolver nightly
+stack build --resolver nightly --haddock --test --bench --no-run-benchmarks
+
+
+cat <<EOF
+
+
+ 🎉 It looks good!
+
+EOF