6a4f3cf127
tested on win32/64 to pass the tests when enabled - libtcc.c : let tcc define __leading_underscore if enabled tcc_add_symbol() : add _ automatically - tccelf.c : remove tcc_get_symbol_err(), find_c_sym() currently symbol length is limited to 256 in several places, so we can use a fixed local buffer for now as well. - win32/lib/crtinit.c : new file for init/fini - lib/*.S, tests7* : use __leading_underscore - bt-log.c: this file wont work relibaly if compiled with gcc
26 lines
745 B
C
26 lines
745 B
C
//+---------------------------------------------------------------------------
|
|
|
|
#ifdef __leading_underscore
|
|
# define _(s) s
|
|
#else
|
|
# define _(s) _##s
|
|
#endif
|
|
|
|
extern void (*_(_init_array_start)[]) (int argc, _TCHAR **argv, _TCHAR **envp);
|
|
extern void (*_(_init_array_end)[]) (int argc, _TCHAR **argv, _TCHAR **envp);
|
|
extern void (*_(_fini_array_start)[]) (void);
|
|
extern void (*_(_fini_array_end)[]) (void);
|
|
|
|
static void run_ctors(int argc, _TCHAR **argv, _TCHAR **env)
|
|
{
|
|
int i = 0;
|
|
while (&_(_init_array_start)[i] != _(_init_array_end))
|
|
(*_(_init_array_start)[i++])(argc, argv, env);
|
|
}
|
|
|
|
static void run_dtors(void)
|
|
{
|
|
int i = 0;
|
|
while (&_(_fini_array_end)[i] != _(_fini_array_start))
|
|
(*_(_fini_array_end)[--i])();
|
|
}
|