Branch: Tag:

1999-08-08

1999-08-08 17:32:35 by Martin Stjernholm <mast@lysator.liu.se>

Verify some properties of sprintf("%t",foo).

Rev: src/testsuite.in:1.185

1: - stest_true([["$Id: testsuite.in,v 1.184 1999/08/03 21:31:05 noring Exp $"]]) + stest_true([["$Id: testsuite.in,v 1.185 1999/08/08 17:32:35 mast Exp $"]])   cond([[all_constants()->_verify_internals]],   [[    test_do(_verify_internals())
3026:   test_eq(sprintf("%.-2f",-31415.9267),"-31400")   test_eq(sprintf("%.-10f",31415.9267),"0")   test_eq(sprintf("%20.-3f", 31415.92670)," 31000") + test_eq(sprintf("%t", ({"a"})), "array") + test_any([[array(string) a = ({"a"}); return sprintf("%t", a);]], "array") + test_eq(sprintf("%t", 0), "int") + test_any([[array(string) a = 0; return sprintf("%t", a);]], "int")      // - sizeof   test_eq(sizeof("felbar"),6)