← Back to branch summary

~vcs-imports/gawk/master

« back to all changes in this revision

Viewing changes to main.c

  • Committer: Arnold D. Robbins
  • Date: 2024-06-10 19:29:29 UTC
  • mto: (2057.4.2)
  • mto: This revision was merged to the branch mainline in revision 2111.
  • Revision ID: git-v1:6b237fa6db5a28d6598cb0fb67b9324cf2d88432
Remove undocumented --nostalgia option.

Show diffs side-by-side

added added

removed removed

Lines of Context:
main.c
3
3
 */
4
4
 
5
5
/*
6
 
 * Copyright (C) 1986, 1988, 1989, 1991-2023,
 
6
 * Copyright (C) 1986, 1988, 1989, 1991-2024,
7
7
 * the Free Software Foundation, Inc.
8
8
 *
9
9
 * This file is part of GAWK, the GNU implementation of the
25
25
 */
26
26
 
27
27
/* FIX THIS BEFORE EVERY RELEASE: */
28
 
#define UPDATE_YEAR     2023
 
28
#define UPDATE_YEAR     2024
29
29
 
30
30
#include "awk.h"
31
31
#include "getopt.h"
50
50
static NODE *load_environ(void);
51
51
static NODE *load_procinfo(void);
52
52
static void catchsig(int sig);
53
 
static void nostalgia(void) ATTRIBUTE_NORETURN;
54
53
static void version(void) ATTRIBUTE_NORETURN;
55
54
static void init_fds(void);
56
55
static void init_groupset(void);
137
136
enum do_flag_values do_flags = DO_FLAG_NONE;
138
137
bool do_itrace = false;                 /* provide simple instruction trace */
139
138
bool do_optimize = true;                /* apply default optimizations */
140
 
static int do_nostalgia = false;        /* provide a blast from the past */
141
139
static int do_binary = false;           /* hands off my data! */
142
140
static int do_version = false;          /* print version info */
143
141
static const char *locale = "";         /* default value to setlocale */
188
186
#endif
189
187
        { "non-decimal-data",   no_argument,            NULL,   'n' },
190
188
        { "no-optimize",        no_argument,            NULL,   's' },
191
 
        { "nostalgia",          no_argument,            & do_nostalgia, 1 },
192
189
        { "optimize",           no_argument,            NULL,   'O' },
193
190
#if defined(YYDEBUG) || defined(GAWKDEBUG)
194
191
        { "parsedebug",         no_argument,            NULL,   'Y' },
336
333
        if (gawk_mb_cur_max == 1)
337
334
                load_casetable();
338
335
 
339
 
        if (do_nostalgia)
340
 
                nostalgia();
341
 
 
342
336
        /* check for POSIXLY_CORRECT environment variable */
343
337
        if (! do_posix && getenv("POSIXLY_CORRECT") != NULL) {
344
338
                do_flags |= DO_POSIX;
651
645
        fputs(_("\t-S\t\t\t--sandbox\n"), fp);
652
646
        fputs(_("\t-t\t\t\t--lint-old\n"), fp);
653
647
        fputs(_("\t-V\t\t\t--version\n"), fp);
654
 
#ifdef NOSTALGIA
655
 
        fputs(_("\t-W nostalgia\t\t--nostalgia\n"), fp);
656
 
#endif
657
648
#ifdef GAWKDEBUG
658
649
        fputs(_("\t-Y\t\t\t--parsedebug\n"), fp);
659
650
#endif
1346
1337
        /* NOTREACHED */
1347
1338
}
1348
1339
 
1349
 
/* nostalgia --- print the famous error message and die */
1350
 
 
1351
 
static void
1352
 
nostalgia()
1353
 
{
1354
 
        /*
1355
 
         * N.B.: This string is not gettextized, on purpose.
1356
 
         * So there.
1357
 
         */
1358
 
        fprintf(stderr, "awk: bailing out near line 1\n");
1359
 
        fflush(stderr);
1360
 
        abort();
1361
 
}
1362
 
 
1363
1340
#ifdef USE_PERSISTENT_MALLOC
1364
1341
/* get_pma_version --- get a usable version string out of PMA */
1365
1342