System.Filepath: add expand_home test

Author: tsuyoshicho

test/System/Filepath.vimspec

@@ -1,5 +1,6 @@
 let s:V = vital#vital#new()
 let s:is_windows = has('win32')
+let s:is_mac = has('mac')
 
 Describe System.Filepath
   Before all
@@ -121,6 +122,53 @@ Describe System.Filepath
     End
   End
 
+  Describe .expand_home()
+    if s:is_windows
+      It [windows] non home path arre no expanded, there are same.
+        let path = 'C:/Hoge'
+        let ret = FP.expand_home(path)
+        Assert Equals(ret, path)
+      End
+    else
+      It [unix] non home path arre no expanded, there are same.
+        let path = '/Hoge'
+        let ret = FP.expand_home(path)
+        Assert Equals(ret, path)
+      End
+    endif
+    It expand head ~ home path
+      let path = '~/Hoge'
+      let ret = FP.expand_home(path)
+      Assert Equals(ret, $HOME . FP.separator() . 'Hoge')
+    End
+    It  include .. in path no-expand, but head ~ home expanded.
+      if s:is_windows
+        " base shellslash not set need
+        let target = '~\Hoge\..\Fuga'
+      else
+        let target = '~/Hoge/../Fuga'
+      endif
+      let path = '~' . FP.separator() . target
+      let ret = FP.expand_home(path)
+      Assert Equals(ret, $HOME . FP.separator() . target)
+    End
+    if s:is_windows
+      " need completeslash test
+    else
+      " need ~user test
+      It [unix] ~user expand check
+        let path = '~root/Hoge'
+        let ret = FP.expand_home(path)
+        if s:is_mac
+          let expect = '/var/root/Hoge'
+        else
+          let expect = '/root/Hoge'
+        endif
+        Assert Equals(ret, expect)
+      End
+    endif
+  End
+
   Describe .winpath()
     It should substitute slashes in {path} to backslashes
       let path = '/Foo/Bar/Hoge.txt'