Lines Matching defs:is
71 # Ensure that the message is properly escaped.
135 sub is ($$@) {
168 "# but it is.\n");
188 # (all string operators have alphabetic names, so tr/a-z// is true)
200 # Check that $got is within $range of $expected
201 # if $range is 0, then check it's exact
202 # else if $expected is 0, then $range is an absolute value
203 # otherwise $range is a fractional error.
210 # This is a fail, but doesn't need extra diagnostics
212 # This is a fail
215 # This is also a fail
218 # Within 0 is ==
221 # If expected is 0, treat range as absolute
309 print STDOUT "# key ", _qq($key), " is ", _qq($value),
418 # the test itself is one; we can't do two more, so
482 # which is a bit heavyweight to do here.
591 # Combination of run_perl() and is().