pike.git/
bin/
test_pike.pike
Branch:
Tag:
Non-build tags
All tags
No tags
2004-02-28
2004-02-28 23:23:46 by Martin Nilsson <mani@lysator.liu.se>
f52ca1784081b5c24f204eba7775b3af1d5b440f (
4
lines) (+
3
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
Prevent directories with no_testsuites from being searched.
Rev: bin/test_pike.pike:1.92
1:
#! /usr/bin/env pike
-
/* $Id: test_pike.pike,v 1.
91
2004/
01
/
15
17
:
48
:
40
nilsson Exp $ */
+
/* $Id: test_pike.pike,v 1.
92
2004/
02
/
28
23
:
23
:
46
nilsson Exp $ */
#if !constant(_verify_internals) #define _verify_internals()
42:
array(string) ret=({}); if(array(string) s=get_dir(dir||".")) {
+
if(has_value(s,"no_testsuites")) return ret;
foreach(s, string file) { switch(file)