Add new function, EVP_MD_CTX_copy() to replace frequent use of memcpy.

[openssl.git] / perl / callback.c

diff --git a/perl/callback.c b/perl/callback.c
index 01840abc854a48fcda8eeadfb6ceff750ff3539c..4e39c16d70f4a12a9f53c547131906f075443a23 100644 (file)
--- a/perl/callback.c
+++ b/perl/callback.c
@@ -80,7 +80,7 @@ char *argp;
        {
        SV *sv;
 
-fprintf(stderr,"ex_new %08X %s\n",obj,argp);
+fprintf(stderr,"ex_new idx=%d %08X %s\n",idx,obj,argp);
        sv=sv_newmortal();
        sv_setref_pv(sv,argp,(void *)obj);
        CRYPTO_set_ex_data(ad,idx,(char *)sv);