fixups for sundry warnings about function pointers

p4raw-id: //depot/perl@3669

1 files changed, 1 insertions, 1 deletions

diff --git a/op.c b/op.c
index 858bf00f8b..ae6297c7e0 100644
--- a/op.c
+++ b/op.c
@@ -677,7 +677,7 @@ Perl_op_free(pTHX_ OP *o)
 #endif /* USE_THREADS */
     default:
 	if (!(o->op_flags & OPf_REF)
-	    || (PL_check[o->op_type] != FUNC_NAME_TO_PTR(Perl_ck_ftst)))
+	    || (PL_check[o->op_type] != MEMBER_TO_FPTR(Perl_ck_ftst)))
 	    break;
 	/* FALL THROUGH */
     case OP_GVSV: