cpython-lru_cache-weakref: Mac/Python/macmain.c annotate

annotate Mac/Python/macmain.c @ 19851:f3f694111ea0 legacy-trunk

Failing to import macfsn is not a fatal error.

author	Jack Jansen <jack.jansen@cwi.nl>
date	Tue, 11 Sep 2001 11:29:31 +0000
parents	c93d7d0857a2
children	5568b320914f

rev	line source
1811 ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	1 /***********************************************************
5079 d6b292a33cfe Added/updated copyright notices Jack Jansen <jack.jansen@cwi.nl> parents: 4962 diff changeset	2 Copyright 1991-1997 by Stichting Mathematisch Centrum, Amsterdam,
2091 b4d982c648bb 1995 copyright Guido van Rossum <guido@python.org> parents: 2031 diff changeset	3 The Netherlands.
1811 ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	4
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	5 All Rights Reserved
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	6
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	7 Permission to use, copy, modify, and distribute this software and its
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	8 documentation for any purpose and without fee is hereby granted,
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	9 provided that the above copyright notice appear in all copies and that
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	10 both that copyright notice and this permission notice appear in
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	11 supporting documentation, and that the names of Stichting Mathematisch
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	12 Centrum or CWI not be used in advertising or publicity pertaining to
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	13 distribution of the software without specific, written prior permission.
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	14
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	15 STICHTING MATHEMATISCH CENTRUM DISCLAIMS ALL WARRANTIES WITH REGARD TO
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	16 THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	17 FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM BE LIABLE
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	18 FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	19 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	20 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	21 OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	22
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	23 ******************************************************************/
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	24
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	25 /* Python interpreter main program */
1811 ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	26
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	27 #include "Python.h"
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	28 #include "pythonresources.h"
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	29 #include "import.h"
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	30 #include "marshal.h"
4197 b70baba1c789 - Fixed PyMac_DoYield: Jack Jansen <jack.jansen@cwi.nl> parents: 4017 diff changeset	31 #include "macglue.h"
2144 0e60cd207adb must include rename2.h Guido van Rossum <guido@python.org> parents: 2091 diff changeset	32
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	33 #ifdef WITHOUT_FRAMEWORKS
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	34 #include <Memory.h>
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	35 #include <Resources.h>
1811 ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	36 #include <stdio.h>
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	37 #include <Events.h>
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	38 #include <Windows.h>
3442 066a8ae4d406 Added missing include of Fonts.h Jack Jansen <jack.jansen@cwi.nl> parents: 3433 diff changeset	39 #include <Fonts.h>
6293 6c0a2658a156 Added old-exception and no-site-python options and balloon help Jack Jansen <jack.jansen@cwi.nl> parents: 6277 diff changeset	40 #include <Balloons.h>
11529 f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	41 #ifdef USE_APPEARANCE
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	42 #include <Gestalt.h>
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	43 #include <Appearance.h>
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	44 #endif /* USE_APPEARANCE */
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	45 #else
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	46 #include <Carbon/Carbon.h>
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	47 #endif /* WITHOUT_FRAMEWORKS */
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	48
2277 df7e26b5c918 Added stuff so CodeWarrior isn't so verbose about its stdio windows Jack Jansen <jack.jansen@cwi.nl> parents: 2226 diff changeset	49 #ifdef __MWERKS__
df7e26b5c918 Added stuff so CodeWarrior isn't so verbose about its stdio windows Jack Jansen <jack.jansen@cwi.nl> parents: 2226 diff changeset	50 #include <SIOUX.h>
3247 20d74fa3b50b For MW Python, update titlebar of window when python exits. Jack Jansen <jack.jansen@cwi.nl> parents: 3236 diff changeset	51 #define USE_SIOUX
13547 db963a615bc9 ANSIfication step 2: make sure all needed prototypes are available, and all needed Jack Jansen <jack.jansen@cwi.nl> parents: 13542 diff changeset	52 extern int ccommand(char ***);
4911 21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	53 #if __profile__ == 1
21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	54 #include <profiler.h>
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	55 #endif /* __profile__ */
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	56 #endif /* __MWERKS__ */
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	57
12834 c2a0f2a81fa8 Removed (within an #ifdef) Carbon-incompatabilities: Jack Jansen <jack.jansen@cwi.nl> parents: 12593 diff changeset	58 #include <unistd.h>
13702 f840bf6a3351 Added more prototypes. Jack Jansen <jack.jansen@cwi.nl> parents: 13638 diff changeset	59 #ifdef USE_MAC_SHARED_LIBRARY
f840bf6a3351 Added more prototypes. Jack Jansen <jack.jansen@cwi.nl> parents: 13638 diff changeset	60 extern PyMac_AddLibResources(void);
f840bf6a3351 Added more prototypes. Jack Jansen <jack.jansen@cwi.nl> parents: 13638 diff changeset	61 #endif
2277 df7e26b5c918 Added stuff so CodeWarrior isn't so verbose about its stdio windows Jack Jansen <jack.jansen@cwi.nl> parents: 2226 diff changeset	62
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	63 #define STARTUP "PythonStartup"
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	64
14464 17cec96f75bc Use same short banner message as unix/win Python. Jack Jansen <jack.jansen@cwi.nl> parents: 14198 diff changeset	65 #define COPYRIGHT \
17cec96f75bc Use same short banner message as unix/win Python. Jack Jansen <jack.jansen@cwi.nl> parents: 14198 diff changeset	66 "Type \"copyright\", \"credits\" or \"license\" for more information."
17cec96f75bc Use same short banner message as unix/win Python. Jack Jansen <jack.jansen@cwi.nl> parents: 14198 diff changeset	67
4228 84444ea3f5f6 - Rationalized override preferences support, by remembering Jack Jansen <jack.jansen@cwi.nl> parents: 4215 diff changeset	68 short PyMac_AppRefNum; /* RefNum of application resource fork */
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	69
3930 52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	70 /* For Py_GetArgcArgv(); set by main() */
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	71 static char **orig_argv;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	72 static int orig_argc;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	73
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	74 /* A flag which remembers whether the user has acknowledged all the console
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	75 ** output (by typing something)
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	76 */
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	77 #define STATE_UNKNOWN 0
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	78 #define STATE_LASTREAD 1
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	79 #define STATE_LASTWRITE 2
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	80 int console_output_state = STATE_UNKNOWN;
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	81
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	82 PyMac_PrefRecord PyMac_options;
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	83
13542 ddd6138c9e6f ANSIfication step 1: get rid of Py_PROTO and Py_FPROTO. Jack Jansen <jack.jansen@cwi.nl> parents: 12855 diff changeset	84 static void Py_Main(int, char *); / Forward */
ddd6138c9e6f ANSIfication step 1: get rid of Py_PROTO and Py_FPROTO. Jack Jansen <jack.jansen@cwi.nl> parents: 12855 diff changeset	85 void PyMac_Exit(int); /* Forward */
4017 5dc8c042905b Guido: added some void's to declarations Jack Jansen <jack.jansen@cwi.nl> parents: 3930 diff changeset	86
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	87 static void init_appearance(void)
11529 f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	88 {
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	89 #ifdef USE_APPEARANCE
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	90 OSErr err;
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	91 SInt32 response;
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	92
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	93 err = Gestalt(gestaltAppearanceAttr,&response);
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	94 if ( err ) goto no_appearance;
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	95 if ( !(response&(1<<gestaltAppearanceExists)) ) goto no_appearance;
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	96 /* XXXX Should we check the version? Compat-mode? */
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	97 PyMac_AppearanceCompliant = 1;
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	98 no_appearance:
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	99 return;
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	100 #endif /* USE_APPEARANCE */
f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	101 }
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	102 /* Initialize the Mac toolbox world */
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	103
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	104 static void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	105 init_mac_world(void)
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	106 {
13608 a901c2c0166b Test for TARGET_API_MAC_CARBON with #if in stead of #ifdef. Jack Jansen <jack.jansen@cwi.nl> parents: 13547 diff changeset	107 #if !TARGET_API_MAC_CARBON
12834 c2a0f2a81fa8 Removed (within an #ifdef) Carbon-incompatabilities: Jack Jansen <jack.jansen@cwi.nl> parents: 12593 diff changeset	108 /* These aren't needed for carbon */
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	109 MaxApplZone();
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	110 InitGraf(&qd.thePort);
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	111 InitFonts();
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	112 InitWindows();
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	113 TEInit();
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	114 InitDialogs((long)0);
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	115 InitMenus();
12834 c2a0f2a81fa8 Removed (within an #ifdef) Carbon-incompatabilities: Jack Jansen <jack.jansen@cwi.nl> parents: 12593 diff changeset	116 #endif
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	117 InitCursor();
11529 f83b74273da2 First bits and pieces of appearance support: an init routine, a global flag PyMac_AppearanceCompliant (exported thru MacOS). If USE_APPEARANCE Jack Jansen <jack.jansen@cwi.nl> parents: 11350 diff changeset	118 init_appearance();
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	119 }
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	120
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	121 /*
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	122 ** PyMac_InteractiveOptions - Allow user to set options if option key is pressed
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	123 */
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	124 static void
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	125 PyMac_InteractiveOptions(PyMac_PrefRecord p, int argcp, char ***argvp)
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	126 {
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	127 KeyMap rmap;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	128 unsigned char *map;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	129 short item, type;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	130 ControlHandle handle;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	131 DialogPtr dialog;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	132 Rect rect;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	133
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	134 /*
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	135 ** If the preferences disallows interactive options we return,
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	136 ** similarly of <option> isn't pressed.
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	137 */
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	138 if (p->nointopt) return;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	139
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	140 GetKeys(rmap);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	141 map = (unsigned char *)rmap;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	142 if ( ( map[0x3a>>3] & (1<<(0x3a&7)) ) == 0 ) /* option key is 3a */
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	143 return;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	144
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	145 dialog = GetNewDialog(OPT_DIALOG, NULL, (WindowPtr)-1);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	146 if ( dialog == NULL ) {
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	147 printf("Option dialog not found - cannot set options\n");
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	148 return;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	149 }
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	150 SetDialogDefaultItem(dialog, OPT_OK);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	151 SetDialogCancelItem(dialog, OPT_CANCEL);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	152
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	153 /* Set default values */
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	154 #define SET_OPT_ITEM(num, var) \
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	155 GetDialogItem(dialog, (num), &type, (Handle *)&handle, &rect); \
5270 de9d0c5249b0 Changed the few old routine names still used to the new ones Jack Jansen <jack.jansen@cwi.nl> parents: 5153 diff changeset	156 SetControlValue(handle, (short)p->var);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	157
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	158 SET_OPT_ITEM(OPT_INSPECT, inspect);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	159 SET_OPT_ITEM(OPT_VERBOSE, verbose);
19641 c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	160 /* OPT_VERBOSEVERBOSE is default off */
6293 6c0a2658a156 Added old-exception and no-site-python options and balloon help Jack Jansen <jack.jansen@cwi.nl> parents: 6277 diff changeset	161 SET_OPT_ITEM(OPT_OPTIMIZE, optimize);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	162 SET_OPT_ITEM(OPT_UNBUFFERED, unbuffered);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	163 SET_OPT_ITEM(OPT_DEBUGGING, debugging);
14773 c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	164 GetDialogItem(dialog, OPT_KEEPALWAYS, &type, (Handle *)&handle, &rect);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	165 SetControlValue(handle, (short)(p->keep_console == POPT_KEEPCONSOLE_ALWAYS));
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	166 GetDialogItem(dialog, OPT_KEEPOUTPUT, &type, (Handle *)&handle, &rect);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	167 SetControlValue(handle, (short)(p->keep_console == POPT_KEEPCONSOLE_OUTPUT));
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	168 GetDialogItem(dialog, OPT_KEEPERROR, &type, (Handle *)&handle, &rect);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	169 SetControlValue(handle, (short)(p->keep_console == POPT_KEEPCONSOLE_ERROR));
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	170 GetDialogItem(dialog, OPT_KEEPNEVER, &type, (Handle *)&handle, &rect);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	171 SetControlValue(handle, (short)(p->keep_console == POPT_KEEPCONSOLE_NEVER));
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	172 /* SET_OPT_ITEM(OPT_KEEPCONSOLE, keep_console); */
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	173 SET_OPT_ITEM(OPT_TABWARN, tabwarn);
6293 6c0a2658a156 Added old-exception and no-site-python options and balloon help Jack Jansen <jack.jansen@cwi.nl> parents: 6277 diff changeset	174 SET_OPT_ITEM(OPT_NOSITE, nosite);
19641 c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	175 SET_OPT_ITEM(OPT_DIVISIONWARN, divisionwarn);
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	176 SET_OPT_ITEM(OPT_UNIXNEWLINES, unixnewlines);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	177 /* The rest are not settable interactively */
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	178
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	179 #undef SET_OPT_ITEM
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	180
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	181 while (1) {
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	182 handle = NULL;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	183 ModalDialog(NULL, &item);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	184 if ( item == OPT_OK )
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	185 break;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	186 if ( item == OPT_CANCEL ) {
5270 de9d0c5249b0 Changed the few old routine names still used to the new ones Jack Jansen <jack.jansen@cwi.nl> parents: 5153 diff changeset	187 DisposeDialog(dialog);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	188 exit(0);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	189 }
13608 a901c2c0166b Test for TARGET_API_MAC_CARBON with #if in stead of #ifdef. Jack Jansen <jack.jansen@cwi.nl> parents: 13547 diff changeset	190 #if !TARGET_API_MAC_CARBON
6293 6c0a2658a156 Added old-exception and no-site-python options and balloon help Jack Jansen <jack.jansen@cwi.nl> parents: 6277 diff changeset	191 if ( item == OPT_HELP ) {
6c0a2658a156 Added old-exception and no-site-python options and balloon help Jack Jansen <jack.jansen@cwi.nl> parents: 6277 diff changeset	192 HMSetBalloons(!HMGetBalloons());
6c0a2658a156 Added old-exception and no-site-python options and balloon help Jack Jansen <jack.jansen@cwi.nl> parents: 6277 diff changeset	193 }
12834 c2a0f2a81fa8 Removed (within an #ifdef) Carbon-incompatabilities: Jack Jansen <jack.jansen@cwi.nl> parents: 12593 diff changeset	194 #endif
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	195 #if !TARGET_API_MAC_OSX
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	196 if ( item == OPT_CMDLINE ) {
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	197 int old_argc = *argcp;
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	198 int i;
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	199 int new_argc, newer_argc;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	200 char new_argv, newer_argv;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	201
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	202 new_argc = ccommand(&new_argv);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	203 newer_argc = (new_argc-1) + old_argc;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	204 newer_argv = malloc((newer_argc+1)sizeof(char ));
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	205 if( !newer_argv )
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	206 Py_FatalError("Cannot malloc argv\n");
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	207 for(i=0; i<old_argc; i++)
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	208 newer_argv[i] = (*argvp)[i];
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	209 for(i=old_argc; i<=newer_argc; i++) /* Copy the NULL too */
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	210 newer_argv[i] = new_argv[i-old_argc+1];
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	211 *argvp = newer_argv;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	212 *argcp = newer_argc;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	213
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	214 /* XXXX Is it not safe to use free() here, apparently */
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	215 }
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	216 #endif /* !TARGET_API_MAC_OSX */
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	217 #define OPT_ITEM(num, var) \
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	218 if ( item == (num) ) { \
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	219 p->var = !p->var; \
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	220 GetDialogItem(dialog, (num), &type, (Handle *)&handle, &rect); \
5270 de9d0c5249b0 Changed the few old routine names still used to the new ones Jack Jansen <jack.jansen@cwi.nl> parents: 5153 diff changeset	221 SetControlValue(handle, (short)p->var); \
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	222 }
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	223
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	224 OPT_ITEM(OPT_INSPECT, inspect);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	225 OPT_ITEM(OPT_VERBOSE, verbose);
19641 c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	226 if ( item == OPT_VERBOSEVERBOSE ) {
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	227 if ( p->verbose == 2 )
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	228 p->verbose = 1;
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	229 else
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	230 p->verbose = 2;
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	231 GetDialogItem(dialog, OPT_VERBOSE, &type, (Handle *)&handle, &rect);
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	232 SetControlValue(handle, 1);
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	233 }
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	234 GetDialogItem(dialog, OPT_VERBOSEVERBOSE, &type, (Handle *)&handle, &rect);
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	235 SetControlValue(handle, p->verbose == 2);
6293 6c0a2658a156 Added old-exception and no-site-python options and balloon help Jack Jansen <jack.jansen@cwi.nl> parents: 6277 diff changeset	236 OPT_ITEM(OPT_OPTIMIZE, optimize);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	237 OPT_ITEM(OPT_UNBUFFERED, unbuffered);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	238 OPT_ITEM(OPT_DEBUGGING, debugging);
14773 c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	239 if ( item == OPT_KEEPALWAYS ) p->keep_console = POPT_KEEPCONSOLE_ALWAYS;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	240 if ( item == OPT_KEEPOUTPUT ) p->keep_console = POPT_KEEPCONSOLE_OUTPUT;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	241 if ( item == OPT_KEEPERROR ) p->keep_console = POPT_KEEPCONSOLE_ERROR;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	242 if ( item == OPT_KEEPNEVER ) p->keep_console = POPT_KEEPCONSOLE_NEVER;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	243 GetDialogItem(dialog, OPT_KEEPALWAYS, &type, (Handle *)&handle, &rect);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	244 SetControlValue(handle, (short)(p->keep_console == POPT_KEEPCONSOLE_ALWAYS));
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	245 GetDialogItem(dialog, OPT_KEEPOUTPUT, &type, (Handle *)&handle, &rect);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	246 SetControlValue(handle, (short)(p->keep_console == POPT_KEEPCONSOLE_OUTPUT));
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	247 GetDialogItem(dialog, OPT_KEEPERROR, &type, (Handle *)&handle, &rect);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	248 SetControlValue(handle, (short)(p->keep_console == POPT_KEEPCONSOLE_ERROR));
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	249 GetDialogItem(dialog, OPT_KEEPNEVER, &type, (Handle *)&handle, &rect);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	250 SetControlValue(handle, (short)(p->keep_console == POPT_KEEPCONSOLE_NEVER));
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	251 OPT_ITEM(OPT_TABWARN, tabwarn);
6293 6c0a2658a156 Added old-exception and no-site-python options and balloon help Jack Jansen <jack.jansen@cwi.nl> parents: 6277 diff changeset	252 OPT_ITEM(OPT_NOSITE, nosite);
19641 c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	253 OPT_ITEM(OPT_DIVISIONWARN, divisionwarn);
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	254 OPT_ITEM(OPT_UNIXNEWLINES, unixnewlines);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	255
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	256 #undef OPT_ITEM
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	257 }
5270 de9d0c5249b0 Changed the few old routine names still used to the new ones Jack Jansen <jack.jansen@cwi.nl> parents: 5153 diff changeset	258 DisposeDialog(dialog);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	259 }
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	260
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	261 /*
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	262 ** Initialization code, shared by interpreter and applets
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	263 */
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	264 static void
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	265 init_common(int argcp, char **argvp, int embedded)
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	266 {
4228 84444ea3f5f6 - Rationalized override preferences support, by remembering Jack Jansen <jack.jansen@cwi.nl> parents: 4215 diff changeset	267 /* Remember resource fork refnum, for later */
84444ea3f5f6 - Rationalized override preferences support, by remembering Jack Jansen <jack.jansen@cwi.nl> parents: 4215 diff changeset	268 PyMac_AppRefNum = CurResFile();
84444ea3f5f6 - Rationalized override preferences support, by remembering Jack Jansen <jack.jansen@cwi.nl> parents: 4215 diff changeset	269
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	270 /* Initialize toolboxes */
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	271 init_mac_world();
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	272
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	273 #ifdef USE_MAC_SHARED_LIBRARY
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	274 /* Add the shared library to the stack of resource files */
8792 0f5e0b405bc2 Initialize the program name before adding shared library resources (Just). Jack Jansen <jack.jansen@cwi.nl> parents: 6444 diff changeset	275 (void)PyMac_init_process_location();
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	276 PyMac_AddLibResources();
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	277 #endif
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	278
12281 51c0c3b6d919 Started on GUSI2 and threading support. Jack Jansen <jack.jansen@cwi.nl> parents: 11529 diff changeset	279 #if defined(USE_GUSI1)
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	280 /* Setup GUSI */
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	281 GUSIDefaultSetup();
4197 b70baba1c789 - Fixed PyMac_DoYield: Jack Jansen <jack.jansen@cwi.nl> parents: 4017 diff changeset	282 PyMac_SetGUSISpin();
4228 84444ea3f5f6 - Rationalized override preferences support, by remembering Jack Jansen <jack.jansen@cwi.nl> parents: 4215 diff changeset	283 PyMac_SetGUSIOptions();
12281 51c0c3b6d919 Started on GUSI2 and threading support. Jack Jansen <jack.jansen@cwi.nl> parents: 11529 diff changeset	284 #endif
51c0c3b6d919 Started on GUSI2 and threading support. Jack Jansen <jack.jansen@cwi.nl> parents: 11529 diff changeset	285 #if defined(USE_GUSI)
5617 70855574516b - Added Py_GetProgramFullPath Jack Jansen <jack.jansen@cwi.nl> parents: 5431 diff changeset	286 atexit(PyMac_StopGUSISpin);
12281 51c0c3b6d919 Started on GUSI2 and threading support. Jack Jansen <jack.jansen@cwi.nl> parents: 11529 diff changeset	287 #endif
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	288
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	289 #ifdef USE_SIOUX
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	290 /* Set various SIOUX flags. Some are changed later based on options */
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	291 #if 0
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	292 SIOUXSettings.standalone = 0; /* XXXX Attempting to keep sioux from eating events */
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	293 #endif
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	294 SIOUXSettings.asktosaveonclose = 0;
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	295 SIOUXSettings.showstatusline = 0;
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	296 SIOUXSettings.tabspaces = 4;
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	297 #endif
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	298
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	299 /* Get options from preference file (or from applet resource fork) */
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	300 PyMac_options.keep_console = POPT_KEEPCONSOLE_OUTPUT; /* default-default */
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	301 PyMac_options.unixnewlines = 1;
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	302 #if !TARGET_API_MAC_OSX
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	303 PyMac_PreferenceOptions(&PyMac_options);
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	304 #endif
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	305
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	306 if ( embedded ) {
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	307 static char *emb_argv[] = {"embedded-python", 0};
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	308
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	309 *argcp = 1;
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	310 *argvp = emb_argv;
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	311 } else {
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	312 /* Create argc/argv. Do it before we go into the options event loop. */
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	313 *argcp = PyMac_GetArgv(argvp, PyMac_options.noargs);
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	314 #if !TARGET_API_MAC_OSX
15921 489692e79151 Trigger keep-console-open on GUSISIOUX_STATE_UNKNOWN. Better than the previous complicated expression. Jack Jansen <jack.jansen@cwi.nl> parents: 15826 diff changeset	315 #ifndef NO_ARGV0_CHDIR
13638 58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	316 if (argcp >= 1 && (argvp)[0] && (*argvp)[0][0]) {
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	317 /* Workaround for MacOS X, which currently (DP4) doesn't set
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	318 ** the working folder correctly
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	319 */
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	320 char app_wd[256], *p;
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	321
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	322 strncpy(app_wd, (*argvp)[0], 256);
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	323 p = strrchr(app_wd, ':');
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	324 if ( p ) *p = 0;
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	325 chdir(app_wd);
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	326 }
58398c0f948b MacPython on MacOSX DP4 gets started in the wrong directory. The workaround (ifdeffed by USE_ARGV0_CHDIR) is to do a chdir() to the folder part of our executable name. Jack Jansen <jack.jansen@cwi.nl> parents: 13608 diff changeset	327 #endif
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	328 #endif
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	329 /* Do interactive option setting, if allowed and <option> depressed */
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	330 PyMac_InteractiveOptions(&PyMac_options, argcp, argvp);
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	331 }
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	332
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	333 /* Copy selected options to where the machine-independent stuff wants it */
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	334 Py_VerboseFlag = PyMac_options.verbose;
1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	335 /* Py_SuppressPrintingFlag = PyMac_options.suppress_print; */
1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	336 Py_OptimizeFlag = PyMac_options.optimize;
1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	337 Py_DebugFlag = PyMac_options.debugging;
1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	338 Py_NoSiteFlag = PyMac_options.nosite;
1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	339 Py_TabcheckFlag = PyMac_options.tabwarn;
19641 c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	340 Py_DivisionWarningFlag = PyMac_options.divisionwarn;
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	341 #if !TARGET_API_MAC_OSX
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	342 if ( PyMac_options.noargs ) {
5711 fb170ce82951 Removed old scheduler parameterizing calls and replaced with something Jack Jansen <jack.jansen@cwi.nl> parents: 5617 diff changeset	343 /* don't process events at all without the scripts permission */
fb170ce82951 Removed old scheduler parameterizing calls and replaced with something Jack Jansen <jack.jansen@cwi.nl> parents: 5617 diff changeset	344 PyMacSchedParams scp;
fb170ce82951 Removed old scheduler parameterizing calls and replaced with something Jack Jansen <jack.jansen@cwi.nl> parents: 5617 diff changeset	345
fb170ce82951 Removed old scheduler parameterizing calls and replaced with something Jack Jansen <jack.jansen@cwi.nl> parents: 5617 diff changeset	346 PyMac_GetSchedParams(&scp);
fb170ce82951 Removed old scheduler parameterizing calls and replaced with something Jack Jansen <jack.jansen@cwi.nl> parents: 5617 diff changeset	347 scp.process_events = 0;
fb170ce82951 Removed old scheduler parameterizing calls and replaced with something Jack Jansen <jack.jansen@cwi.nl> parents: 5617 diff changeset	348 /* Should we disable command-dot as well? */
fb170ce82951 Removed old scheduler parameterizing calls and replaced with something Jack Jansen <jack.jansen@cwi.nl> parents: 5617 diff changeset	349 PyMac_SetSchedParams(&scp);
fb170ce82951 Removed old scheduler parameterizing calls and replaced with something Jack Jansen <jack.jansen@cwi.nl> parents: 5617 diff changeset	350 }
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	351 #endif /* !TARGET_API_MAC_OSX */
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	352
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	353 /* Set buffering */
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	354 if (PyMac_options.unbuffered) {
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	355 #ifndef MPW
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	356 setbuf(stdout, (char *)NULL);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	357 setbuf(stderr, (char *)NULL);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	358 #else
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	359 /* On MPW (3.2) unbuffered seems to hang */
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	360 setvbuf(stdout, (char *)NULL, _IOLBF, BUFSIZ);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	361 setvbuf(stderr, (char *)NULL, _IOLBF, BUFSIZ);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	362 #endif
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	363 }
4911 21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	364 #if __profile__ == 1
21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	365 /* collectSummary or collectDetailed, timebase, #routines, max stack depth */
11350 678a9a79c7e8 Bigger buffer size for C profiler (if profiling is enabled). Jack Jansen <jack.jansen@cwi.nl> parents: 8792 diff changeset	366 ProfilerInit(collectSummary, bestTimeBase, 8000, 250);
4911 21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	367 #endif
5961 35e5acc6532c Adapted for 1.5a3: Py_SupressPrintingFlag is gone, and Jack Jansen <jack.jansen@cwi.nl> parents: 5732 diff changeset	368
35e5acc6532c Adapted for 1.5a3: Py_SupressPrintingFlag is gone, and Jack Jansen <jack.jansen@cwi.nl> parents: 5732 diff changeset	369 /* Tell the rest of python about our argc/argv */
35e5acc6532c Adapted for 1.5a3: Py_SupressPrintingFlag is gone, and Jack Jansen <jack.jansen@cwi.nl> parents: 5732 diff changeset	370 orig_argc = argcp; / For Py_GetArgcArgv() */
35e5acc6532c Adapted for 1.5a3: Py_SupressPrintingFlag is gone, and Jack Jansen <jack.jansen@cwi.nl> parents: 5732 diff changeset	371 orig_argv = *argvp;
35e5acc6532c Adapted for 1.5a3: Py_SupressPrintingFlag is gone, and Jack Jansen <jack.jansen@cwi.nl> parents: 5732 diff changeset	372 Py_SetProgramName((*argvp)[0]);
3422 67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	373 }
67f5d29d405b - Reorganized init code Jack Jansen <jack.jansen@cwi.nl> parents: 3411 diff changeset	374
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	375 /*
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	376 ** Inspection mode after script/applet termination
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	377 */
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	378 static int
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	379 run_inspect(void)
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	380 {
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	381 int sts = 0;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	382
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	383 if (PyMac_options.inspect && isatty((int)fileno(stdin)))
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	384 sts = PyRun_AnyFile(stdin, "<stdin>") != 0;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	385 return sts;
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	386 }
19851 f3f694111ea0 Failing to import macfsn is not a fatal error. Jack Jansen <jack.jansen@cwi.nl> parents: 19748 diff changeset	387
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	388 /*
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	389 ** Import the macfsn module, which will override the Standard File
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	390 ** calls in the macfs builtin module by Navigation Services versions,
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	391 ** if available on this machine.
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	392 */
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	393 static void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	394 PyMac_InstallNavServicesForSF(void)
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	395 {
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	396 if ( !PyMac_options.nonavservice ) {
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	397 PyObject *m = PyImport_ImportModule("macfsn");
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	398
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	399 if ( m == NULL ) {
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	400 PySys_WriteStderr("'import macfsn' failed; ");
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	401 if (Py_VerboseFlag) {
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	402 PySys_WriteStderr("traceback:\n");
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	403 PyErr_Print();
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	404 }
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	405 else {
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	406 PySys_WriteStderr("use -v for traceback\n");
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	407 }
19851 f3f694111ea0 Failing to import macfsn is not a fatal error. Jack Jansen <jack.jansen@cwi.nl> parents: 19748 diff changeset	408 PyErr_Clear();
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	409 }
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	410 }
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	411 }
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	412
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	413 #ifdef USE_MAC_APPLET_SUPPORT
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	414 /* Applet support */
2031 1739f00ffc86 Enlarged version buffer (nobody expects the spanish inquisition:-) Jack Jansen <jack.jansen@cwi.nl> parents: 1821 diff changeset	415
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	416 /* Run a compiled Python Python script from 'PYC ' resource __main__ */
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	417 static int
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	418 run_main_resource(void)
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	419 {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	420 Handle h;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	421 long size;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	422 PyObject *code;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	423 PyObject *result;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	424
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	425 h = GetNamedResource('PYC ', "\p__main__");
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	426 if (h == NULL) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	427 Alert(NOPYC_ALERT, NULL);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	428 return 1;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	429 }
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	430 size = GetResourceSizeOnDisk(h);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	431 HLock(h);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	432 code = PyMarshal_ReadObjectFromString(*h + 8, (int)(size - 8));
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	433 HUnlock(h);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	434 ReleaseResource(h);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	435 if (code == NULL) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	436 PyErr_Print();
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	437 return 1;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	438 }
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	439 result = PyImport_ExecCodeModule("__main__", code);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	440 Py_DECREF(code);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	441 if (result == NULL) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	442 PyErr_Print();
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	443 return 1;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	444 }
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	445 Py_DECREF(result);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	446 return 0;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	447 }
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	448
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	449 /* Initialization sequence for applets */
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	450 void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	451 PyMac_InitApplet(void)
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	452 {
1811 ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	453 int argc;
ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	454 char **argv;
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	455 int err;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	456
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	457 init_common(&argc, &argv, 0);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	458
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	459 Py_Initialize();
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	460 PyMac_InstallNavServicesForSF();
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	461 PySys_SetArgv(argc, argv);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	462
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	463 err = run_main_resource();
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	464
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	465 err = (run_inspect() \|\| err);
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	466
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	467 fflush(stderr);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	468 fflush(stdout);
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	469 PyMac_Exit(err);
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	470 /* XXX Should we bother to Py_Exit(sts)? */
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	471 }
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	472
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	473 /*
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	474 ** Hook for embedding python.
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	475 */
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	476 void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	477 PyMac_Initialize(void)
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	478 {
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	479 int argc;
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	480 char **argv;
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	481
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	482 init_common(&argc, &argv, 1);
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	483 Py_Initialize();
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	484 PyMac_InstallNavServicesForSF();
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	485 PySys_SetArgv(argc, argv);
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	486 }
765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	487
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	488 #endif /* USE_MAC_APPLET_SUPPORT */
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	489
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	490 #if TARGET_API_MAC_OSX
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	491 int
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	492 main(int argc, char **argv)
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	493 {
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	494 int i;
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	495 printf("first argc=%d\n", argc);
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	496 for(i=0; i<argc; i++) printf("first argv[%d] = \"%s\"\n", i, argv[i]);
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	497 init_common(&argc, &argv, 0);
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	498 printf("second argc=%d\n", argc);
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	499 for(i=0; i<argc; i++) printf("second argv[%d] = \"%s\"\n", i, argv[i]);
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	500 Py_Main(argc, argv);
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	501 return 0;
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	502 }
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	503
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	504 #else
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	505
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	506 /* For normal application */
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	507 void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	508 PyMac_InitApplication(void)
1811 ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	509 {
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	510 int argc;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	511 char **argv;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	512
4962 765d962f4449 Added PyMac_Initialize() routine, to be used by embedding programs (in Jack Jansen <jack.jansen@cwi.nl> parents: 4911 diff changeset	513 init_common(&argc, &argv, 0);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	514
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	515 if ( argc > 1 ) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	516 /* We're running a script. Attempt to change current directory */
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	517 char curwd[256], *endp;
2313 ff72a5f9a4ee Various changes wrt shared-library python: Jack Jansen <jack.jansen@cwi.nl> parents: 2277 diff changeset	518
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	519 strcpy(curwd, argv[1]);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	520 endp = strrchr(curwd, ':');
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	521 if ( endp && endp > curwd ) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	522 *endp = '\0';
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	523
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	524 chdir(curwd);
12281 51c0c3b6d919 Started on GUSI2 and threading support. Jack Jansen <jack.jansen@cwi.nl> parents: 11529 diff changeset	525 #ifdef USE_GUSI1
3433 578ca302a598 Replaced previous gusi-chdir() fix by a call to PyMac_FixGUSIcd() Jack Jansen <jack.jansen@cwi.nl> parents: 3422 diff changeset	526 /* Change MacOS's idea of wd too */
578ca302a598 Replaced previous gusi-chdir() fix by a call to PyMac_FixGUSIcd() Jack Jansen <jack.jansen@cwi.nl> parents: 3422 diff changeset	527 PyMac_FixGUSIcd();
578ca302a598 Replaced previous gusi-chdir() fix by a call to PyMac_FixGUSIcd() Jack Jansen <jack.jansen@cwi.nl> parents: 3422 diff changeset	528 #endif
2313 ff72a5f9a4ee Various changes wrt shared-library python: Jack Jansen <jack.jansen@cwi.nl> parents: 2277 diff changeset	529 }
18962 d7590122f9a2 Merging appropriate 2.1.1 fixes back into the main trunk. Jack Jansen <jack.jansen@cwi.nl> parents: 18386 diff changeset	530 /* Check that the first argument is a text file */
d7590122f9a2 Merging appropriate 2.1.1 fixes back into the main trunk. Jack Jansen <jack.jansen@cwi.nl> parents: 18386 diff changeset	531 if ( PyMac_getfiletype(argv[1]) != 'TEXT' ) {
d7590122f9a2 Merging appropriate 2.1.1 fixes back into the main trunk. Jack Jansen <jack.jansen@cwi.nl> parents: 18386 diff changeset	532 Alert(NOTASCRIPT_ID, NULL);
d7590122f9a2 Merging appropriate 2.1.1 fixes back into the main trunk. Jack Jansen <jack.jansen@cwi.nl> parents: 18386 diff changeset	533 exit(0);
d7590122f9a2 Merging appropriate 2.1.1 fixes back into the main trunk. Jack Jansen <jack.jansen@cwi.nl> parents: 18386 diff changeset	534 }
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	535 }
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	536 Py_Main(argc, argv);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	537 }
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	538 #endif /* TARGET_API_MAC_OSX */
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	539
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	540 /* Main program */
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	541
4017 5dc8c042905b Guido: added some void's to declarations Jack Jansen <jack.jansen@cwi.nl> parents: 3930 diff changeset	542 static void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	543 Py_Main(int argc, char **argv)
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	544 {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	545 int sts;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	546 char *command = NULL;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	547 char *filename = NULL;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	548 FILE *fp = stdin;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	549
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	550 filename = argv[1];
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	551
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	552 if (Py_VerboseFlag \|\|
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	553 (command == NULL && filename == NULL && isatty((int)fileno(fp))))
14464 17cec96f75bc Use same short banner message as unix/win Python. Jack Jansen <jack.jansen@cwi.nl> parents: 14198 diff changeset	554 fprintf(stderr, "Python %s on %s\n%s\n",
17cec96f75bc Use same short banner message as unix/win Python. Jack Jansen <jack.jansen@cwi.nl> parents: 14198 diff changeset	555 Py_GetVersion(), Py_GetPlatform(), COPYRIGHT);
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	556
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	557 if (filename != NULL) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	558 if ((fp = fopen(filename, "r")) == NULL) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	559 fprintf(stderr, "%s: can't open file '%s'\n",
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	560 argv[0], filename);
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	561 PyMac_Exit(2);
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	562 }
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	563 }
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	564
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	565 #if !TARGET_API_MAC_OSX
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	566 /* We initialize the menubar here, hoping SIOUX is initialized by now */
4215 0410ed3808ee Python about box implemented. Slightly convoluted, since (a) we have Jack Jansen <jack.jansen@cwi.nl> parents: 4197 diff changeset	567 PyMac_InitMenuBar();
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	568 #endif
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	569
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	570 Py_Initialize();
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	571
18386 8cdff545cbde Set the default 8-bit encoding based on the system script and language. unknown <tools@python.org> parents: 17629 diff changeset	572 PyUnicode_SetDefaultEncoding(PyMac_getscript());
8cdff545cbde Set the default 8-bit encoding based on the system script and language. unknown <tools@python.org> parents: 17629 diff changeset	573
12593 eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	574 PyMac_InstallNavServicesForSF();
eaee924efb19 Removed string-exception preference, added tabcheck and NavService preference, upped version number. Jack Jansen <jack.jansen@cwi.nl> parents: 12281 diff changeset	575
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	576 PySys_SetArgv(argc-1, argv+1);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	577
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	578 if (filename == NULL && isatty((int)fileno(fp))) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	579 FILE *fp = fopen(STARTUP, "r");
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	580 if (fp != NULL) {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	581 (void) PyRun_SimpleFile(fp, STARTUP);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	582 PyErr_Clear();
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	583 fclose(fp);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	584 }
1811 ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	585 }
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	586 sts = PyRun_AnyFile(
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	587 fp, filename == NULL ? "<stdin>" : filename) != 0;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	588 if (filename != NULL)
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	589 fclose(fp);
4238 6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	590
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	591 if ( filename != NULL \|\| command != NULL )
6c86d9136c09 - Put all options in a struct Jack Jansen <jack.jansen@cwi.nl> parents: 4228 diff changeset	592 sts = (run_inspect() \|\| sts);
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	593
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	594 Py_Exit(sts);
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	595 /NOTREACHED/
1811 ea5b13d11a13 Added macmain.c (separate Mac specific main prog); bump version to 1.1 Guido van Rossum <guido@python.org> parents: diff changeset	596 }
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	597
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	598 #if !TARGET_API_MAC_OSX
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	599 /*
15280 a5ca54969a3f Added PyMac_OutputSeen(), which acknowledges all current output in the stdio window, i.e. it acts like input has been read insofar as the keep-console-open option is interested. Jack Jansen <jack.jansen@cwi.nl> parents: 15192 diff changeset	600 ** Reset the "unseen output" flag
a5ca54969a3f Added PyMac_OutputSeen(), which acknowledges all current output in the stdio window, i.e. it acts like input has been read insofar as the keep-console-open option is interested. Jack Jansen <jack.jansen@cwi.nl> parents: 15192 diff changeset	601 */
a5ca54969a3f Added PyMac_OutputSeen(), which acknowledges all current output in the stdio window, i.e. it acts like input has been read insofar as the keep-console-open option is interested. Jack Jansen <jack.jansen@cwi.nl> parents: 15192 diff changeset	602 void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	603 PyMac_OutputSeen(void)
15280 a5ca54969a3f Added PyMac_OutputSeen(), which acknowledges all current output in the stdio window, i.e. it acts like input has been read insofar as the keep-console-open option is interested. Jack Jansen <jack.jansen@cwi.nl> parents: 15192 diff changeset	604 {
16647 728c11562187 More changes to attempt to get the menubar back on exit. Without success:-( Jack Jansen <jack.jansen@cwi.nl> parents: 16557 diff changeset	605 if ( console_output_state == STATE_UNKNOWN )
728c11562187 More changes to attempt to get the menubar back on exit. Without success:-( Jack Jansen <jack.jansen@cwi.nl> parents: 16557 diff changeset	606 PyMac_InitMenuBar();
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	607 console_output_state = STATE_LASTREAD;
15280 a5ca54969a3f Added PyMac_OutputSeen(), which acknowledges all current output in the stdio window, i.e. it acts like input has been read insofar as the keep-console-open option is interested. Jack Jansen <jack.jansen@cwi.nl> parents: 15192 diff changeset	608 }
a5ca54969a3f Added PyMac_OutputSeen(), which acknowledges all current output in the stdio window, i.e. it acts like input has been read insofar as the keep-console-open option is interested. Jack Jansen <jack.jansen@cwi.nl> parents: 15192 diff changeset	609
a5ca54969a3f Added PyMac_OutputSeen(), which acknowledges all current output in the stdio window, i.e. it acts like input has been read insofar as the keep-console-open option is interested. Jack Jansen <jack.jansen@cwi.nl> parents: 15192 diff changeset	610 /*
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	611 ** Set the "unseen output" flag
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	612 */
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	613 void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	614 PyMac_OutputNotSeen(void)
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	615 {
16647 728c11562187 More changes to attempt to get the menubar back on exit. Without success:-( Jack Jansen <jack.jansen@cwi.nl> parents: 16557 diff changeset	616 if ( console_output_state == STATE_UNKNOWN )
728c11562187 More changes to attempt to get the menubar back on exit. Without success:-( Jack Jansen <jack.jansen@cwi.nl> parents: 16557 diff changeset	617 PyMac_InitMenuBar();
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	618 console_output_state = STATE_LASTWRITE;
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	619 }
17629 a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	620
a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	621 /*
a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	622 ** Override abort() - The default one is not what we want.
a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	623 */
a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	624 void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	625 abort(void)
17629 a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	626 {
a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	627 console_output_state = STATE_LASTWRITE;
a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	628 PyMac_Exit(1);
a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	629 }
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	630 #endif /* !TARGET_API_MAC_OSX */
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	631
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	632 /*
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	633 ** Terminate application
463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	634 */
4017 5dc8c042905b Guido: added some void's to declarations Jack Jansen <jack.jansen@cwi.nl> parents: 3930 diff changeset	635 void
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	636 PyMac_Exit(int status)
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	637 {
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	638 #ifdef USE_SIOUX
14773 c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	639 int keep = 0;
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	640 #endif
4911 21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	641
21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	642 #if __profile__ == 1
21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	643 ProfilerDump("\pPython Profiler Results");
21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	644 ProfilerTerm();
21878c849626 Added profiler initialization/finalization code (if __profile__ is defined) Jack Jansen <jack.jansen@cwi.nl> parents: 4249 diff changeset	645 #endif
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	646
3247 20d74fa3b50b For MW Python, update titlebar of window when python exits. Jack Jansen <jack.jansen@cwi.nl> parents: 3236 diff changeset	647 #ifdef USE_SIOUX
15192 1c63e224f616 Made options global (as PyMac_options) so macosmodule can access it. Jack Jansen <jack.jansen@cwi.nl> parents: 14773 diff changeset	648 switch (PyMac_options.keep_console) {
14773 c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	649 case POPT_KEEPCONSOLE_NEVER:
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	650 keep = 0;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	651 break;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	652 case POPT_KEEPCONSOLE_OUTPUT:
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	653 if (console_output_state == STATE_LASTWRITE \|\|
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	654 console_output_state == STATE_UNKNOWN )
14773 c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	655 keep = 1;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	656 else
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	657 keep = 0;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	658 break;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	659 case POPT_KEEPCONSOLE_ERROR:
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	660 keep = (status != 0);
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	661 break;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	662 default:
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	663 keep = 1;
c5ec0b11f8c9 Keepconsole is now a 4-way option: never/errorexit/unseen output/always. Default is "unseen output". Upped the Popt version number. Jack Jansen <jack.jansen@cwi.nl> parents: 14464 diff changeset	664 }
3247 20d74fa3b50b For MW Python, update titlebar of window when python exits. Jack Jansen <jack.jansen@cwi.nl> parents: 3236 diff changeset	665 if (keep) {
20d74fa3b50b For MW Python, update titlebar of window when python exits. Jack Jansen <jack.jansen@cwi.nl> parents: 3236 diff changeset	666 SIOUXSettings.standalone = 1;
20d74fa3b50b For MW Python, update titlebar of window when python exits. Jack Jansen <jack.jansen@cwi.nl> parents: 3236 diff changeset	667 SIOUXSettings.autocloseonquit = 0;
3477 a4f01d43dad6 Replaced non-ascii chars by backslash escapes Jack Jansen <jack.jansen@cwi.nl> parents: 3465 diff changeset	668 SIOUXSetTitle("\p\307terminated\310");
17629 a9485d404f05 - Raise console window on input. Fixes Carbon hang. Jack Jansen <jack.jansen@cwi.nl> parents: 16647 diff changeset	669 PyMac_RaiseConsoleWindow();
5732 f027dd0a85e4 - Restore SIOUX menubar just before exiting, if the console window is kept Jack Jansen <jack.jansen@cwi.nl> parents: 5711 diff changeset	670 PyMac_RestoreMenuBar();
5431 a56b44b35505 Workaround for bug in MSL and CWGUSI interaction that stopped the Jack Jansen <jack.jansen@cwi.nl> parents: 5270 diff changeset	671 #ifdef USE_MSL
a56b44b35505 Workaround for bug in MSL and CWGUSI interaction that stopped the Jack Jansen <jack.jansen@cwi.nl> parents: 5270 diff changeset	672 /*
a56b44b35505 Workaround for bug in MSL and CWGUSI interaction that stopped the Jack Jansen <jack.jansen@cwi.nl> parents: 5270 diff changeset	673 ** Temporary workaround: autocloseonquit clearing does not
a56b44b35505 Workaround for bug in MSL and CWGUSI interaction that stopped the Jack Jansen <jack.jansen@cwi.nl> parents: 5270 diff changeset	674 ** currently work for the MSL/GUSI combo.
a56b44b35505 Workaround for bug in MSL and CWGUSI interaction that stopped the Jack Jansen <jack.jansen@cwi.nl> parents: 5270 diff changeset	675 */
a56b44b35505 Workaround for bug in MSL and CWGUSI interaction that stopped the Jack Jansen <jack.jansen@cwi.nl> parents: 5270 diff changeset	676 while(getchar() > 0);
a56b44b35505 Workaround for bug in MSL and CWGUSI interaction that stopped the Jack Jansen <jack.jansen@cwi.nl> parents: 5270 diff changeset	677 #endif
3247 20d74fa3b50b For MW Python, update titlebar of window when python exits. Jack Jansen <jack.jansen@cwi.nl> parents: 3236 diff changeset	678 }
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	679 else
463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	680 SIOUXSettings.autocloseonquit = 1;
4197 b70baba1c789 - Fixed PyMac_DoYield: Jack Jansen <jack.jansen@cwi.nl> parents: 4017 diff changeset	681 #endif /* USE_SIOUX */
3236 463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	682
463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	683 exit(status);
463b26fa4d7b Added options for keeping window open on normal/error termination Jack Jansen <jack.jansen@cwi.nl> parents: 3228 diff changeset	684 }
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	685
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	686 #if !TARGET_API_MAC_OSX
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	687 /* Make the original argc/argv available to other modules.
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	688 This is rare, but it is needed by the secureware extension. */
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	689
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	690 void
13547 db963a615bc9 ANSIfication step 2: make sure all needed prototypes are available, and all needed Jack Jansen <jack.jansen@cwi.nl> parents: 13542 diff changeset	691 Py_GetArgcArgv(int argc,char **argv)
2985 0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	692 {
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	693 *argc = orig_argc;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	694 *argv = orig_argv;
0d7100ffb61a This is completely different from the old mainmain (which wasn't used Jack Jansen <jack.jansen@cwi.nl> parents: 2313 diff changeset	695 }
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	696 #endif
3930 52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	697
52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	698 /* More cruft that shouldn't really be here, used in sysmodule.c */
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	699 #if !TARGET_API_MAC_OSX
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	700 /* Return the program name -- some code out there needs this. */
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	701 char *
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	702 Py_GetProgramFullPath(void)
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	703 {
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	704 return orig_argv[0];
c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	705 }
3930 52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	706
52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	707 char *
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	708 Py_GetPrefix(void)
3930 52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	709 {
6277 bb5472fb4885 sys.prefix and sys.exec_prefix are now set correctly. Jack Jansen <jack.jansen@cwi.nl> parents: 5961 diff changeset	710 return PyMac_GetPythonDir();
3930 52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	711 }
52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	712
52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	713 char *
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	714 Py_GetExecPrefix(void)
3930 52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	715 {
6277 bb5472fb4885 sys.prefix and sys.exec_prefix are now set correctly. Jack Jansen <jack.jansen@cwi.nl> parents: 5961 diff changeset	716 return PyMac_GetPythonDir();
3930 52c19ee83a6b Guido's 1.4b2 fixes: Py_GetProgramName, Py_GetPrefix and Py_GetExecPrefix. Jack Jansen <jack.jansen@cwi.nl> parents: 3750 diff changeset	717 }
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	718
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	719 int
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	720 PyMac_GetDelayConsoleFlag(void)
16557 9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	721 {
9ce9e0342cc1 Bit the bullet and added a private GUSISIOUX for Python. This makes the delayconsole and keepopen code neater. Also tells Sioux to behave better with events, and handles cmd-. during print better. The pythonpreferences have also changed due to this. Jack Jansen <jack.jansen@cwi.nl> parents: 15921 diff changeset	722 return (int)PyMac_options.delayconsole;
19641 c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	723 }
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	724
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	725 #ifndef WITHOUT_UNIX_NEWLINES
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	726 /*
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	727 ** Experimental feature (for 2.2a2): optionally allow unix newlines
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	728 ** as well as Mac newlines on input. We replace a lowlevel
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	729 ** MSL routine to accomplish this.
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	730 */
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	731 void
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	732 __convert_to_newlines(unsigned char * buf, size_t * n_ptr)
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	733 {
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	734 unsigned char *p;
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	735 size_t n = *n_ptr;
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	736
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	737 for(p=buf; n > 0; p++, n--)
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	738 if ( p == '\r' ) p = '\n';
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	739 else if ( *p == '\n' && !PyMac_options.unixnewlines )
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	740 *p = '\r';
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	741 }
c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	742 #endif /* WITHOUT_UNIX_NEWLINES */
19748 c93d7d0857a2 Changes to make these work under OSX as the main program for a Jack Jansen <jack.jansen@cwi.nl> parents: 19641 diff changeset	743 #endif /* !TARGET_API_MAC_OSX */
19641 c9647fa78f05 Added preferences/startup options for division warning Jack Jansen <jack.jansen@cwi.nl> parents: 18962 diff changeset	744

Mercurial > cpython-lru_cache-weakref

annotate Mac/Python/macmain.c @ 19851:f3f694111ea0 legacy-trunk