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
442 B
Bash
22 lines
442 B
Bash
# Always failing assertion with a message.
|
|
#
|
|
# Example:
|
|
# fail "It should have been but it wasn't to be"
|
|
function fail() {
|
|
echo -e "$1"
|
|
exit 1
|
|
}
|
|
|
|
|
|
function assertStringEqual() {
|
|
if ! diff <(echo "$1") <(echo "$2") ; then
|
|
fail "Actual value: \"$1\"\nExpected value: \"$2\""
|
|
fi
|
|
}
|
|
|
|
function assertStringContains() {
|
|
if ! echo "$1" | grep -q "$2" ; then
|
|
fail "expected \"$1\" to contain \"$2\""
|
|
fi
|
|
}
|