summaryrefslogtreecommitdiffstats
path: root/contrib/awk/awklib/eg/lib/assert.awk
blob: bbfc0669bb79f4826e8eacf7e9bcf4570e70a3ed (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
# assert --- assert that a condition is true. Otherwise exit.

#
# Arnold Robbins, arnold@gnu.org, Public Domain
# May, 1993

function assert(condition, string)
{
    if (! condition) {
        printf("%s:%d: assertion failed: %s\n",
            FILENAME, FNR, string) > "/dev/stderr"
        _assert_exit = 1
        exit 1
    }
}

END {
    if (_assert_exit)
        exit 1
}
OpenPOWER on IntegriCloud