pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
2001-10-06
2001-10-06 09:23:17 by Mirar (Pontus Hagland) <pike@sort.mirar.org>
6c6776ad0625431cf3dee7d26d60791aa4556e04 (
24
lines) (+
14
/-
10
)
[
Show
|
Annotate
]
Branch:
7.9
bugfix in infokom:350113 test
Rev: src/testsuite.in:1.461
1:
-
test_true([["$Id: testsuite.in,v 1.
460
2001/10/06 09:
14
:
33
mirar Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
461
2001/10/06 09:
23
:
17
mirar Exp $"]]);
cond([[all_constants()->_verify_internals]], [[
1047:
test_any([[ // infokom:350113
-
rm("testsuite_test.pmod");
-
mkdir("testsuite_test.pmod");
-
Stdio.write_file("testsuite_test.pmod/module.pmod",
+
rm("testsuite_test
_dir
.pmod");
+
mkdir("testsuite_test
_dir
.pmod");
+
Stdio.write_file("testsuite_test
_dir
.pmod/module.pmod",
#" .A a() {return 0;} ");
-
Stdio.write_file("testsuite_test.pmod/A.pike",
+
Stdio.write_file("testsuite_test
_dir
.pmod/A.pike",
#" void create (.X x) {.y();} ");
1062:
class handler { void compile_error(string file, int line, string err) { } };
+
werror("foo\n");
catch {
-
compile_string(".testsuite_test.a","test",handler());
+
compile_string("
import \"
.
\"; "
+
"int foo() {
testsuite_test
_dir
.a
(); }
",
+
"test",handler());
};
-
rm("testsuite_test.pmod/module.pmod");
-
rm("testsuite_test.pmod/A.pike");
-
rm("testsuite_test.pmod");
-
+
//
rm("testsuite_test
_dir
.pmod/module.pmod");
+
//
rm("testsuite_test
_dir
.pmod/A.pike");
+
//
rm("testsuite_test
_dir
.pmod");
+
//
return 0; ]],0);