Fix parser
This commit is contained in:
		@@ -1,15 +1,16 @@
 | 
			
		||||
scriptencoding utf-8
 | 
			
		||||
let s:ERRORS = {
 | 
			
		||||
            \ 'E001' : ['中文字符后使用英文标点', '[^a-zA-Z],'],
 | 
			
		||||
            \ 'E002' : ['中英文之间需要增加空格', ''],
 | 
			
		||||
            \ 'E003' : ['中文与数字之间需要增加空格', ''],
 | 
			
		||||
            \ 'E004' : ['数字与单位之间需要增加空格', ''],
 | 
			
		||||
            \ 'E005' : ['全角标点与其他字符之间不加空格', ''],
 | 
			
		||||
            \ 'E006' : ['不重复使用标点符号', ''],
 | 
			
		||||
            \ 'E007' : ['使用全角中文标点', ''],
 | 
			
		||||
            \ 'E008' : ['数字使用半角字符', ''],
 | 
			
		||||
            \ 'E009' : ['遇到完整的英文整句、特殊名词,其內容使用半角标点', ''],
 | 
			
		||||
            \ 'E001' : ['中文字符后不可使用英文标点', '[\u4e00-\u9fa5],'],
 | 
			
		||||
            \ 'E002' : ['中英文之间需要增加空格', '([\u4e00-\u9fa5][a-zA-Z])\|([a-zA-Z][\u4e00-\u9fa5]))'],
 | 
			
		||||
            \ 'E003' : ['中文与数字之间需要增加空格', '[\u4e00-\u9fa5][0-9]'],
 | 
			
		||||
            \ 'E005' : ['全角标点之后不加空格', '[\u3002\uff1b\uff0c\uff1a\u201c\u201d\uff08\uff09\u3001\uff1f\u300a\u300b]\s\+'],
 | 
			
		||||
            \ }
 | 
			
		||||
" TODO
 | 
			
		||||
"\ 'E004' : ['数字与单位之间需要增加空格', ''],
 | 
			
		||||
"\ 'E006' : ['不重复使用标点符号', ''],
 | 
			
		||||
"\ 'E007' : ['使用全角中文标点', ''],
 | 
			
		||||
"\ 'E008' : ['数字使用半角字符', ''],
 | 
			
		||||
"\ 'E009' : ['遇到完整的英文整句、特殊名词,其內容使用半角标点', ''],
 | 
			
		||||
command! -nargs=? CheckChinese call s:check(<q-args>)
 | 
			
		||||
 | 
			
		||||
function! s:check(...) abort
 | 
			
		||||
@@ -30,6 +31,7 @@ function! s:check(...) abort
 | 
			
		||||
        copen
 | 
			
		||||
    else
 | 
			
		||||
        call setqflist([])
 | 
			
		||||
        cclose
 | 
			
		||||
    endif
 | 
			
		||||
endfunction
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user