Borland's C compiler warns that the & is unnecessary.

p4raw-id: //depot/perl@27127

diff --git a/pp.c b/pp.c
index d861bf3..3a66f73 100644 (file)
--- a/pp.c
+++ b/pp.c
@@ -2628,26 +2628,26 @@ PP(pp_sin)
     dVAR; dSP; dTARGET;
     int amg_type = sin_amg;
     const char *neg_report = NULL;
-    NV (*func)(NV) = &Perl_sin;
+    NV (*func)(NV) = Perl_sin;
     const int op_type = PL_op->op_type;
 
     switch (op_type) {
     case OP_COS:
        amg_type = cos_amg;
-       func = &Perl_cos;
+       func = Perl_cos;
        break;
     case OP_EXP:
        amg_type = exp_amg;
-       func = &Perl_exp;
+       func = Perl_exp;
        break;
     case OP_LOG:
        amg_type = log_amg;
-       func = &Perl_log;
+       func = Perl_log;
        neg_report = "log";
        break;
     case OP_SQRT:
        amg_type = sqrt_amg;
-       func = &Perl_sqrt;
+       func = Perl_sqrt;
        neg_report = "sqrt";
        break;
     }