source: vendor/gawk/3.1.5/awklib/eg/lib/assert.awk@ 3076

# assert --- assert that a condition is true. Otherwise exit.

#
# Arnold Robbins, [email protected], 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
}