view src/testdir/test_exec_while_if.vim @ 25978:40b17deb294f v8.2.3522

patch 8.2.3522: cannot use x and u when setting 'listchars' Commit: https://github.com/vim/vim/commit/93ff6720fe4427341bc426b6d46e6324f226c270 Author: Bram Moolenaar <Bram@vim.org> Date: Sat Oct 16 17:51:40 2021 +0100 patch 8.2.3522: cannot use \x and \u when setting 'listchars' Problem: Cannot use \x and \u when setting 'listchars'. Solution: Support hex and unicode in hex form. (closes https://github.com/vim/vim/issues/9006)
author Bram Moolenaar <Bram@vim.org>
date Sat, 16 Oct 2021 19:00:03 +0200
parents 87ff80c08e4b
children fb4c30606b4a
line wrap: on
line source

" Test for :execute, :while, :for and :if

func Test_exec_while_if()
  new

  let i = 0
  while i < 12
    let i = i + 1
    if has("ebcdic")
      execute "normal o" . i . "\047"
    else
      execute "normal o" . i . "\033"
    endif
    if i % 2
      normal Ax
      if i == 9
        break
      endif
      if i == 5
        continue
      else
        let j = 9
        while j > 0
          if has("ebcdic")
            execute "normal" j . "a" . j . "\x27"
          else
            execute "normal" j . "a" . j . "\x1b"
          endif
          let j = j - 1
        endwhile
      endif
    endif
    if i == 9
      if has("ebcdic")
        execute "normal Az\047"
      else
        execute "normal Az\033"
      endif
    endif
  endwhile
  unlet i j

  call assert_equal(["",
        \ "1x999999999888888887777777666666555554444333221",
        \ "2",
        \ "3x999999999888888887777777666666555554444333221",
        \ "4",
        \ "5x",
        \ "6",
        \ "7x999999999888888887777777666666555554444333221",
        \ "8",
        \ "9x"], getline(1, 10))
endfunc

" vim: shiftwidth=2 sts=2 expandtab