From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 1 Mar 2000 01:38:25 +0000 (+0000)
Subject: avoid warning on type-mismatch
X-Git-Tag: accepted/trunk/20130322.191538~35330
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=67d733efa2b0494e14087804a18c631e4ba6ea58;p=platform%2Fupstream%2Fperl.git

avoid warning on type-mismatch

p4raw-id: //depot/perl@5383
---

diff --git a/ext/DynaLoader/dlutils.c b/ext/DynaLoader/dlutils.c
index fc4cd75..9423085 100644
--- a/ext/DynaLoader/dlutils.c
+++ b/ext/DynaLoader/dlutils.c
@@ -45,7 +45,7 @@ dl_unload_all_files(pTHXo_ void *unused)
            PUSHMARK(SP);
            XPUSHs(sv_2mortal(dl_libref));
            PUTBACK;
-           call_sv(sub, G_DISCARD);
+           call_sv((SV*)sub, G_DISCARD);
            FREETMPS;
            LEAVE;
         }