Mini Shell

Direktori : /proc/self/root/proc/self/root/usr/share/awk/
Upload File :
Current File : //proc/self/root/proc/self/root/usr/share/awk/assert.awk

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

#
# Arnold Robbins, arnold@skeeve.com, 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
}

Zerion Mini Shell 1.0