FIX: split-path was returning none for these paths: %/, %./ a…

…nd `%../`

resolves: Oldes/Rebol-issues#2474

src/mezz/base-files.reb

@@ -161,8 +161,8 @@ split-path: func [
 	target [file! url! string!]
 	/local dir pos
 ][
-	parse/all target [
-		[#"/" | 1 2 #"." opt #"/"] end (dir: dirize target) |
+	parse target [
+		[#"/" | 1 2 #"." opt #"/"] end (pos: %"" dir: dirize target) |
 		pos: any [thru #"/" [end | pos:]] (
 			all [empty? dir: copy/part target at head target index? pos dir: %./]
 			all [find [%. %..] pos: to file! pos insert tail pos #"/"]

src/tests/units/series-test.r3

@@ -1891,6 +1891,10 @@ Rebol [
 	--assert [%./ %dir]  = split-path %dir
 	--assert [%./ %dir/] = split-path %dir/
 	--assert [%dir/ %file.txt] = split-path %dir/file.txt
+	;@@ https://github.com/Oldes/Rebol-issues/issues/2474
+	--assert [%/ %""] = split-path %/
+	--assert [%./ %""] = split-path %./
+	--assert [%../ %""] = split-path %../
 --test-- "split-path url!"
 	--assert [http://foo.net/ %aa.txt] = split-path http://foo.net/aa.txt
 	--assert [http:// %foo.net/] = split-path http://foo.net/ ;@@ could be better result!