patch 8.0.1158: still old style tests

Problem:    Still old style tests.
Solution:   Convert serveral tests to new style. (Yegappan Lakshmanan)

src/Makefile

@@ -2103,9 +2103,9 @@ test1 \
 	test3 test4 test5 test7 test8 \
 	test11 test12 test14 test15 test17 test19 \
 	test20 test25 test28 test29 \
-	test30 test31 test32 test33 test34 test36 test37 test38 test39 \
-	test40 test41 test42 test43 test44 test45 test48 test49 \
-	test50 test52 test53 test54 test55 test59 \
+	test30 test31 test32 test34 test36 test37 test38 test39 \
+	test40 test42 test44 test45 test48 test49 \
+	test50 test52 test54 test55 test59 \
 	test60 test64 test66 test68 test69 \
 	test70 test72 test73 test77 test78 test79 \
 	test83 test85 test86 test87 test88 \

src/testdir/Make_all.mak

@@ -25,20 +25,16 @@ SCRIPTS_ALL = \
 	test28.out \
 	test29.out \
 	test31.out \
-	test33.out \
 	test34.out \
 	test36.out \
 	test37.out \
 	test38.out \
 	test39.out \
 	test40.out \
-	test41.out \
 	test42.out \
-	test43.out \
 	test44.out \
 	test45.out \
 	test48.out \
-	test53.out \
 	test55.out \
 	test60.out \
 	test64.out \

src/testdir/Make_vms.mms

@@ -78,10 +78,10 @@ SCRIPT = test1.out  test3.out  test4.out  test5.out  \
        test14.out test15.out \
        test19.out test20.out \
        test28.out test29.out test30.out test31.out test32.out \
-       test33.out test34.out test36.out test37.out \
-       test38.out test39.out test40.out test41.out test42.out \
-       test43.out test44.out test45.out \
-       test48.out test49.out test53.out test54.out \
+       test34.out test36.out test37.out \
+       test38.out test39.out test40.out test42.out \
+       test44.out test45.out \
+       test48.out test49.out test54.out \
        test55.out test60.out \
        test64.out \
        test66.out test68.out test69.out \

src/testdir/main.aap

@@ -10,9 +10,9 @@ Scripts = test1.out test2.out test3.out test4.out test5.out test6.out
 		test18.out test19.out test20.out test21.out
 		test25.out test27.out
 		test28.out test29.out test30.out test31.out test32.out
-		test33.out test34.out test36.out test37.out
-		test38.out test39.out test40.out test41.out test42.out
-		test43.out test44.out test45.out test46.out test47.out
+		test34.out test36.out test37.out
+		test38.out test39.out test40.out test42.out
+		test44.out test45.out test46.out test47.out
 		test48.out test49.out test74.out
 
 ScriptsGUI = test16.out

src/testdir/test_file_size.vim

@@ -28,3 +28,31 @@ func Test_File_Size()
   call delete('Xtest')
   set belloff& 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