silence do_curse() compiler warning

Usage of the static function do_curse() in sv.c has been temporarily
disabled; comment out the function definition too, to avoid a compiler
warning about an unused function.

1 files changed, 2 insertions, 0 deletions

diff --git a/sv.c b/sv.c
index c1274e8d99..6e8e5f3e91 100644
--- a/sv.c
+++ b/sv.c
@@ -552,6 +552,7 @@ do_clean_named_io_objs(pTHX_ SV *const sv)
 }
 
 /* Void wrapper to pass to visit() */
+/* XXX
 static void
 do_curse(pTHX_ SV * const sv) {
     if ((PL_stderrgv && GvGP(PL_stderrgv) && (SV*)GvIO(PL_stderrgv) == sv)
@@ -559,6 +560,7 @@ do_curse(pTHX_ SV * const sv) {
 	return;
     (void)curse(sv, 0);
 }
+*/
 
 /*
 =for apidoc sv_clean_objs