1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
/*
* Copyright (C) 2011 Ludovic Courtes
*
* THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED
* OR IMPLIED. ANY USE IS AT YOUR OWN RISK.
*
* Permission is hereby granted to use or copy this program
* for any purpose, provided the above notices are retained on all copies.
* Permission to modify the code and to distribute modified code is granted,
* provided the above notices are retained, and a notice that the code was
* modified is included with the above copyright notice.
*/
/* Make sure 'GC_INIT' can be called from threads other than the initial
* thread.
*/
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#ifndef GC_THREADS
# define GC_THREADS
#endif
#define GC_NO_THREAD_REDIRECTS 1
/* Do not redirect thread creation and join calls. */
#include "gc.h"
#ifdef GC_PTHREADS
# include <pthread.h>
#else
# include <windows.h>
#endif
#include <stdlib.h>
#include <stdio.h>
#ifdef GC_PTHREADS
static void *thread(void *arg)
#else
static DWORD WINAPI thread(LPVOID arg)
#endif
{
GC_INIT();
(void)GC_MALLOC(123);
(void)GC_MALLOC(12345);
# ifdef GC_PTHREADS
return arg;
# else
return (DWORD)(GC_word)arg;
# endif
}
#include "private/gcconfig.h"
int main(void)
{
# ifdef GC_PTHREADS
int code;
pthread_t t;
# else
HANDLE t;
DWORD thread_id;
# endif
# if !(defined(BEOS) || defined(MSWIN32) || defined(MSWINCE) \
|| defined(CYGWIN32) || defined(GC_OPENBSD_THREADS) \
|| (defined(DARWIN) && !defined(NO_PTHREAD_GET_STACKADDR_NP)) \
|| (defined(LINUX) && !defined(NACL)) \
|| (defined(GC_SOLARIS_THREADS) && !defined(_STRICT_STDC)) \
|| (!defined(STACKBOTTOM) && (defined(HEURISTIC1) \
|| (!defined(LINUX_STACKBOTTOM) && !defined(FREEBSD_STACKBOTTOM)))))
/* GC_INIT() must be called from main thread only. */
GC_INIT();
# endif
# ifdef GC_PTHREADS
if ((code = pthread_create (&t, NULL, thread, NULL)) != 0) {
fprintf(stderr, "Thread creation failed %d\n", code);
return 1;
}
if ((code = pthread_join (t, NULL)) != 0) {
fprintf(stderr, "Thread join failed %d\n", code);
return 1;
}
# else
t = CreateThread(NULL, 0, thread, 0, 0, &thread_id);
if (t == NULL) {
fprintf(stderr, "Thread creation failed %d\n", (int)GetLastError());
return 1;
}
if (WaitForSingleObject(t, INFINITE) != WAIT_OBJECT_0) {
fprintf(stderr, "Thread join failed %d\n", (int)GetLastError());
CloseHandle(t);
return 1;
}
CloseHandle(t);
# endif
return 0;
}
|
