2003-04-02
2003-04-02 20:55:03 by Martin Stjernholm <mast@lysator.liu.se>
-
b0234c5b7592a5e9430436fe5b1af7993ba17386
(10 lines)
(+7/-3)
[
Show
| Annotate
]
Branch: 7.9
Something is seriously wrong if there's a module program still around in
free_dynamic_load.
Rev: src/dynamic_load.c:1.68
2:
|| This file is part of Pike. For copyright information see COPYRIGHT.
|| Pike is distributed under GPL, LGPL and MPL. See the file COPYING
|| for more information.
- || $Id: dynamic_load.c,v 1.67 2002/10/30 14:45:50 grubba Exp $
+ || $Id: dynamic_load.c,v 1.68 2003/04/02 20:55:03 mast Exp $
*/
#ifdef TESTING
24:
# include "language.h"
# include "lex.h"
- RCSID("$Id: dynamic_load.c,v 1.67 2002/10/30 14:45:50 grubba Exp $");
+ RCSID("$Id: dynamic_load.c,v 1.68 2003/04/02 20:55:03 mast Exp $");
#else /* TESTING */
545: Inside #if defined(USE_DYNAMIC_MODULES) and #if undefined(DEBUG_MALLOC)
#ifndef DEBUG_MALLOC
dlclose(tmp->module);
#endif
- if (tmp->module_prog) free_program(tmp->module_prog);
+ #ifdef PIKE_DEBUG
+ if (tmp->module_prog)
+ Pike_fatal ("There's still a program for a dynamic module.\n");
+ #endif
free((char *)tmp);
}
#endif