1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-17 08:31:09 -08:00
emacs/mps/qa/conerr/49.c
Richard Tucker e9a5c0fa33 Update headers
Copied from Perforce
 Change: 18186
 ServerID: perforce.ravenbrook.com
1997-05-16 15:43:27 +01:00

44 lines
740 B
C

/* TEST_HEADER
summary = register thread twice
language = c
link = myfmt.o testlib.o
END_HEADER
*/
#include "testlib.h"
#include "mpscamc.h"
#include "myfmt.h"
void *stackpointer;
static void test(void)
{
mps_space_t space;
mps_thr_t thread;
mps_thr_t thread2;
cdie(mps_space_create(&space), "create space");
cdie(mps_thread_reg(&thread, space), "register thread");
cdie(mps_thread_reg(&thread2, space), "register thread 2");
mps_thread_dereg(thread);
comment("Deregistered thread.");
mps_thread_dereg(thread2);
comment("Deregistered thread 2.");
mps_space_destroy(space);
comment("Destroyed space.");
}
int main(void)
{
void *m;
stackpointer=&m; /* hack to get stack pointer */
easy_tramp(test);
return 0;
}