2001-09-18
2001-09-18 22:59:57 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
-
56f4f473dac927d0724916f00f6117b40454761f
(35 lines)
(+4/-31)
[
Show
| Annotate
]
Branch: 7.9
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)