Patch 8.1.0978
Problem: Blob not tested with Perl.
Solution: Add more test coverage. Fixes a crash. (Dominique Pelle,
closes #4037)
Files: src/if_perl.c, src/testdir/test_ruby.vim
*** ../vim-8.1.0977/src/if_perl.xs 2019-02-17 17:44:36.211875510 +0100
--- src/if_perl.xs 2019-02-23 15:00:57.748553084 +0100
***************
*** 1570,1576 ****
newsv = newSVpv("0z", 2);
for (i = 0; i < len; i++)
{
! sprintf(buf, "%02X", s[i]);
sv_catpvn(newsv, buf, 2);
}
RETVAL = newsv;
--- 1570,1576 ----
newsv = newSVpv("0z", 2);
for (i = 0; i < len; i++)
{
! sprintf(buf, "%02X", (unsigned char)(s[i]));
sv_catpvn(newsv, buf, 2);
}
RETVAL = newsv;
*** ../vim-8.1.0977/src/testdir/test_perl.vim 2018-08-02 21:46:47.579548771
+0200
--- src/testdir/test_perl.vim 2019-02-23 15:00:57.748553084 +0100
***************
*** 29,34 ****
--- 29,41 ----
call assert_equal('abc/def/', getline('$'))
endfunc
+ funct Test_VIM_Blob()
+ call assert_equal('0z', perleval('VIM::Blob("")'))
+ call assert_equal('0z31326162', perleval('VIM::Blob("12ab")'))
+ call assert_equal('0z00010203', perleval('VIM::Blob("\x00\x01\x02\x03")'))
+ call assert_equal('0z8081FEFF', perleval('VIM::Blob("\x80\x81\xfe\xff")'))
+ endfunc
+
func Test_buffer_Delete()
new
call setline(1, ['a', 'b', 'c', 'd', 'e', 'f', 'g', 'h'])
*** ../vim-8.1.0977/src/version.c 2019-02-23 14:22:59.567653374 +0100
--- src/version.c 2019-02-23 15:03:24.831570654 +0100
***************
*** 781,782 ****
--- 781,784 ----
{ /* Add new patch number below this line */
+ /**/
+ 978,
/**/
--
hundred-and-one symptoms of being an internet addict:
23. You can't call your mother... she doesn't have VOIP
/// 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].
For more options, visit https://groups.google.com/d/optout.
