view src/testdir/test_glob2regpat.vim @ 18673:f1658662ea84 v8.1.2328

patch 8.1.2328: a few hangul input pieces remain Commit: https://github.com/vim/vim/commit/bd3bc0314e27cac061575930144ce5fadc26c22e Author: Bram Moolenaar <Bram@vim.org> Date: Thu Nov 21 17:34:51 2019 +0100 patch 8.1.2328: a few hangul input pieces remain Problem: A few hangul input pieces remain. Solution: Update VMS makefile.
author Bram Moolenaar <Bram@vim.org>
date Thu, 21 Nov 2019 17:45:04 +0100
parents 9fac6d0de69a
children 2a017e9dc6da
line wrap: on
line source

" Test glob2regpat()

func Test_glob2regpat_invalid()
  call assert_fails('call glob2regpat(1.33)', 'E806:')
  call assert_fails('call glob2regpat("}")', 'E219:')
  call assert_fails('call glob2regpat("{")', 'E220:')
endfunc

func Test_glob2regpat_valid()
  call assert_equal('^foo\.', glob2regpat('foo.*'))
  call assert_equal('^foo.$', 'foo?'->glob2regpat())
  call assert_equal('\.vim$', glob2regpat('*.vim'))
  call assert_equal('^[abc]$', glob2regpat('[abc]'))
  call assert_equal('^foo bar$', glob2regpat('foo\ bar'))
  call assert_equal('^foo,bar$', glob2regpat('foo,bar'))
  call assert_equal('^\(foo\|bar\)$', glob2regpat('{foo,bar}'))
  call assert_equal('.*', glob2regpat('**'))

  if exists('+shellslash')
    call assert_equal('^foo[\/].$', glob2regpat('foo\?'))
    call assert_equal('^\(foo[\/]\|bar\|foobar\)$', glob2regpat('{foo\,bar,foobar}'))
    call assert_equal('^[\/]\(foo\|bar[\/]\)$', glob2regpat('\{foo,bar\}'))
    call assert_equal('^[\/][\/]\(foo\|bar[\/][\/]\)$', glob2regpat('\\{foo,bar\\}'))
  else
    call assert_equal('^foo?$', glob2regpat('foo\?'))
    call assert_equal('^\(foo,bar\|foobar\)$', glob2regpat('{foo\,bar,foobar}'))
    call assert_equal('^{foo,bar}$', glob2regpat('\{foo,bar\}'))
    call assert_equal('^\\\(foo\|bar\\\)$', glob2regpat('\\{foo,bar\\}'))
  endif
endfunc