Branch: Tag:

2001-09-18

2001-09-18 22:59:57 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

running 'make test_dlopen' will now run a small testsuite for dlopen

Rev: src/Makefile.in:1.272
Rev: src/dynamic_load.c:1.56
Rev: src/fdlib.c:1.49
Rev: src/test_dynamic_loading.in:1.1
Rev: src/threads.c:1.164

1:   #include "global.h" - RCSID("$Id: threads.c,v 1.163 2001/09/06 00:20:59 hubbe Exp $"); + RCSID("$Id: threads.c,v 1.164 2001/09/18 22:59:57 hubbe Exp $");      PMOD_EXPORT int num_threads = 1;   PMOD_EXPORT int threads_disabled = 0;
81: Inside #if defined(__NT__)
        #ifdef PIKE_DEBUG - static int IsValidHandle(HANDLE h) - { -  __try { -  HANDLE ret; -  if(DuplicateHandle(GetCurrentProcess(), -  h, -  GetCurrentProcess(), -  &ret, -  0, -  0, -  DUPLICATE_SAME_ACCESS)) -  { -  CloseHandle(ret); -  } -  } -  -  __except (1) { -  return 0; -  } -  -  return 1; - } -  - PMOD_EXPORT HANDLE CheckValidHandle(HANDLE h) - { -  if(!IsValidHandle(h)) -  fatal("Invalid handle!\n"); -  return h; - } -  + PMOD_EXPORT HANDLE CheckValidHandle(HANDLE h);   #endif      #endif
1844:    destruct(Pike_interpreter.thread_id);    free_object(Pike_interpreter.thread_id);    Pike_interpreter.thread_id=0; +  destruct_objects_to_destruct_cb();    }       if(mutex_key)