view src/testdir/test_ex_undo.vim @ 9129:95fd0de7a8f1 v7.4.1848

commit https://github.com/vim/vim/commit/6727bf861776cfbb93c97dfea5f87a095cf9f364 Author: Bram Moolenaar <Bram@vim.org> Date: Thu May 26 22:10:00 2016 +0200 patch 7.4.1848 Problem: Can't build with Strawberry Perl 5.24. Solution: Define S_SvREFCNT_dec() if needed. (Damien, Ken Takata)
author Christian Brabandt <cb@256bit.org>
date Thu, 26 May 2016 22:15:05 +0200
parents 52b13e25b21d
children 08940efa6b4e
line wrap: on
line source

" Tests for :undo

func Test_ex_undo()
  new ex-undo
  setlocal ul=10
  exe "normal ione\n\<Esc>"
  setlocal ul=10
  exe "normal itwo\n\<Esc>"
  setlocal ul=10
  exe "normal ithree\n\<Esc>"
  call assert_equal(4, line('$'))
  undo
  call assert_equal(3, line('$'))
  undo 1
  call assert_equal(2, line('$'))
  undo 0
  call assert_equal(1, line('$'))
  quit!
endfunc