| Jack Jansen | 76efd8e | 1995-02-24 22:53:16 +0000 | [diff] [blame] | 1 | /*********************************************************** | 
| Jack Jansen | 42218ce | 1997-01-31 16:15:11 +0000 | [diff] [blame] | 2 | Copyright 1991-1997 by Stichting Mathematisch Centrum, Amsterdam, | 
| Jack Jansen | 76efd8e | 1995-02-24 22:53:16 +0000 | [diff] [blame] | 3 | The Netherlands. | 
 | 4 |  | 
 | 5 |                         All Rights Reserved | 
 | 6 |  | 
 | 7 | Permission to use, copy, modify, and distribute this software and its  | 
 | 8 | documentation for any purpose and without fee is hereby granted,  | 
 | 9 | provided that the above copyright notice appear in all copies and that | 
 | 10 | both that copyright notice and this permission notice appear in  | 
 | 11 | supporting documentation, and that the names of Stichting Mathematisch | 
 | 12 | Centrum or CWI not be used in advertising or publicity pertaining to | 
 | 13 | distribution of the software without specific, written prior permission. | 
 | 14 |  | 
 | 15 | STICHTING MATHEMATISCH CENTRUM DISCLAIMS ALL WARRANTIES WITH REGARD TO | 
 | 16 | THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND | 
 | 17 | FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM BE LIABLE | 
 | 18 | FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | 
 | 19 | WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | 
 | 20 | ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT | 
 | 21 | OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | 
 | 22 |  | 
 | 23 | ******************************************************************/ | 
 | 24 |  | 
| Jack Jansen | 6b6e61d | 1999-02-15 21:33:34 +0000 | [diff] [blame] | 25 | /* Macintosh Python main program for both applets and interpreter */ | 
| Jack Jansen | 76efd8e | 1995-02-24 22:53:16 +0000 | [diff] [blame] | 26 |  | 
| Jack Jansen | 6b6e61d | 1999-02-15 21:33:34 +0000 | [diff] [blame] | 27 | #include <Resources.h> | 
 | 28 |  | 
 | 29 | #ifdef __CFM68K__ | 
| Jack Jansen | 76efd8e | 1995-02-24 22:53:16 +0000 | [diff] [blame] | 30 | #pragma lib_export on | 
 | 31 | #endif | 
 | 32 |  | 
| Jack Jansen | 6b6e61d | 1999-02-15 21:33:34 +0000 | [diff] [blame] | 33 | extern void PyMac_InitApplet(); | 
| Jack Jansen | 76efd8e | 1995-02-24 22:53:16 +0000 | [diff] [blame] | 34 | extern void PyMac_InitApplication(); | 
 | 35 |  | 
| Jack Jansen | 499a8af | 1996-08-19 11:38:03 +0000 | [diff] [blame] | 36 | void | 
| Jack Jansen | 76efd8e | 1995-02-24 22:53:16 +0000 | [diff] [blame] | 37 | main() { | 
| Jack Jansen | 6b6e61d | 1999-02-15 21:33:34 +0000 | [diff] [blame] | 38 |         Handle mainpyc; | 
 | 39 |  | 
 | 40 |         mainpyc = Get1NamedResource('PYC ', "\p__main__"); | 
 | 41 |         if (mainpyc != NULL) | 
 | 42 |                 PyMac_InitApplet(); | 
 | 43 |         else | 
 | 44 |                 PyMac_InitApplication(); | 
| Jack Jansen | 76efd8e | 1995-02-24 22:53:16 +0000 | [diff] [blame] | 45 | } |