Branch: Tag:

2004-01-29

2004-01-29 23:16:03 by Martin Nilsson <mani@lysator.liu.se>

nettle.h

Rev: src/post_modules/Nettle/Makefile.in:1.9
Rev: src/post_modules/Nettle/nettle.cmod:1.29
Rev: src/post_modules/Nettle/nettle.h:1.5

1:   /* nettle.cmod -*- c -*- */      #include "global.h" - RCSID("$Id: nettle.cmod,v 1.28 2004/01/23 01:05:06 nilsson Exp $"); + RCSID("$Id: nettle.cmod,v 1.29 2004/01/29 23:16:03 nilsson Exp $");   #include "interpret.h"   #include "svalue.h"   /* For this_object() */
739:   /*! @endmodule    */    +  +    #endif /* HAVE_LIBNETTLE */      PIKE_MODULE_INIT   { -  + #ifdef __NT__ +  struct program *nt_program = NULL; +  struct object *nt_object = NULL; + #endif /* __NT__ */    INIT;   #ifdef HAVE_LIBNETTLE    hash_init();    cipher_init();   #endif /* HAVE_LIBNETTLE */ -  + #ifdef __NT__ +  start_new_program(); +  nt_init(); +  nt_program = end_program(); +  add_object_constant("NT", nt_object=clone_object(nt_program,0), 0); +  free_object(nt_object); +  free_program(nt_program); + #endif /* __NT__ */   }      PIKE_MODULE_EXIT
756:    cipher_exit();    hash_exit();   #endif /* HAVE_LIBNETTLE */ + #ifdef __NT__ +  nt_exit(); + #endif /* __NT__ */    EXIT;   }