646b892680
Some checks failed
Periodic Merges (6h) / master → staging-nixos (push) Failing after 12m50s
Periodic Merges (6h) / master → staging-next (push) Failing after 12m54s
Periodic Merges (24h) / merge-base(master,staging) → haskell-updates (push) Failing after 11m54s
Periodic Merges (6h) / staging-next → staging (push) Failing after 12m13s
Periodic Merges (24h) / staging-next-25.05 → staging-25.05 (push) Failing after 13m24s
Periodic Merges (24h) / release-25.05 → staging-next-25.05 (push) Failing after 14m28s
22 lines
463 B
Bash
22 lines
463 B
Bash
# Exit with backtrace and error message
|
|
#
|
|
# Usage: die "Error message"
|
|
die() {
|
|
# Let us be a little sloppy with errors, because otherwise the final
|
|
# invocation of `caller` below will cause the script to exit.
|
|
set +e
|
|
|
|
# Print our error message
|
|
printf "\nBuilder called die: %b\n" "$*"
|
|
printf "Backtrace:\n"
|
|
|
|
# Print a backtrace.
|
|
local frame=0
|
|
while caller $frame; do
|
|
((frame++));
|
|
done
|
|
printf "\n"
|
|
|
|
exit 1
|
|
}
|