1*069c1e7fSBram Moolenaarfunction! Test_lambda_with_filter() 2*069c1e7fSBram Moolenaar let s:x = 2 3*069c1e7fSBram Moolenaar call assert_equal([2, 3], filter([1, 2, 3], {i, v -> v >= s:x})) 4*069c1e7fSBram Moolenaarendfunction 5*069c1e7fSBram Moolenaar 6*069c1e7fSBram Moolenaarfunction! Test_lambda_with_map() 7*069c1e7fSBram Moolenaar let s:x = 1 8*069c1e7fSBram Moolenaar call assert_equal([2, 3, 4], map([1, 2, 3], {i, v -> v + s:x})) 9*069c1e7fSBram Moolenaarendfunction 10*069c1e7fSBram Moolenaar 11*069c1e7fSBram Moolenaarfunction! Test_lambda_with_sort() 12*069c1e7fSBram Moolenaar call assert_equal([1, 2, 3, 4, 7], sort([3,7,2,1,4], {a, b -> a - b})) 13*069c1e7fSBram Moolenaarendfunction 14*069c1e7fSBram Moolenaar 15*069c1e7fSBram Moolenaarfunction! Test_lambda_with_timer() 16*069c1e7fSBram Moolenaar if !has('timers') 17*069c1e7fSBram Moolenaar return 18*069c1e7fSBram Moolenaar endif 19*069c1e7fSBram Moolenaar 20*069c1e7fSBram Moolenaar let s:n = 0 21*069c1e7fSBram Moolenaar let s:timer_id = 0 22*069c1e7fSBram Moolenaar function! s:Foo() 23*069c1e7fSBram Moolenaar "let n = 0 24*069c1e7fSBram Moolenaar let s:timer_id = timer_start(50, {-> execute("let s:n += 1 | echo s:n")}, {"repeat": -1}) 25*069c1e7fSBram Moolenaar endfunction 26*069c1e7fSBram Moolenaar 27*069c1e7fSBram Moolenaar call s:Foo() 28*069c1e7fSBram Moolenaar sleep 200ms 29*069c1e7fSBram Moolenaar " do not collect lambda 30*069c1e7fSBram Moolenaar call test_garbagecollect_now() 31*069c1e7fSBram Moolenaar let m = s:n 32*069c1e7fSBram Moolenaar sleep 200ms 33*069c1e7fSBram Moolenaar call timer_stop(s:timer_id) 34*069c1e7fSBram Moolenaar call assert_true(m > 1) 35*069c1e7fSBram Moolenaar call assert_true(s:n > m + 1) 36*069c1e7fSBram Moolenaar call assert_true(s:n < 9) 37*069c1e7fSBram Moolenaarendfunction 38*069c1e7fSBram Moolenaar 39*069c1e7fSBram Moolenaarfunction! Test_lambda_with_partial() 40*069c1e7fSBram Moolenaar let l:Cb = function({... -> ['zero', a:1, a:2, a:3]}, ['one', 'two']) 41*069c1e7fSBram Moolenaar call assert_equal(['zero', 'one', 'two', 'three'], l:Cb('three')) 42*069c1e7fSBram Moolenaarendfunction 43*069c1e7fSBram Moolenaar 44*069c1e7fSBram Moolenaarfunction Test_lambda_fails() 45*069c1e7fSBram Moolenaar call assert_equal(3, {a, b -> a + b}(1, 2)) 46*069c1e7fSBram Moolenaar call assert_fails('echo {a, a -> a + a}(1, 2)', 'E15:') 47*069c1e7fSBram Moolenaar call assert_fails('echo {a, b -> a + b)}(1, 2)', 'E15:') 48*069c1e7fSBram Moolenaarendfunc 49