pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
2004-05-01
2004-05-01 14:51:59 by Martin Stjernholm <mast@lysator.liu.se>
51d2a57bea4a25b61a1127ccda03b5417a8c9955 (
15
lines) (+
14
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
Added some combine_path tests that didn't work in 7.4.
Rev: src/testsuite.in:1.724
1:
-
test_true([["$Id: testsuite.in,v 1.
723
2004/05/01
12
:
19
:
40
nilsson
Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
724
2004/05/01
14
:
51
:
59
mast
Exp $"]]);
// This triggered a bug only if run sufficiently early. test_compile_any([[#pike 7.2]])
8526:
test_eq([[combine_path("/","/fo\1111/bar/ga\11111zonk/../../")]],"/fo\1111/") test_eq([[combine_path("/","/fo\1111/bar/gazonk/../../")]],"/fo\1111/")
+
test_eq([[combine_path("foo", "../bar")]],"bar")
+
test_eq([[combine_path("foo/", "../bar")]],"bar")
+
test_eq([[combine_path("foo/", "../bar/")]],"bar/")
+
test_eq([[combine_path("foo/.", "../bar")]],"bar")
+
test_eq([[combine_path("foo", "..")]],".")
+
test_eq([[combine_path("foo/", "..")]],".")
+
test_eq([[combine_path("foo/.", "..")]],".")
+
test_eq([[combine_path(".", "bar")]],"bar")
+
test_eq([[combine_path("./", "bar")]],"bar")
+
test_eq([[combine_path(".", "../bar")]],"../bar")
+
test_eq([[combine_path("./", "../bar")]],"../bar")
+
// - combine_path_nt test_eq([[combine_path_nt("/","/fo\1111/bar/gazonk/../../")]],"/fo\1111/") test_eq([[combine_path_nt("a:/","/fo\1111/bar/gazonk/../../")]],"a:/fo\1111/")