pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
1996-12-02
1996-12-02 07:02:57 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
b5057c19511d931981ee6fa0f9022c0db7786535 (
5
lines) (+
4
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
tests for glob added
Rev: src/testsuite.in:1.11
1:
-
test_true([["$Id: testsuite.in,v 1.
10
1996/
11
/
25
21
:
30
:
39
hubbe Exp $"]])
+
test_true([["$Id: testsuite.in,v 1.
11
1996/
12
/
02
07
:
02
:
57
hubbe Exp $"]])
test_any([[object(File) o=File(); return objectp(o);]],1) test_any([[object o=Regexp("foo"); return objectp(o);]],1) test_any([[object o=Regexp("foo"); return object_program(o);]],Regexp)
47:
test_true(glob("?o?","foo")) test_true(glob("f*","foo")) test_true(glob("*o","foo"))
+
test_true(glob("*<<<*","<<<"))
+
test_true(glob("*<<<*","<<<foo"))
test_false(glob("*f","foo")) test_false(glob("o*","foo")) test_false(glob("?f?","foo"))