diff options
| author | Guido van Rossum <guido@python.org> | 1995-02-20 23:44:43 (GMT) | 
|---|---|---|
| committer | Guido van Rossum <guido@python.org> | 1995-02-20 23:44:43 (GMT) | 
| commit | 7c496ec629946ef2e56135c85d43819e85b9e366 (patch) | |
| tree | 4fcd493c1a30004a09d22324be6715cca18e01a8 /Mac/Python/macshlglue.c | |
| parent | 42a69c8425bcd3b26372cad3b9a5067974b3026e (diff) | |
| download | cpython-7c496ec629946ef2e56135c85d43819e85b9e366.zip cpython-7c496ec629946ef2e56135c85d43819e85b9e366.tar.gz cpython-7c496ec629946ef2e56135c85d43819e85b9e366.tar.bz2  | |
ported to CFM-68K
Diffstat (limited to 'Mac/Python/macshlglue.c')
| -rw-r--r-- | Mac/Python/macshlglue.c | 31 | 
1 files changed, 19 insertions, 12 deletions
diff --git a/Mac/Python/macshlglue.c b/Mac/Python/macshlglue.c index c079812..3c857f1 100644 --- a/Mac/Python/macshlglue.c +++ b/Mac/Python/macshlglue.c @@ -1,22 +1,24 @@  /* -** mac shared lib glue. -** -** Partially stolen from MW Startup.c, which is -**	Copyright © 1993 metrowerks inc. All Rights Reserved. +** Mac shared lib glue.  */ +#ifdef __powerc  #include <CPlusLibPPC.h> +#endif  #include <Quickdraw.h>  #include <SegLoad.h> -#include <setjmp.h>  #include <FragLoad.h>  #include <Files.h>  #include <Resources.h> +#ifdef __MWERKS__ +/* +** This part is copied from MW Startup.c, which is +**	Copyright © 1993 metrowerks inc. All Rights Reserved. +*/ +#include <setjmp.h>  #include <stdio.h> -char *macstrerror(); -  DestructorChain	*__local_destructor_chain;	/*	chain of local objects that need destruction	*/  	/*	public data		*/ @@ -26,17 +28,22 @@ jmp_buf __program_exit;				/*	exit() does a longjmp() to here		*/  void (*__atexit_hook)(void);		/*	atexit()  sets this up if it is ever called	*/  void (*___atexit_hook)(void);		/*	_atexit() sets this up if it is ever called	*/  int __aborting;						/*	abort() sets this and longjmps to __program_exit	*/ +#endif + +/* +** Variables passed from shared lib initialization to PyMac_AddLibResources. +*/ +static int library_fss_valid; +static FSSpec library_fss; -int library_fss_valid; -FSSpec library_fss;  /*  ** Routine called upon fragment load. We attempt to save the FSSpec from which we're  ** loaded. We always return noErr (we just continue without the resources).  */ -OSErr +OSErr pascal  __sinit(InitBlockPtr data)  { -	if ( data == NULL ) return noErr; +	if ( data == nil ) return noErr;  	if ( data->fragLocator.where == kOnDiskFlat ) {  		library_fss = *data->fragLocator.u.onDisk.fileSpec;  		library_fss_valid = 1; @@ -62,4 +69,4 @@ PyMac_AddLibResources()  		return;  	fd = FSpOpenResFile(&library_fss, fsRdPerm);  } -   	 +  | 
