pike.git
/
src
/
testsuite.in
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/testsuite.in:1:
-
test_true([["$Id: testsuite.in,v 1.
618
2003/03/
11
15
:
53
:
34
nilsson Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
619
2003/03/
13
00
:
02
:
49
nilsson Exp $"]]);
// This triggered a bug only if run sufficiently early. test_compile_any([[#pike 7.2]]) cond([[all_constants()->_verify_internals]], [[ test_do(_verify_internals()) ]]); test_eq(1e1,10.0); test_eq(1E1,10.0);
pike.git/src/testsuite.in:2897:
]],"foo") test_eq([[class c { int `()(){ return 4711; } }()(); ]],4711) teste_eval_error(mixed foo=({}); sort(@foo); ) test_compile_error([[int foo() { return 1} ; constant foo=(["foo":foo]); return foo->foo();]]) test_compile_error([[class T{void p(object e,object f){lambda::create(f);}}]]) test_eval_error(array foo=({}); return mkmapping(foo,({1})); ) test_compile_error([[mapping (string:array(string:string)) foo=([]); ]]) test_compile_error([[int a() { switch(random(2)) { case 3: if(random(2)) { case 0: return 1; } else { case 1: return 2; } } }]])
-
test_true(encode_value(0))
+
test_true(encode_value(0)[0]=='\266') define(test_encode, [[ test_equal($1, decode_value(encode_value($1))) test_equal($1, decode_value(encode_value_canonic($1))) ]]) test_eq(replace("foobar","","X"),"fXoXoXbXaXr") test_encode(0) test_encode("") test_encode(0.0) test_encode(1.0) test_encode(-1.0) test_encode(12.0)
pike.git/src/testsuite.in:7721:
cd(".."); #ifdef __NT__ return a==getcwd() && b==a+"\\getcwd_test"; #else return a==getcwd() && b==a+"/getcwd_test"; #endif ]], 1) test_do(Stdio.recursive_rm("getcwd_test")) // - getegid
+
ifefun(getegid,[[
+
test_true(intp(getegid()))
+
test_true(getegid()==getegid())
+
]])
+
// - getenv
-
+
// - geteuid
-
+
ifefun(geteuid,[[
+
test_true(intp(geteuid()))
+
test_true(geteuid()==geteuid())
+
]])
+
// - getgid
-
+
ifefun(getgid,[[
+
test_true(intp(getgid()))
+
test_true(getgid()==getgid())
+
]])
+
// - getgrent // - getgrgid // - getgrnam // - getgroups // - gethostbyaddr // - gethostbyname // - gethostname test_true(stringp(gethostname())) test_true(sizeof(gethostname())) // - gethrtime // See time // - gethrvtime
-
+
// - getpgrp
-
+
ifefun(getpgrp,[[
+
test_true(intp(getpgrp()))
+
test_true(getpgrp()==getpgrp())
+
]])
+
// - getpid
-
+
ifefun(getpid,[[
+
test_true(intp(getpid()))
+
test_true(getpid()==getpid())
+
]])
+
// - getppid
-
+
ifefun(getppid,[[
+
test_true(intp(getppid()))
+
test_true(getppid()==getppid())
+
]])
+
// - getpwent // - getpwnam // - getpwuid // - getsid ifefun(getsid,[[ test_true(intp(getsid())) test_true(getsid()==getsid()) ]])
pike.git/src/testsuite.in:8039:
// - mappingp // Tested in foop // - master // - max // - min // Tested in _math // - mkdir
+
// - mkmapping
-
+
test_equal(mkmapping(({}),({})), ([]))
+
test_equal(mkmapping(({0}),({0})), ([0:0]))
+
test_any_equal([[
+
array a=({"a"});
+
return mkmapping(a,a);
+
]], (["a":"a"]))
+
test_equal(mkmapping( ({({})}),({({})}) )[ ({}) ], ({}))
+
// - mkmultiset
-
+
test_equal(mkmultiset(({})), (<>))
+
test_equal(mkmultiset(({0})), (<0>))
+
test_equal(mkmultiset(({(<>)})), (<(<>)>))
// - mktime cond([[all_constants()->mktime]], [[ test_true([[mktime( ([ "sec":58, "isdst":1, "year":98, "mon":3, "mday":26,