view src/testdir/test77.in @ 9750:0f4b76b2757a v7.4.2150

commit https://github.com/vim/vim/commit/4c38d66d25e4ba433fe87283a4664425a3dbd529 Author: Bram Moolenaar <Bram@vim.org> Date: Wed Aug 3 20:54:57 2016 +0200 patch 7.4.2150 Problem: Warning with MinGW 64. (John Marriott) Solution: Change return type. (Ken Takata)
author Christian Brabandt <cb@256bit.org>
date Wed, 03 Aug 2016 21:00:05 +0200
parents 5cd32322154c
children ae45d497868f
line wrap: on
line source

Inserts 2 million lines with consecutive integers starting from 1
(essentially, the output of GNU's seq 1 2000000), writes them to Xtest
and writes its cksum to test.out.

We need 2 million lines to trigger a call to mf_hash_grow().  If it would mess
up the lines the checksum would differ.

cksum is part of POSIX and so should be available on most Unixes.
If it isn't available then the test will be skipped.

STARTTEST
:so small.vim
:if !executable("cksum")
: e! test.ok
: w! test.out
: qa!
:endif
:set fileformat=unix undolevels=-1
ggdG
:let i = 1
:while i <= 2000000 | call append(i, range(i, i + 99)) | let i += 100 | endwhile
ggdd
:w! Xtest
:r !cksum Xtest
:s/\s/ /g
:set fileformat&
:.w! test.out
:qa!
ENDTEST