minor update

Author: skywind3000

autoload/asyncrun/compat.vim

@@ -0,0 +1,52 @@
+"======================================================================
+"
+" compat.vim - 
+"
+" Created by skywind on 2023/08/03
+" Last Modified: 2023/08/03 23:45:25
+"
+"======================================================================
+
+
+"----------------------------------------------------------------------
+" glob files
+"----------------------------------------------------------------------
+function! asyncrun#compat#glob( ... )
+	let l:nosuf = (a:0 > 1 && a:2)
+	let l:list = (a:0 > 2 && a:3)
+	if l:nosuf
+		let l:save_wildignore = &wildignore
+		set wildignore=
+	endif
+	try
+		let l:result = call('glob', [a:1])
+		return (l:list ? split(l:result, '\n') : l:result)
+	finally
+		if exists('l:save_wildignore')
+			let &wildignore = l:save_wildignore
+		endif
+	endtry
+endfunc
+
+
+"----------------------------------------------------------------------
+" list files
+"----------------------------------------------------------------------
+function! asyncrun#compat#list(path, ...)
+	let nosuf = (a:0 > 0)? (a:1) : 0
+	if !isdirectory(a:path)
+		return []
+	endif
+	let path = a:path . '/*'
+	let part = asyncrun#compat#glob(path, nosuf)
+	let candidate = []
+	for n in split(part, "\n")
+		let f = fnamemodify(n, ':t')
+		if !empty(f)
+			let candidate += [f]
+		endif
+	endfor
+	return candidate
+endfunc
+
+

autoload/asyncrun/utils.vim

@@ -10,6 +10,12 @@
 " vim: set ts=4 sw=4 tw=78 noet :
 
 
+"----------------------------------------------------------------------
+" internal
+"----------------------------------------------------------------------
+let s:windows = has('win32') || has('win95') || has('win64') || has('win16')
+
+
 "----------------------------------------------------------------------
 " output msg
 "----------------------------------------------------------------------
@@ -129,4 +135,20 @@ function! asyncrun#utils#quickfix_request()
 endfunc
 
 
+"----------------------------------------------------------------------
+" compare path
+"----------------------------------------------------------------------
+function! asyncrun#utils#path_equal(path1, path2) abort
+	let p1 = fnamemodify(a:path1, ':p')
+	let p2 = fnamemodify(a:path2, ':p')
+	if has('win32') || has('win16') || has('win64') || has('win95')
+		let p1 = tolower(substitute(p1, '\/', '\\', 'g'))
+		let p2 = tolower(substitute(p2, '\/', '\\', 'g'))
+	else
+		let p1 = substitute(p1, '\\', '\/', 'g')
+		let p2 = substitute(p2, '\\', '\/', 'g')
+	endif
+	return (p1 == p2)? 1 : 0
+endfunc
+