github/amiga-clib2
1
0
Fork 0
mirror of https://github.com/adtools/clib2.git synced 2025-12-08 14:59:05 +00:00
Code Issues Releases Wiki Activity

- Fixed the constructor/destructor invocation sequence for the SAS/C and

Browse Source 
GCC 68k library builds.


git-svn-id: file:///Users/olsen/Code/migration-svn-zu-git/logical-line-staging/clib2/trunk@14896 87f5fb63-7c3d-0410-a384-fd976d0f7a62
This commit is contained in:
Olaf Barthel
2005-03-20 12:14:09 +00:00
parent d85d6648ea
commit 5eefcf4555
1 changed files with 10 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
library/stdlib_constructor_begin.c
View File

@ -1,5 +1,5 @@
/*
* $Id: stdlib_constructor_begin.c,v 1.8 2005-03-20 11:57:11 obarthel Exp $
* $Id: stdlib_constructor_begin.c,v 1.9 2005-03-20 12:14:09 obarthel Exp $
*
* :ts=4
*
@ -78,7 +78,7 @@ _init(void)
for(i = 0 ; i < num_constructors ; i++)
{
if((*__ctors[num_constructors - (i+1)])() != 0)
if((*__ctors[num_constructors - (i + 1)])() != 0)
exit(RETURN_FAIL);
}
}
@ -190,7 +190,7 @@ sort_private_functions(struct private_function * base, size_t count)
/****************************************************************************/
/* Sort all the init and exit functions (private library constructors), then
invoke the init functions in ascending order. */
invoke the init functions in descending order. */
static void
call_init_functions(void)
{
@ -212,10 +212,12 @@ call_init_functions(void)
if(num_init_functions > 0)
{
struct private_function * t = (struct private_function *)&__INIT_LIST__[1];
LONG i;
LONG i,j;
for(i = 0 ; i < num_init_functions ; i++)
for(j = 0 ; j < num_init_functions ; j++)
{
i = num_init_functions - (j + 1);
D(("calling init function #%ld, 0x%08lx",i,t[i].function));
(*t[i].function)();
@ -227,7 +229,7 @@ call_init_functions(void)
/****************************************************************************/
/* Call all exit functions in descending order; this assumes that the function
/* Call all exit functions in ascending order; this assumes that the function
table was prepared by call_init_functions() above. */
static void
call_exit_functions(void)
@ -243,9 +245,9 @@ call_exit_functions(void)
struct private_function * t = (struct private_function *)&__EXIT_LIST__[1];
LONG i;
for( ; j < num_exit_functions ; j++)
while(j++ < num_exit_functions)
{
i = num_exit_functions - (j+1);
i = j - 1;
D(("calling exit function #%ld, 0x%08lx",i,t[i].function));