traverseda
/
cpython
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Ported to CW8

This commit is contained in:
Jack Jansen 1996-02-20 16:26:19 +00:00
parent 56ed26ed11
commit eb263680bb
1 changed files with 20 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
Mac/mwerks/macuseshlstart.c
View File

@ -7,15 +7,30 @@
#include <setjmp.h>
#ifdef PRE_CW8
extern jmp_buf __program_exit; /* exit() does a longjmp() to here */
extern void (*__atexit_hook)(void); /* atexit() sets this up if it is ever called */
extern void (*___atexit_hook)(void); /* _atexit() sets this up if it is ever called */
extern int __aborting; /* abort() sets this and longjmps to __program_exit */
#endif
/*
* clear_stackframe_backlink - set 0(SP) to 0
*
*/
static asm void clear_stackframe_backlink(void)
{
li r3,0
stw r3,0(SP)
blr
}
void __start(void)
{
char *argv = 0;
#ifdef PRE_CW8
if (setjmp(__program_exit) == 0) { // set up jmp_buf for exit()
main(0, &argv); // call main(argc, argv)
if (__atexit_hook)
@ -26,4 +41,9 @@ void __start(void)
___atexit_hook(); // call _atexit() procs
}
// ExitToShell();
#else
clear_stackframe_backlink();
main(0, &argv);
exit(0);
#endif
}