[libmath-prime-util-perl] 130/181: Remove flags on get_cv

Partha P. Mukherjee ppm-guest at moszumanska.debian.org
Thu May 21 18:51:14 UTC 2015


This is an automated email from the git hooks/post-receive script.

ppm-guest pushed a commit to annotated tag v0.36
in repository libmath-prime-util-perl.

commit ad2592f00cb789d5a99f5f01ad474b599a0015fc
Author: Dana Jacobsen <dana at acm.org>
Date:   Tue Jan 7 01:54:48 2014 -0800

    Remove flags on get_cv
---
 XS.xs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/XS.xs b/XS.xs
index fb28c6a..7a95d61 100644
--- a/XS.xs
+++ b/XS.xs
@@ -163,7 +163,7 @@ static int _vcallsubn(pTHX_ I32 flags, const char* gmp_name, const char* name, i
     if (use_gmp) {
       CV* cv;
       strncat(fullname, gmp_name, 60);
-      cv = get_cv(fullname, flags);
+      cv = get_cv(fullname, 0);
       /* This isn't covering every case for arbitrary functions */
       if (cv == 0 || (!CvROOT(cv) && !CvXSUB(cv))) {
         use_gmp = 0;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git



More information about the Pkg-perl-cvs-commits mailing list