shithub: kwa

ref: 23b63e6c9668efb47e01ebfca03b0aed5cbbe327
dir: /test/t.assert/

View raw version 
# tests whether function returns sensible type bits

function assert(cond) { # assertion
    if (!cond) print "   >>> assert failed <<<"
}

function i(x) { return x }

{ m = length($1); n = length($2); n = i(n); assert(m > n) }