Merge pull request #239 from kaihowl/use-qf-id

fix: use qf id to prevent interleaving output

Author: skywind3000

README-cn.md

@@ -240,6 +240,7 @@
 - g:asyncrun_timer - 每 100ms 处理多少条消息，默认为 25。
 - g:asyncrun_wrapper - 命令前缀，默认为空，比如可以设置成 `nice`。
 - g:asyncrun_stdin - 设置成非零的话，允许 stdin，比如 cmake 在 windows 下要求 stdin 为打开状态。
+- g:asyncrun_qfid - 使用 quickfix id 来防止附加到 quickfix 列表的并发插件的交错输出。
 
 更多配置内容，见 **[这里](https://github.com/skywind3000/asyncrun.vim/wiki/Options)**.
 

README.md

@@ -247,6 +247,7 @@ parameters:
 - g:asyncrun_timer - how many messages should be inserted into quickfix every 100ms interval.
 - g:asyncrun_wrapper - enable to setup a command prefix.
 - g:asyncrun_stdin - non-zero to enable stdin (useful for cmake on windows).
+- g:asyncrun_qfid - use quickfix id to prevent interleaving output of concurrent plugins appending to the quickfix list.
 
 For more information of above options, please visit **[option details](https://github.com/skywind3000/asyncrun.vim/wiki/Options)**.
 

plugin/asyncrun.vim

@@ -130,6 +130,13 @@ let g:asyncrun_stop = get(g:, 'asyncrun_stop', '')
 " specify how to run your command
 let g:asyncrun_mode = get(g:, 'asyncrun_mode', 0)
 
+" Use quickfix-ID to allow concurrent use of quickfix list and not
+" interleave streamed output of a running command with output from
+" other plugins
+if !exists('g:asyncrun_qf_id')
+	let g:asyncrun_qf_id = has('patch-8.0.1023') || has('nvim-0.6.1')
+endif
+
 " command hook
 let g:asyncrun_hook = get(g:, 'asyncrun_hook', '')
 
@@ -431,16 +438,33 @@ function! s:AsyncRun_Job_Update(count, ...)
 		if once == 0
 			if l:text != ''
 				if l:raw == 0
-					if and(g:asyncrun_skip, 1) == 0
-						caddexpr l:text
+					if exists('s:qf_id')
+						let qflist = {'id': s:qf_id, 'lines': split(l:text, "\n")}
+						if and(g:asyncrun_skip, 1) == 0
+							call setqflist([], 'a', qflist)
+						else
+							noautocmd call setqflist([], 'a', qflist)
+						endif
 					else
-						noautocmd caddexpr l:text
+						if and(g:asyncrun_skip, 1) == 0
+							caddexpr l:text
+						else
+							noautocmd caddexpr l:text
+						endif
 					endif
 				else
-					call setqflist([{'text':l:text}], 'a')
+					if exists('s:qf_id')
+						call setqflist([], 'a', {'id': s:qf_id, 'items': [{'text':l:text}]})
+					else
+						call setqflist([{'text':l:text}], 'a')
+					endif
 				endif
 			elseif g:asyncrun_trim == 0
-				call setqflist(l:empty, 'a')
+				if exists('s:qf_id')
+					call setqflist([], 'a', {'id': s:qf_id, 'items': l:empty})
+				else
+					call setqflist(l:empty, 'a')
+				endif
 			endif
 		else
 			if l:text != ''
@@ -568,20 +592,31 @@ function! s:AsyncRun_Job_OnFinish()
 		call timer_stop(s:async_timer)
 		unlet s:async_timer
 	endif
+	if exists('s:qf_id')
+		unlet s:qf_id
+	endif
 	call s:AsyncRun_Job_Update(-1, s:async_info.once)
 	let l:current = localtime()
 	let l:last = l:current - s:async_start
 	let l:check = s:AsyncRun_Job_CheckScroll()
 	if s:async_code == 0
 		let l:text = "[Finished in ".l:last." seconds]"
 		if !s:async_info.strip
-			call setqflist([{'text':l:text}], 'a')
+			if exists('s:qf_id')
+				call setqflist([], 'a', {'id': s:qf_id, 'items': [{'text':l:text}]})
+			else
+				call setqflist([{'text':l:text}], 'a')
+			endif
 		endif
 		let g:asyncrun_status = "success"
 	else
 		let l:text = 'with code '.s:async_code
 		let l:text = "[Finished in ".l:last." seconds ".l:text."]"
-		call setqflist([{'text':l:text}], 'a')
+		if exists('s:qf_id')
+			call setqflist([], 'a', {'id': s:qf_id, 'lines': [l:text]})
+		else
+			call setqflist([{'text':l:text}], 'a')
+		endif
 		let g:asyncrun_status = "failure"
 	endif
 	let s:async_state = 0
@@ -842,8 +877,15 @@ function! s:AsyncRun_Job_Start(cmd)
 				call setqflist([], ' ', l:title)
 			endif
 		endif
+		if g:asyncrun_qf_id == 1
+			let s:qf_id = getqflist({'id':0}).id
+		endif
 		if !s:async_info.strip
-			call setqflist([{'text':l:arguments}], 'a')
+			if exists('s:qf_id')
+				call setqflist([], 'a', {'id': s:qf_id, 'lines': [l:arguments]})
+			else
+				call setqflist([{'text':l:arguments}], 'a')
+			endif
 		endif
 		let l:name = 'g:AsyncRun_Job_OnTimer'
 		let s:async_timer = timer_start(100, l:name, {'repeat':-1})