pike.git / src / post_modules / Nettle / hash.cmod

version» Context lines:

pike.git/src/post_modules/Nettle/hash.cmod:1:   /* hash.cmod -*- c -*- */      #include "global.h" - RCSID("$Id: hash.cmod,v 1.5 2003/05/07 16:12:17 grubba Exp $"); + RCSID("$Id: hash.cmod,v 1.6 2003/05/08 11:17:17 grubba Exp $");   #include "interpret.h"   #include "svalue.h"      /* For this_object() */   #include "object.h"   #include "module_support.h"      #include "nettle_config.h"      #ifdef HAVE_LIBNETTLE
pike.git/src/post_modules/Nettle/hash.cmod:171:    }       INIT    {    werror("HashState->INIT\n");    THIS->ctx = NULL;    }    EXIT    {    werror("HashState->EXIT\n"); -  if (THIS->ctx) +  if (THIS->ctx && Pike_fp->current_object->prog)    {    const struct nettle_hash *meta =    GET_META(Pike_fp->current_object);    assert(meta);    memset(THIS->ctx, 0, meta->context_size);    }    }   }      /*! @endclass HashState */