Add backward compatibility with -s.

Add initregexp() call.
This commit is contained in:
Guido van Rossum 1991-01-02 13:50:48 +00:00
parent 65a9620fa2
commit 6607f449be

View file

@ -15,7 +15,13 @@ initargs(p_argc, p_argv)
{ {
extern char *getenv(); extern char *getenv();
char *display; char *display;
/* Ignore an initial argument of '-s', for backward compatibility */
if (*p_argc > 1 && strcmp((*p_argv)[1], "-s") == 0) {
(*p_argv)[1] = (*p_argv)[0];
(*p_argc)--, (*p_argv)++;
}
/* Assume we have to initialize stdwin if either of the following /* Assume we have to initialize stdwin if either of the following
conditions holds: conditions holds:
- the environment variable $DISPLAY is set - the environment variable $DISPLAY is set
@ -45,6 +51,7 @@ initcalls()
{ {
inittime(); inittime();
initmath(); initmath();
initregexp();
initposix(); initposix();
#ifdef USE_AUDIO #ifdef USE_AUDIO
initaudio(); initaudio();