Mercurial > vim
view src/testdir/test_largefile.vim @ 14441:2d6703d4448a v8.1.0234
patch 8.1.0234: incorrect reference counting in Perl interface
commit https://github.com/vim/vim/commit/41c363a3154dd1caeb431fa54748ad48ef6d3bd1
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Aug 2 21:46:51 2018 +0200
patch 8.1.0234: incorrect reference counting in Perl interface
Problem: Incorrect reference counting in Perl interface.
Solution: Call SvREFCNT_inc more often, add a test. (Damien)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Thu, 02 Aug 2018 22:00:06 +0200 |
parents | c4aae9421aec |
children | fdfe44ac6a1a |
line wrap: on
line source
" Tests for large files " This is only executed manually: "make test_largefile". " This is not run as part of "make test". func Test_largefile() let fname = 'Xlarge.txt' call delete(fname) exe "e" fname " Make sure that a line break is 1 byte (LF). set ff=unix set undolevels=-1 " Input 99 'A's. The line becomes 100 bytes including a line break. exe "normal 99iA\<Esc>" yank " Put 39,999,999 times. The file becomes 4,000,000,000 bytes. normal 39999999p " Moving around in the file randomly. normal G normal 10% normal 90% normal 50% normal gg w " Check if the file size is 4,000,000,000 bytes. let fsize=getfsize(fname) if has('num64') call assert_true(fsize == 4000000000) else " getfsize() returns -2 if a Number is 32 bits. call assert_true(fsize == -2) endif call delete(fname) endfunc