libpath-ruby 0.2.1

data/test/unit/util/unix/ts_all.rb

@@ -0,0 +1,22 @@
+#! /usr/bin/env ruby
+#
+# executes all other tests
+
+this_dir = File.expand_path(File.dirname(__FILE__))
+
+# all tc_*rb in current directory
+Dir[File.join(this_dir, 'tc_*rb')].each do |file|
+
+	$stderr.puts "requiring file '#{file}'" if $DEBUG
+
+	require file
+end
+
+# all ts_*rb in immediate sub-directories
+Dir[File.join(this_dir, '*', 'ts_*rb')].each do |file|
+
+	$stderr.puts "requiring file '#{file}'" if $DEBUG
+
+	require file
+end
+

data/test/unit/util/windows/tc_combine_paths.rb

@@ -0,0 +1,131 @@
+#! /usr/bin/env ruby
+
+$:.unshift File.join(File.dirname(__FILE__), *(['..'] * 4), 'lib')
+
+require 'libpath/util/windows'
+
+require 'test/unit'
+
+class Test_LibPath_Util_Windows_combine_paths < Test::Unit::TestCase
+
+	F = ::LibPath::Util::Windows
+
+	def test_no_arguments
+
+		assert_equal '', F.combine_paths()
+	end
+
+	def test_single_argument
+
+		assert_equal ' ', F.combine_paths(' ')
+		assert_equal 'a', F.combine_paths('a')
+		assert_equal 'abcdef/ghi/jkl.mno', F.combine_paths('abcdef/ghi/jkl.mno')
+		assert_equal '/', F.combine_paths('/')
+	end
+
+	def test_relative_cases
+
+		assert_equal 'a\\b\\c/d', F.combine_paths('a', 'b', 'c/d')
+	end
+
+	def test_tail_absolute_cases
+
+		assert_equal 'X:/', F.combine_paths('a', 'X:/')
+		assert_equal 'X:\\', F.combine_paths('a', 'X:\\')
+		assert_equal '\\\\?\\X:\\', F.combine_paths('a', '\\\\?\\X:\\')
+	end
+
+	def test_tail_absolute_cases_2
+
+		assert_equal 'Y:/', F.combine_paths('a', 'X:/', 'Y:/')
+		assert_equal 'Y:\\', F.combine_paths('a', 'X:/', 'Y:\\')
+		assert_equal 'Y:\\', F.combine_paths('a', '\\\\?\\X:/', 'Y:\\')
+		assert_equal '\\\\?\\Y:\\', F.combine_paths('a', 'X:/', '\\\\?\\Y:\\')
+	end
+
+	def test_tail_absolute_cases_3
+
+		assert_equal 'X:\\', F.combine_paths('a', 'X:', '\\')
+		assert_equal 'X:\\', F.combine_paths('a', '\\', 'X:')
+		assert_equal 'X:\\', F.combine_paths('X:', 'a', '\\')
+
+		assert_equal '\\\\?\\X:\\', F.combine_paths('a', '\\\\?\\X:', '\\')
+		assert_equal '\\\\?\\X:\\', F.combine_paths('a', '\\', '\\\\?\\X:')
+		assert_equal '\\\\?\\X:\\', F.combine_paths('\\\\?\\X:', 'a', '\\')
+	end
+
+	def test_tail_absolute_cases_4
+
+		assert_equal 'Z:\\', F.combine_paths('a', 'X:/', '\\', 'Z:')
+
+		assert_equal '\\\\?\\Z:\\', F.combine_paths('a', '\\\\?\\X:/', '\\', '\\\\?\\Z:')
+
+		assert_equal '\\\\?\\UNC\\server\\share/abc', F.combine_paths('a', '\\\\?\\X:/', '/abc', '\\\\?\\UNC\\server\\share')
+
+		assert_equal '\\\\.\\{1234-abcd}/abc', F.combine_paths('a', '\\\\?\\X:/', '/abc', '\\\\.\\{1234-abcd}')
+		assert_equal '\\\\.\\{1234-abcd}/abc', F.combine_paths('a', '\\\\?\\X:/', '\\\\.\\{1234-abcd}', '/abc')
+	end
+
+	def test_tail_absolute_cases_5
+
+		assert_equal 'Z:\\dir\\a\\b', F.combine_paths('a', 'X:/y', '\\dir', 'Z:', 'a', 'b')
+
+		assert_equal 'Z:\\dir\\a\\b', F.combine_paths('a', '\\\\?\\X:/y', '\\dir', 'Z:', 'a', 'b')
+
+		assert_equal '\\\\?\\Z:\\dir\\a\\b', F.combine_paths('a', 'X:/y', '\\dir', '\\\\?\\Z:', 'a', 'b')
+	end
+
+	def test_tail_absolute_cases_6
+
+		assert_equal 'Z:\\b', F.combine_paths('a', 'X:/', 'Z:', 'a', '\\', 'b')
+	end
+
+	def test_tail_absolute_cases_7
+
+		assert_equal 'Z:\\a\\c\\b', F.combine_paths('a', 'X:/', '\\a', 'c', 'Z:', 'b')
+	end
+
+	def test_tail_absolute_cases_8
+
+		assert_equal 'X:/y\\b', F.combine_paths('a', '\\a', 'c', 'Z:', 'X:/y', 'b')
+	end
+
+	def test_tail_absolute_cases_9
+
+		assert_equal 'Z:\\y\\b', F.combine_paths('a', '\\a', 'c', 'X:\\y', 'Z:', 'b')
+		assert_equal 'Z:/y\\b', F.combine_paths('a', '\\a', 'c', 'X:/y', 'Z:', 'b')
+	end
+
+	def test_tail_absolute_cases_10
+
+		assert_equal 'X:\\dir-1\\dir-2\\b', F.combine_paths('a', '\\a', 'c', 'X:/y', '\\dir-1\\dir-2', 'b')
+		assert_equal 'X:\\dir-1/dir-2\\b', F.combine_paths('a', '\\a', 'c', 'X:/y', '\\dir-1/dir-2', 'b')
+
+		assert_equal '/', F.combine_paths('a', '/')
+
+		assert_equal '/', F.combine_paths('a/b/c/d', '/')
+
+		assert_equal '/', F.combine_paths('a', 'b', '/')
+	end
+
+	def test_drive_only
+
+		assert_equal 'D:', F.combine_paths('D:')
+		assert_equal 'D:dir-1\\dir-2', F.combine_paths('D:', 'dir-1\\dir-2')
+
+		assert_equal '\\\\?\\D:', F.combine_paths('\\\\?\\D:')
+		assert_equal '\\\\?\\D:dir-1\\dir-2', F.combine_paths('\\\\?\\D:', 'dir-1\\dir-2')
+	end
+
+	def test_embedded_absolute_cases
+
+		assert_equal '/a\\b\\c/d', F.combine_paths('x/y/z', 'z', '/a', 'b', 'c/d')
+		assert_equal '\\a\\b\\c/d', F.combine_paths('x/y/z', 'z', '\\a', 'b', 'c/d')
+	end
+
+	def test_multiple_embedded_absolute_cases
+
+		assert_equal '/a\\b\\c/d', F.combine_paths('x/y/z', '/z', '/a', 'b', 'c/d')
+	end
+end
+

data/test/unit/util/windows/tc_derive_relative_path.rb

@@ -0,0 +1,155 @@
+#! /usr/bin/env ruby
+
+$:.unshift File.join(File.dirname(__FILE__), *(['..'] * 4), 'lib')
+
+require 'libpath/util/windows'
+
+require 'test/unit'
+
+class Test_LibPath_Util_Windows_derive_relative_path < Test::Unit::TestCase
+
+	M = ::LibPath::Util::Windows
+
+	def test_nils_and_empties
+
+		# to get nowhere from nowhere, go nowhere
+		assert_nil M.derive_relative_path(nil, nil)
+		assert_nil M.derive_relative_path('', nil)
+		assert_equal '', M.derive_relative_path('', '')
+		assert_equal '', M.derive_relative_path(nil, '')
+
+		# to get somewhere from nowhere, just go there
+		assert_equal 'abc', M.derive_relative_path(nil, 'abc')
+		assert_equal 'abc', M.derive_relative_path('', 'abc')
+
+		# to get nowhere from anywhere else, go nowhere
+		assert_nil M.derive_relative_path('dir', nil)
+		assert_equal '', M.derive_relative_path('dir', '')
+	end
+
+	def test_same_location
+
+		assert_equal '.', M.derive_relative_path('.', '.')
+		assert_equal '.', M.derive_relative_path('..', '..')
+
+		assert_equal '.', M.derive_relative_path('abc', 'abc')
+		assert_equal './', M.derive_relative_path('abc/', 'abc/')
+		assert_equal './', M.derive_relative_path('abc', 'abc/')
+
+		assert_equal './', M.derive_relative_path('/', '/')
+
+		assert_equal '.', M.derive_relative_path('./abc', 'abc')
+		assert_equal '.', M.derive_relative_path('./abc/', 'abc')
+		assert_equal './', M.derive_relative_path('./abc', 'abc/')
+		assert_equal './', M.derive_relative_path('./abc/', 'abc/')
+
+		assert_equal '.', M.derive_relative_path('/abc', '/abc')
+		assert_equal '.', M.derive_relative_path('/abc/', '/abc')
+		assert_equal './', M.derive_relative_path('/abc/', '/abc/')
+	end
+
+	def test_from_here
+
+		assert_equal 'abc', M.derive_relative_path('.', 'abc')
+	end
+
+	def test_ones_above
+
+		assert_equal '..\\', M.derive_relative_path('.', '..')
+
+		assert_equal '../', M.derive_relative_path('/abc/', '/')
+
+		assert_equal '..\\', M.derive_relative_path('abc/def', 'abc')
+
+		assert_equal '..\\', M.derive_relative_path('abc/def/ghi', 'abc/def')
+		assert_equal '../', M.derive_relative_path('abc/def/ghi', 'abc/def/')
+
+		assert_equal '..\\', M.derive_relative_path('abc/def/./ghi', 'abc/def')
+		assert_equal '..\\', M.derive_relative_path('abc/def/ghi/jkl/..', 'abc/def')
+
+		assert_equal '..\\../', M.derive_relative_path('/abc/def/', '/')
+		#assert_equal '..\\../', M.derive_relative_path('/abc/def/', '/', make_path_canonical: true)
+
+		assert_equal '..\\..\\', M.derive_relative_path('abc/def/ghi/jkl/', 'abc/def')
+
+		assert_equal '..\\..\\', M.derive_relative_path('C:\\dir-1\\dir-2\\', 'C:\\')
+
+		assert_equal '..\\..\\', M.derive_relative_path('\\dir1\\dir2\\dir3\\dir4', '\\dir1\\dir2')
+		assert_equal '..\\..\\', M.derive_relative_path('/dir1/dir2/dir3/dir4', '/dir1/dir2')
+	end
+
+	def test_ones_below
+
+		assert_equal 'dir-1\\', M.derive_relative_path('..', '.', pwd: '/dir-1/')
+
+		assert_equal '..\\', M.derive_relative_path('.', '..', pwd: '/dir-1/')
+
+		assert_equal 'def', M.derive_relative_path('abc', 'abc/def')
+		assert_equal 'def\\', M.derive_relative_path('abc', 'abc/def/')
+		assert_equal 'def\\', M.derive_relative_path('abc', 'abc\\def\\')
+
+		assert_equal 'def\\ghi', M.derive_relative_path('abc', 'abc/def/ghi')
+		assert_equal 'def\\ghi\\', M.derive_relative_path('abc', 'abc/def/ghi/')
+	end
+
+	def test_ones_across
+
+		assert_equal '..\\e-1', M.derive_relative_path('abc/d-1', 'abc/e-1')
+		assert_equal '..\\e-1', M.derive_relative_path('abc/d-1/', 'abc/e-1')
+
+		assert_equal '..\\e-1\\e-2', M.derive_relative_path('abc/d-1/', 'abc/e-1/e-2')
+		assert_equal '..\\..\\e-1\\e-2', M.derive_relative_path('abc/d-1/d-2/', 'abc/e-1/e-2')
+	end
+
+	def test_simple_cases
+
+		assert_equal 'def', M.derive_relative_path('\\abc', '\\abc\\def')
+		assert_equal 'def', M.derive_relative_path('/abc', '/abc/def')
+	end
+
+	def test_absolute_path_cases
+
+		assert_equal '..\\..\\def', M.derive_relative_path('/abc/ghi', '/def')
+
+		assert_equal '..\\..\\def', M.derive_relative_path('ghi', '/def', pwd: 'C:/abc')
+
+		assert_equal '..\\def', M.derive_relative_path('abc', '\\\\?\\C:/def', pwd: '\\\\?\\C:/')
+
+		assert_equal '..\\..\abc', M.derive_relative_path('\\\\?\\UNC\\10.11.12.13:4567\\share/def/ghi', '\\\\?\\UNC\\10.11.12.13:4567\\share\abc')
+		assert_equal '..\\def\\ghi', M.derive_relative_path('\\\\?\\UNC\\10.11.12.13:4567\\share\\abc', '\\\\?\\UNC\\10.11.12.13:4567\\share/def/ghi')
+	end
+
+	def test_mixed
+
+		assert_equal 'D:\\dir-1\\dir-3', M.derive_relative_path('C:\\dir-1\\dir-2', '/dir-1/dir-3', pwd: 'D:')
+
+		assert_equal '..\\dir-3', M.derive_relative_path('C:\\dir-1\\dir-2', '/dir-1/dir-3', pwd: 'C:')
+
+		assert_equal '..\\dir-3', M.derive_relative_path('C:\\dir-1\\dir-2', 'dir-3', pwd: 'C:\\dir-1')
+	end
+
+	def test_both_relative
+
+		assert_equal '..\\def', M.derive_relative_path('abc', 'def', pwd: '/')
+	end
+
+	def test_different_drives
+
+		assert_equal 'B:\\abc', M.derive_relative_path('A:\\abc', 'B:\\abc')
+	end
+
+	def test_same_drives
+
+		assert_equal '.', M.derive_relative_path('A:\\abc', 'A:\\abc')
+		assert_equal '.', M.derive_relative_path('A:\\.\abc', 'A:\\abc')
+	end
+
+	def test_cases_from_Path
+
+		srd		=	'C:\\dir-1\\dir-2\\dir-C\\dir-D'
+		target	=	'C:/dir-1/dir-2/dir-3/dir-4/./dir-5/dir-6/../file.ext'
+
+		assert_equal '..\\..\\dir-3\\dir-4\\dir-5\\file.ext', M.derive_relative_path(srd, target)
+	end
+end
+

data/test/unit/util/windows/tc_make_path_absolute.rb

@@ -0,0 +1,163 @@
+#! /usr/bin/env ruby
+
+$:.unshift File.join(File.dirname(__FILE__), *(['..'] * 4), 'lib')
+
+require 'libpath/util/windows'
+
+require 'test/unit'
+
+class Test_LibPath_Util_Windows_make_path_absolute < Test::Unit::TestCase
+
+	F = ::LibPath::Util::Windows
+
+	def test_nil
+
+		if $DEBUG
+
+			assert_raise(::ArgumentError) { F.make_path_absolute(nil) }
+		else
+
+			assert_nil F.make_path_absolute(nil)
+		end
+	end
+
+	def test_empty
+
+		assert_equal '', F.make_path_absolute('')
+	end
+
+	def test_absolute_paths
+
+		assert_equal 'C:\\', F.make_path_absolute('\\', pwd: 'C:/Users/libpath-tester')
+		assert_equal 'C:\\.', F.make_path_absolute('\\.', pwd: 'C:/Users/libpath-tester')
+		assert_equal 'C:\\a', F.make_path_absolute('\\a', pwd: 'C:/Users/libpath-tester')
+		assert_equal 'C:\\a\\.', F.make_path_absolute('\\a\\.', pwd: 'C:/Users/libpath-tester')
+
+		assert_equal 'C:/', F.make_path_absolute('/', pwd: 'C:/Users/libpath-tester')
+		assert_equal 'C:/.', F.make_path_absolute('/.', pwd: 'C:/Users/libpath-tester')
+		assert_equal 'C:/a', F.make_path_absolute('/a', pwd: 'C:/Users/libpath-tester')
+		assert_equal 'C:/a/.', F.make_path_absolute('/a/.', pwd: 'C:/Users/libpath-tester')
+
+		assert_equal 'G:\\abc\\', F.make_path_absolute('G:\\abc\\')
+		assert_equal 'G:\\abc\\', F.make_path_absolute('G:\\\\abc\\\\')
+		assert_equal 'G:\\abc\\', F.make_path_absolute('G:\\\\abc\\\\', pwd: 'C:/Users/libpath-tester')
+	end
+
+	def test_absolute_paths_with_canonicalisation
+
+		pwd	=	'X:\\some-dir'
+
+		options	=	{ make_canonical: true }
+
+		assert_equal 'X:/', F.make_path_absolute('/', **options, pwd: pwd)
+		assert_equal 'X:/', F.make_path_absolute('/.', **options, pwd: pwd)
+		assert_equal 'X:/a', F.make_path_absolute('/a', **options, pwd: pwd)
+		assert_equal 'X:/a/', F.make_path_absolute('/a/.', **options, pwd: pwd)
+	end
+
+	def test_relative_path_with_fixed_pwd
+
+		pwd = 'X:\\some-path\\\\or-other'
+
+		assert_equal 'X:\\some-path\\or-other\\.', F.make_path_absolute('.', pwd: pwd)
+		assert_equal 'X:\\some-path\\or-other\\', F.make_path_absolute('.', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-path\\or-other\\abc', F.make_path_absolute('abc', pwd: pwd)
+		assert_equal 'X:\\some-path\\or-other\\abc', F.make_path_absolute('abc', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-path\\or-other\\./abc', F.make_path_absolute('./abc', pwd: pwd)
+		assert_equal 'X:\\some-path\\or-other\\abc', F.make_path_absolute('./abc', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-path\\or-other\\./abc/', F.make_path_absolute('./abc/', pwd: pwd)
+		assert_equal 'X:\\some-path\\or-other\\abc/', F.make_path_absolute('./abc/', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-path\\or-other\\def/../abc', F.make_path_absolute('def/../abc', pwd: pwd)
+		assert_equal 'X:\\some-path\\or-other\\abc', F.make_path_absolute('def/../abc', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-path\\or-other\\def/../abc/', F.make_path_absolute('def/../abc/', pwd: pwd)
+		assert_equal 'X:\\some-path\\or-other\\abc/', F.make_path_absolute('def/../abc/', pwd: pwd, make_canonical: true)
+	end
+
+	def test_relative_path_with_fixed_home
+
+		home = 'X:\\Documents and Settings\\libpath-tester'
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester', F.make_path_absolute('~', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester', F.make_path_absolute('~', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/.', F.make_path_absolute('~/.', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/', F.make_path_absolute('~/.', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\.', F.make_path_absolute('~\\.', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\', F.make_path_absolute('~\\.', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/abc', F.make_path_absolute('~/abc', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/abc', F.make_path_absolute('~/abc', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/./abc', F.make_path_absolute('~/./abc', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/abc', F.make_path_absolute('~/./abc', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/./abc/', F.make_path_absolute('~/./abc/', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/abc/', F.make_path_absolute('~/./abc/', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/def/../abc', F.make_path_absolute('~/def/../abc', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/abc', F.make_path_absolute('~/def/../abc', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/def/../abc/', F.make_path_absolute('~/def/../abc/', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester/abc/', F.make_path_absolute('~/def/../abc/', home: home, make_canonical: true)
+	end
+
+	def test_relative_path_with_fixed_home_2
+
+		home = 'X:\\Documents and Settings\\libpath-tester\\'
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\', F.make_path_absolute('~', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\', F.make_path_absolute('~', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\', F.make_path_absolute('~/', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\', F.make_path_absolute('~/', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\.', F.make_path_absolute('~/.', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\', F.make_path_absolute('~/.', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\abc', F.make_path_absolute('~/abc', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\abc', F.make_path_absolute('~/abc', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\./abc', F.make_path_absolute('~/./abc', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\abc', F.make_path_absolute('~/./abc', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\./abc/', F.make_path_absolute('~/./abc/', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\abc/', F.make_path_absolute('~/./abc/', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\def/../abc', F.make_path_absolute('~/def/../abc', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\abc', F.make_path_absolute('~/def/../abc', home: home, make_canonical: true)
+
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\def/../abc/', F.make_path_absolute('~/def/../abc/', home: home)
+		assert_equal 'X:\\Documents and Settings\\libpath-tester\\abc/', F.make_path_absolute('~/def/../abc/', home: home, make_canonical: true)
+	end
+
+	def test_nonhome_tilde_with_fixed_pwd
+
+		pwd = 'X:\\some-other-path\\'
+
+		assert_equal 'X:\\some-other-path\\~.', F.make_path_absolute('~.', pwd: pwd)
+		assert_equal 'X:\\some-other-path\\~.', F.make_path_absolute('~.', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-other-path\\~abc', F.make_path_absolute('~abc', pwd: pwd)
+		assert_equal 'X:\\some-other-path\\~abc', F.make_path_absolute('~abc', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-other-path\\~./abc', F.make_path_absolute('~./abc', pwd: pwd)
+		assert_equal 'X:\\some-other-path\\~./abc', F.make_path_absolute('~./abc', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-other-path\\~./abc/', F.make_path_absolute('~./abc/', pwd: pwd)
+		assert_equal 'X:\\some-other-path\\~./abc/', F.make_path_absolute('~./abc/', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-other-path\\~def/../abc', F.make_path_absolute('~def/../abc', pwd: pwd)
+		assert_equal 'X:\\some-other-path\\abc', F.make_path_absolute('~def/../abc', pwd: pwd, make_canonical: true)
+
+		assert_equal 'X:\\some-other-path\\~def/../abc/', F.make_path_absolute('~def/../abc/', pwd: pwd)
+		assert_equal 'X:\\some-other-path\\abc/', F.make_path_absolute('~def/../abc/', pwd: pwd, make_canonical: true)
+	end
+
+end
+