pike.git/ src/ testsuite.in

Branch: Tag:

1998-04-16

1998-04-16 01:24:10 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more tests

Rev: src/testsuite.in:1.92

1: - test_true([["$Id: testsuite.in,v 1.91 1998/04/14 22:09:49 hubbe Exp $"]]) + test_true([["$Id: testsuite.in,v 1.92 1998/04/16 01:24:10 hubbe Exp $"]])   test_eq(1e1,10.0)   test_eq(1E1,10.0)   test_eq(1e+1,10.0)
190:   test_program(inherit test; inherit TEST; )      test_compile_error(class c { object(Stdio.File) foo=class {} ();}) + test_compile_error(class c { object(Stdio.File) foo=class {} ();}) + test_compile_error(class c { object(Stdio.File) foo=class {} ();}) + test_compile_error(class c { object(Stdio.File) foo=class foobar {} ();})   test_do(class c { object foo; object(Regexp) bar=foo; })   test_do(class c { object(Stdio.File) foo; object bar=foo; })   test_any(if(int i=1) return i; return 0;,1)
592:   test_any([[mixed a,b; sscanf("foo","%c%s",b,a); return a]],"oo")   test_any([[mixed a,b; return sscanf("1.0","%f",a)]],1)   test_any([[mixed a,b; sscanf("1.0","%f",a); return a]],1.0) + test_any([[mixed a,b; sscanf("-z ","%[-z]%s",a,b); return a]],"-z") + test_any([[mixed a,b; sscanf("-z ","%[z-]%s",a,b); return a]],"-z")   test_any([[mixed a,b; sscanf("abcdeFGji","%[a-z]%s",a,b); return a]],"abcde")   test_any([[mixed a,b; sscanf("abcdeFGji","%[a-z]%s",a,b); return b]],"FGji")   
607:   test_any([[mixed a; sscanf("abc","%2s",a); return a]],"ab")   test_any([[mixed a; sscanf("ac","%3s",a); return a]],0)    + test_equal([[array_sscanf("10 20 30","%d %d %d")]],[[({10,20,30})]]) + test_equal([[array_sscanf("1 2 3 4 5 6 7 8 9","%d %d %d %d %d %d %d %d %s")]],[[({1,2,3,4,5,6,7,8,"9"})]]) + test_equal([[array_sscanf("abc","%{%c%}")]],[[ ({ ({ ({'a'}), ({'b'}), ({'c'}) }) }) ]]) +    // Basics   test_true(1)   test_true("")