commit 95509e18f8806046eeee27482c77666bbec515da
author Bram Moolenaar <Bram@vim.org> Fri Apr 15 21:16:11 2016 +0200
committer Bram Moolenaar <Bram@vim.org> Fri Apr 15 21:16:11 2016 +0200
tree 3e84cc9c20ee5e87834757e782b46b5b3ae04338
parent 5d98c9d93278d6961bfee59151666b8a8bcd23c3

patch 7.4.1746
Problem:    Memory leak in Perl.
Solution:   Decrement the reference count.  Add a test. (Damien)

src/if_perl.xs

diff --git a/src/if_perl.xs b/src/if_perl.xs
index b091bf7..23246a5 100644
--- a/src/if_perl.xs
+++ b/src/if_perl.xs
@@ -844,6 +844,7 @@
     else
 	rv = newBUFrv(newSV(0), curbuf);
     sv_setsv(sv, rv);
+    SvREFCNT_dec(SvRV(rv));
     return 0;
 }
 #endif /* !PROTO */