Mercurial > vim
annotate src/testdir/test77a.in @ 28055:5bf3ed75e26c v8.2.4552
patch 8.2.4552: in a :def function "put = expr" does not work
Commit: https://github.com/vim/vim/commit/d0b7bfa95798f5ec743d8afffbffb83aeac823da
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Mar 12 14:51:16 2022 +0000
patch 8.2.4552: in a :def function "put = expr" does not work
Problem: In a :def function "put = expr" does not work.
Solution: Skip over white space. (closes https://github.com/vim/vim/issues/9936)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 12 Mar 2022 16:00:03 +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 |