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.
613
2003/03/
02
17
:
01
:
28
grubba
Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
614
2003/03/
04
23
:
33
:
50
mast
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:1669:
res = compile_string (#"\ mixed foo() {return .testsuite_test_dir.foo();}", "test")()->foo(); }; replace_master (orig_master); if (err) throw (err); Stdio.recursive_rm("testsuite_test_dir.pmod"); return res; ]], (<>));
+
test_do([[
+
Stdio.recursive_rm ("testsuite_test_dir.pmod");
+
mkdir ("testsuite_test_dir.pmod");
+
+
Stdio.write_file ("testsuite_test_dir.pmod/A.pmod", #"\
+
string pof() {return testsuite_test_dir.A.bingo();}
+
string bingo () {return \"17\";}");
+
+
object orig_master = master();
+
replace_master (object_program (orig_master)());
+
master()->add_module_path (getcwd());
+
mixed err = catch {
+
compile_string (#"\
+
string foo() {
+
return testsuite_test_dir.A.pof();
+
}", "test");
+
};
+
replace_master (orig_master);
+
if (err) throw (err);
+
+
Stdio.recursive_rm ("testsuite_test_dir.pmod");
+
]])
+
cond(0,[[ test_do([[ // This is a case of cyclic references I think should work, but // afaict it's not possible without changing the resolve methods // thoroughly. /mast Stdio.recursive_rm ("testsuite_test_dir.pmod"); mkdir ("testsuite_test_dir.pmod"); Stdio.write_file ("testsuite_test_dir.pmod/A.pmod", #"\ .B.B b() {}