From db94e304c5de62e80285076a8a6800180fe0e750 Mon Sep 17 00:00:00 2001 From: twisti Date: Thu, 12 Jan 2006 21:39:00 +0000 Subject: [PATCH] * md_init, md_stacktrace_get_returnaddress: Prefixed with intrp_. * thread_restartcriticalsection, md_param_alloc, md_return_alloc: Removed. --- src/vm/jit/intrp/md.c | 33 ++++++++++----------------------- 1 file changed, 10 insertions(+), 23 deletions(-) diff --git a/src/vm/jit/intrp/md.c b/src/vm/jit/intrp/md.c index e598e46ea..3e8500174 100644 --- a/src/vm/jit/intrp/md.c +++ b/src/vm/jit/intrp/md.c @@ -30,16 +30,17 @@ Changes: Joseph Wenninger Christian Thalinger - $Id: md.c 3902 2005-12-07 17:32:57Z anton $ + $Id: md.c 4165 2006-01-12 21:39:00Z twisti $ */ +#include "config.h" + #include #include #include -#include "config.h" #include "vm/types.h" #include "vm/jit/intrp/intrp.h" @@ -48,35 +49,32 @@ Inst *vm_prim = NULL; /* initialized by md_init() */ FILE *vm_out = NULL; /* debugging output for vmgenerated stuff */ + /* md_init ********************************************************************* Do some machine dependent initialization. *******************************************************************************/ -void md_init(void) +void intrp_md_init(void) { vm_out = stdout; + if (setvbuf(stdout,NULL, _IOLBF,0) != 0) { perror("setvbuf error"); exit(1); } + if ( vm_prim == NULL ) { vm_prim = (Inst *)engine(NULL, NULL, NULL); } + if (peeptable == 0) { init_peeptable(); } - dynamic_super_init(); -} - -#if defined(USE_THREADS) && defined(NATIVE_THREADS) -void thread_restartcriticalsection(ucontext_t *uc) -{ - assert(false); + dynamic_super_init(); } -#endif /* md_stacktrace_get_returnaddress ********************************************* @@ -86,7 +84,7 @@ void thread_restartcriticalsection(ucontext_t *uc) *******************************************************************************/ -u1 *md_stacktrace_get_returnaddress(u1 *sp, u4 framesize) +u1 *intrp_md_stacktrace_get_returnaddress(u1 *sp, u4 framesize) { u1 *ra; @@ -99,17 +97,6 @@ u1 *md_stacktrace_get_returnaddress(u1 *sp, u4 framesize) } -/* XXX remove me!!! */ -void md_param_alloc(methoddesc *md) -{ -} - -void md_return_alloc(methodinfo *m, registerdata *rd, s4 return_type, - stackptr stackslot) -{ -} - - /* * These are local overrides for various environment variables in Emacs. * Please do not remove this and leave it at the end of the file, where -- 2.25.1