Patch 8.2.2120
Problem: Not all Perl functionality is tested.
Solution: Add a few more test cases. (Dominique Pellé, closes #7440)
Files: src/testdir/test_perl.vim
*** ../vim-8.2.2119/src/testdir/test_perl.vim 2020-05-01 14:10:10.188390740
+0200
--- src/testdir/test_perl.vim 2020-12-09 16:02:25.087412541 +0100
***************
*** 182,190 ****
--- 182,202 ----
call assert_equal('*VIM', perleval('"*VIM"'))
call assert_true(perleval('\\0') =~ 'SCALAR(0x\x\+)')
+
+ " typeglob
+ call assert_equal('*main::STDOUT', perleval('*STDOUT'))
+ '
+ call perleval("++-$foo")
+ let messages = split(execute('message'), "\n")
+ call assert_match("Can't modify negation", messages[-1])
endfunc
func Test_perldo()
+ new
+ " :perldo in empty buffer does nothing.
+ perldo ++$counter
+ call assert_equal(0, perleval("$counter"))
+
sp __TEST__
exe 'read ' g:testname
perldo s/perl/vieux_chameau/g
***************
*** 204,211 ****
call setline(1, ['one', 'two', 'three'])
perldo VIM::DoCommand("new")
call assert_equal(wincount + 1, winnr('$'))
! bwipe!
! bwipe!
endfunc
func Test_VIM_package()
--- 216,222 ----
call setline(1, ['one', 'two', 'three'])
perldo VIM::DoCommand("new")
call assert_equal(wincount + 1, winnr('$'))
! %bwipe!
endfunc
func Test_VIM_package()
***************
*** 311,314 ****
--- 322,331 ----
call assert_equal('ABCDE', s)
endfunc
+ func Test_perl_in_sandbox()
+ sandbox perl print 'test'
+ let messages = split(execute('message'), "\n")
+ call assert_match("'print' trapped by operation mask", messages[-1])
+ endfunc
+
" vim: shiftwidth=2 sts=2 expandtab
*** ../vim-8.2.2119/src/version.c 2020-12-09 15:53:21.865279582 +0100
--- src/version.c 2020-12-09 16:02:14.635440957 +0100
***************
*** 752,753 ****
--- 752,755 ----
{ /* Add new patch number below this line */
+ /**/
+ 2120,
/**/
--
Violators can be fined, arrested or jailed for making ugly faces at a dog.
[real standing law in Oklahoma, United States of America]
/// Bram Moolenaar -- [email protected] -- http://www.Moolenaar.net \\\
/// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
\\\ an exciting new programming language -- http://www.Zimbu.org ///
\\\ help me help AIDS victims -- http://ICCF-Holland.org ///
--
--
You received this message from the "vim_dev" maillist.
Do not top-post! Type your reply below the text you are replying to.
For more information, visit http://www.vim.org/maillist.php
---
You received this message because you are subscribed to the Google Groups
"vim_dev" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To view this discussion on the web visit
https://groups.google.com/d/msgid/vim_dev/202012091506.0B9F6MPP1939522%40masaka.moolenaar.net.
