Mercurial > vim
annotate src/testdir/test77a.in @ 26366:d227481dbe8e v8.2.3714
patch 8.2.3714: some unused assignments and ugly code in xxd
Commit: https://github.com/vim/vim/commit/7e5503c17a3f142e6b28f344d899c9ab9e75a844
Author: DungSaga <dungsaga@users.noreply.github.com>
Date: Wed Dec 1 11:24:52 2021 +0000
patch 8.2.3714: some unused assignments and ugly code in xxd
Problem: Some unused assignments and ugly code in xxd.
Solution: Leave out assignments. Use marcro for fprintf(). (closes https://github.com/vim/vim/issues/9246)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Wed, 01 Dec 2021 12:30:04 +0100 |
| parents | e705ea6e855b |
| children |
| rev | line source |
|---|---|
| 5704 | 1 Inserts 2 million lines with consecutive integers starting from 1 |
| 2 (essentially, the output of GNU's seq 1 2000000), writes them to Xtest | |
| 3 and writes its cksum to test.out. | |
| 4 | |
| 5 We need 2 million lines to trigger a call to mf_hash_grow(). If it would mess | |
| 6 up the lines the checksum would differ. | |
| 7 | |
| 8 cksum is part of POSIX and so should be available on most Unixes. | |
| 9 If it isn't available then the test will be skipped. | |
| 10 | |
| 11 VMS does not have CKSUM but has a built in CHECKSUM - it should be used | |
| 12 STARTTEST | |
|
21797
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
13 :silent! while 0 |
|
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
14 : e! test.ok |
|
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
15 : w! test.out |
|
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
16 : qa! |
|
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
17 :silent! endwhile |
| 5704 | 18 :if !has("vms") |
| 19 : e! test.ok | |
| 20 : w! test.out | |
| 21 : qa! | |
| 22 :endif | |
| 23 :set fileformat=unix undolevels=-1 | |
| 24 ggdG | |
| 25 :let i = 1 | |
| 26 :while i <= 2000000 | call append(i, range(i, i + 99)) | let i += 100 | endwhile | |
| 27 ggdd | |
| 28 :w! Xtest. | |
| 29 :r !@test77a.com Xtest. | |
| 30 :s/\s/ /g | |
| 31 :set fileformat& | |
| 32 :.w! test.out | |
| 33 :qa! | |
| 34 ENDTEST | |
| 35 |