summaryrefslogtreecommitdiff
path: root/Mac/Python/macapplication.c
diff options
context:
space:
mode:
authorJack Jansen <jack.jansen@cwi.nl>2003-11-19 14:34:18 +0000
committerJack Jansen <jack.jansen@cwi.nl>2003-11-19 14:34:18 +0000
commit28ecf70db57828db2ca279643bf9aeca7662f35c (patch)
tree09b7767bbc411f85313b58d6fe7e5e67d9392973 /Mac/Python/macapplication.c
parent6045b9c93511c767f6cfa2d2fa299c76181acd9b (diff)
downloadcpython-git-28ecf70db57828db2ca279643bf9aeca7662f35c.tar.gz
Getting rid of support for MacOS9 and earlier. This is the first step,
and the biggest in size, but probably the easiest. Hunting through the source code comes next.
Diffstat (limited to 'Mac/Python/macapplication.c')
-rw-r--r--Mac/Python/macapplication.c83
1 files changed, 0 insertions, 83 deletions
diff --git a/Mac/Python/macapplication.c b/Mac/Python/macapplication.c
deleted file mode 100644
index 4c71234637..0000000000
--- a/Mac/Python/macapplication.c
+++ /dev/null
@@ -1,83 +0,0 @@
-/***********************************************************
-Copyright 1991-1997 by Stichting Mathematisch Centrum, Amsterdam,
-The Netherlands.
-
- All Rights Reserved
-
-Permission to use, copy, modify, and distribute this software and its
-documentation for any purpose and without fee is hereby granted,
-provided that the above copyright notice appear in all copies and that
-both that copyright notice and this permission notice appear in
-supporting documentation, and that the names of Stichting Mathematisch
-Centrum or CWI not be used in advertising or publicity pertaining to
-distribution of the software without specific, written prior permission.
-
-STICHTING MATHEMATISCH CENTRUM DISCLAIMS ALL WARRANTIES WITH REGARD TO
-THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
-FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM BE LIABLE
-FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
-WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
-ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
-OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
-
-******************************************************************/
-
-/* Macintosh Python main program for both applets and interpreter */
-
-#include <Resources.h>
-#include <CodeFragments.h>
-
-extern void PyMac_InitApplication(void);
-#ifdef USE_MAC_APPLET_SUPPORT
-extern void PyMac_InitApplet(void);
-#endif /* USE_MAC_APPLET_SUPPORT */
-
-/* From the MSL runtime: */
-extern void __initialize(void);
-
-/*
-** Alternative initialization entry point for some very special cases.
-** Use this in stead of __initialize in the PEF settings to remember (and
-** re-open as resource file) the application. This is needed if we link against
-** a dynamic library that, in its own __initialize routine, opens a resource
-** file. This would mess up our finding of override preferences.
-** Only set this entrypoint in your apps if you notice sys.path or some such is
-** messed up.
-*/
-static int application_fss_valid;
-static FSSpec application_fss;
-
-OSErr pascal
-__initialize_remember_app_fsspec(CFragInitBlockPtr data)
-{
- /* Call the MW runtime's initialization routine */
- __initialize();
- if ( data == nil ) return noErr;
- if ( data->fragLocator.where == kDataForkCFragLocator ) {
- application_fss = *data->fragLocator.u.onDisk.fileSpec;
- application_fss_valid = 1;
- } else if ( data->fragLocator.where == kResourceCFragLocator ) {
- application_fss = *data->fragLocator.u.inSegs.fileSpec;
- application_fss_valid = 1;
- }
- return noErr;
-}
-
-void
-main() {
- if ( application_fss_valid )
- (void)FSpOpenResFile(&application_fss, fsRdPerm);
-#ifdef USE_MAC_APPLET_SUPPORT
- {
- Handle mainpyc;
-
- mainpyc = Get1NamedResource('PYC ', "\p__main__");
- if (mainpyc != NULL)
- PyMac_InitApplet();
- else
- PyMac_InitApplication();
- }
-#else
- PyMac_InitApplication();
-#endif /* USE_MAC_APPLET_SUPPORT */
-}