vinyl: vinyl/large.test.lua is too large

2Mb tuple is overkill for 1k page.

Fixes #1868

test/vinyl/large.lua

 fiber = require('fiber')
 digest = require('digest')
 
+local PAGE_SIZE = 1024
+local RANGE_SIZE = 64 * PAGE_SIZE
+local TUPLE_SIZE = 128 * PAGE_SIZE
+
 local function prepare()
     local s1 = box.schema.space.create('large_s1', { engine = 'vinyl', if_not_exists = true })
-    s1:create_index('pk', {if_not_exists = true})
+    s1:create_index('pk', {
+        if_not_exists = true;
+        range_size = RANGE_SIZE;
+        page_size = PAGE_SIZE;
+    })
 end
 
-local function large_test(iter_limit, time_limit)
+local function large_test(iter_limit)
     iter_limit = iter_limit or 500
-    time_limit = time_limit or 5
 
-    local i = 0
-    local t1 = fiber.time()
-    local data = digest.urandom(2 * 1024 * 1024)
-    while i < iter_limit and fiber.time() - t1 < time_limit do
+    local data = digest.urandom(TUPLE_SIZE)
+    for i=0,iter_limit do
         local space = box.space.large_s1
         space:replace({i, data})
-        i = i + 1
         if i % 100 == 0 then
             collectgarbage('collect')
         end
@@ -26,10 +30,10 @@ end
 local function check_test()
     local i = 0
     for _, tuple in box.space.large_s1:pairs() do
-        if 2 * 1024 * 1024 ~= tuple[2]:len() then
+        if TUPLE_SIZE ~= tuple[2]:len() then
             error('Large tuple has incorect length')
         end
-        if i % 100 == 0 then
+        if i % 10 == 0 then
             collectgarbage('collect')
         end
         i = i + 1

test/vinyl/large.result

@@ -10,7 +10,7 @@ large = require('large')
 large.prepare()
 ---
 ...
-large.large(500, 5)
+large.large(500)
 ---
 ...
 test_run:cmd('restart server default')

test/vinyl/large.test.lua

@@ -4,7 +4,7 @@ test_run = require('test_run').new()
 large = require('large')
 
 large.prepare()
-large.large(500, 5)
+large.large(500)
 
 test_run:cmd('restart server default')