Mercurial > vim
view src/testdir/test_file_size.vim @ 25155:a37cf57980f9 v8.2.3114
patch 8.2.3114: Amiga-like systems: build error using stat()
Commit: https://github.com/vim/vim/commit/599a6e5b3629d943a795cd69e4d3d19886f86405
Author: =?UTF-8?q?Ola=20S=C3=B6der?= <rolfkopman@gmail.com>
Date: Tue Jul 6 20:15:46 2021 +0200
patch 8.2.3114: Amiga-like systems: build error using stat()
Problem: Amiga-like systems: build error using stat().
Solution: Only build swapfile_process_running() on systems where it is
actually used. (Ola S?der, closes #8519)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 06 Jul 2021 20:30:03 +0200 |
parents | 08940efa6b4e |
children |
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. source check.vim func Test_File_Size() CheckExecutable cksum new set fileformat=unix undolevels=-1 for i in range(1, 2000000, 100) call append(i, range(i, i + 99)) endfor 1delete w! Xtest let res = systemlist('cksum Xtest')[0] let res = substitute(res, "\r", "", "") call assert_equal('3678979763 14888896 Xtest', res) enew! call delete('Xtest') set fileformat& undolevels& endfunc " Test for writing and reading a file of over 100 Kbyte func Test_File_Read_Write() enew! " Create a file with the following contents " 1 line: "This is the start" " 3001 lines: "This is the leader" " 1 line: "This is the middle" " 3001 lines: "This is the trailer" " 1 line: "This is the end" call append(0, "This is the start") call append(1, repeat(["This is the leader"], 3001)) call append(3002, "This is the middle") call append(3003, repeat(["This is the trailer"], 3001)) call append(6004, "This is the end") write! Xtest enew! edit! Xtest call assert_equal("This is the start", getline(1)) call assert_equal("This is the middle", getline(3003)) call assert_equal("This is the end", getline(6005)) enew! call delete("Xtest") endfunc " vim: shiftwidth=2 sts=2 expandtab