pike.git/
bin/
test_pike.pike
Branch:
Tag:
Non-build tags
All tags
No tags
1999-10-21
1999-10-21 21:19:12 by Henrik Grubbström (Grubba) <grubba@grubba.org>
0c7574f1520bb1d1935701da7774f5d5704801d6 (
7
lines) (+
6
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
Added check-level 4, which calls gc() between every test.
Rev: bin/test_pike.pike:1.28
1:
#!/usr/local/bin/pike
-
/* $Id: test_pike.pike,v 1.
27
1999/
08
/
30
06:
21:
17
hubbe
Exp $ */
+
/* $Id: test_pike.pike,v 1.
28
1999/
10
/
21
21:
19:12
grubba
Exp $ */
import Stdio;
179:
mixed a,b; if(check) _verify_internals();
+
if(check>3) {
+
gc();
+
_verify_internals();
+
}
test=tests[e]; if(sscanf(test,"COND %s\n%s",condition,test)==2)