@@ -36,67 +36,69 @@ defmodule PathTest do
3636 assert_raise ArgumentError , ~r/ null byte/ , fn -> Path . wildcard ( "foo\0 bar" ) end
3737 end
3838
39- if windows? ( ) do
40- describe "Windows" do
41- test "relative/1" do
42- assert Path . relative ( "C:/usr/local/bin" ) == "usr/local/bin"
43- assert Path . relative ( "C:\\ usr\\ local\\ bin" ) == "usr\\ local\\ bin"
44- assert Path . relative ( "C:usr\\ local\\ bin" ) == "usr\\ local\\ bin"
45-
46- assert Path . relative ( "/usr/local/bin" ) == "usr/local/bin"
47- assert Path . relative ( "usr/local/bin" ) == "usr/local/bin"
48- assert Path . relative ( "../usr/local/bin" ) == "../usr/local/bin"
49- end
50-
51- test "relative_to/2" do
52- assert Path . relative_to ( "D:/usr/local/foo" , "D:/usr/" ) == "local/foo"
53- assert Path . relative_to ( "D:/usr/local/foo" , "d:/usr/" ) == "local/foo"
54- assert Path . relative_to ( "d:/usr/local/foo" , "D:/usr/" ) == "local/foo"
55- assert Path . relative_to ( "D:/usr/local/foo" , "d:/" ) == "usr/local/foo"
56- assert Path . relative_to ( "D:/usr/local/foo" , "D:/" ) == "usr/local/foo"
57- assert Path . relative_to ( "D:/usr/local/foo" , "d:" ) == "D:/usr/local/foo"
58- assert Path . relative_to ( "D:/usr/local/foo" , "D:" ) == "D:/usr/local/foo"
59- end
60-
61- test "type/1" do
62- assert Path . type ( "C:/usr/local/bin" ) == :absolute
63- assert Path . type ( 'C:\\ usr\\ local\\ bin' ) == :absolute
64- assert Path . type ( "C:usr\\ local\\ bin" ) == :volumerelative
65-
66- assert Path . type ( "/usr/local/bin" ) == :volumerelative
67- assert Path . type ( 'usr/local/bin' ) == :relative
68- assert Path . type ( "../usr/local/bin" ) == :relative
69- end
70-
71- test "split/1" do
72- assert Path . split ( "C:\\ foo\\ bar" ) == [ "c:/" , "foo" , "bar" ]
73- assert Path . split ( "C:/foo/bar" ) == [ "c:/" , "foo" , "bar" ]
74- end
39+ describe "Windows" do
40+ @ describetag :windows
41+
42+ test "relative/1" do
43+ assert Path . relative ( "C:/usr/local/bin" ) == "usr/local/bin"
44+ assert Path . relative ( "C:\\ usr\\ local\\ bin" ) == "usr\\ local\\ bin"
45+ assert Path . relative ( "C:usr\\ local\\ bin" ) == "usr\\ local\\ bin"
46+
47+ assert Path . relative ( "/usr/local/bin" ) == "usr/local/bin"
48+ assert Path . relative ( "usr/local/bin" ) == "usr/local/bin"
49+ assert Path . relative ( "../usr/local/bin" ) == "../usr/local/bin"
7550 end
76- else
77- describe "Unix" do
78- test "relative/1" do
79- assert Path . relative ( "/usr/local/bin" ) == "usr/local/bin"
80- assert Path . relative ( "usr/local/bin" ) == "usr/local/bin"
81- assert Path . relative ( "../usr/local/bin" ) == "../usr/local/bin"
82- assert Path . relative ( "/" ) == "."
83- assert Path . relative ( '/' ) == "."
84- assert Path . relative ( [ '/usr' , ?/ , "local/bin" ] ) == "usr/local/bin"
85- end
86-
87- test "type/1" do
88- assert Path . type ( "/usr/local/bin" ) == :absolute
89- assert Path . type ( "usr/local/bin" ) == :relative
90- assert Path . type ( "../usr/local/bin" ) == :relative
91-
92- assert Path . type ( '/usr/local/bin' ) == :absolute
93- assert Path . type ( 'usr/local/bin' ) == :relative
94- assert Path . type ( '../usr/local/bin' ) == :relative
95-
96- assert Path . type ( [ '/usr/' , 'local/bin' ] ) == :absolute
97- assert Path . type ( [ 'usr/' , 'local/bin' ] ) == :relative
98- assert Path . type ( [ '../usr' , '/local/bin' ] ) == :relative
99- end
51+
52+ test "relative_to/2" do
53+ assert Path . relative_to ( "D:/usr/local/foo" , "D:/usr/" ) == "local/foo"
54+ assert Path . relative_to ( "D:/usr/local/foo" , "d:/usr/" ) == "local/foo"
55+ assert Path . relative_to ( "d:/usr/local/foo" , "D:/usr/" ) == "local/foo"
56+ assert Path . relative_to ( "D:/usr/local/foo" , "d:/" ) == "usr/local/foo"
57+ assert Path . relative_to ( "D:/usr/local/foo" , "D:/" ) == "usr/local/foo"
58+ assert Path . relative_to ( "D:/usr/local/foo" , "d:" ) == "D:/usr/local/foo"
59+ assert Path . relative_to ( "D:/usr/local/foo" , "D:" ) == "D:/usr/local/foo"
60+ end
61+
62+ test "type/1" do
63+ assert Path . type ( "C:/usr/local/bin" ) == :absolute
64+ assert Path . type ( 'C:\\ usr\\ local\\ bin' ) == :absolute
65+ assert Path . type ( "C:usr\\ local\\ bin" ) == :volumerelative
66+
67+ assert Path . type ( "/usr/local/bin" ) == :volumerelative
68+ assert Path . type ( 'usr/local/bin' ) == :relative
69+ assert Path . type ( "../usr/local/bin" ) == :relative
70+ end
71+
72+ test "split/1" do
73+ assert Path . split ( "C:\\ foo\\ bar" ) == [ "c:/" , "foo" , "bar" ]
74+ assert Path . split ( "C:/foo/bar" ) == [ "c:/" , "foo" , "bar" ]
75+ end
76+ end
77+
78+ describe "Unix" do
79+ @ describetag :unix
80+
81+ test "relative/1" do
82+ assert Path . relative ( "/usr/local/bin" ) == "usr/local/bin"
83+ assert Path . relative ( "usr/local/bin" ) == "usr/local/bin"
84+ assert Path . relative ( "../usr/local/bin" ) == "../usr/local/bin"
85+ assert Path . relative ( "/" ) == "."
86+ assert Path . relative ( '/' ) == "."
87+ assert Path . relative ( [ '/usr' , ?/ , "local/bin" ] ) == "usr/local/bin"
88+ end
89+
90+ test "type/1" do
91+ assert Path . type ( "/usr/local/bin" ) == :absolute
92+ assert Path . type ( "usr/local/bin" ) == :relative
93+ assert Path . type ( "../usr/local/bin" ) == :relative
94+
95+ assert Path . type ( '/usr/local/bin' ) == :absolute
96+ assert Path . type ( 'usr/local/bin' ) == :relative
97+ assert Path . type ( '../usr/local/bin' ) == :relative
98+
99+ assert Path . type ( [ '/usr/' , 'local/bin' ] ) == :absolute
100+ assert Path . type ( [ 'usr/' , 'local/bin' ] ) == :relative
101+ assert Path . type ( [ '../usr' , '/local/bin' ] ) == :relative
100102 end
101103 end
102104
0 commit comments