mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-10 12:53:03 +00:00
* src/main.c, src/derives.h: Use it. Formatting changes. * src/Makefile.am (noinst_HEADERS): Adjust.
142 lines
3.7 KiB
C
142 lines
3.7 KiB
C
/* Top level entry point of bison,
|
||
Copyright (C) 1984, 1986, 1989, 1992, 1995, 2000
|
||
Free Software Foundation, Inc.
|
||
|
||
This file is part of Bison, the GNU Compiler Compiler.
|
||
|
||
Bison is free software; you can redistribute it and/or modify
|
||
it under the terms of the GNU General Public License as published by
|
||
the Free Software Foundation; either version 2, or (at your option)
|
||
any later version.
|
||
|
||
Bison is distributed in the hope that it will be useful,
|
||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
GNU General Public License for more details.
|
||
|
||
You should have received a copy of the GNU General Public License
|
||
along with Bison; see the file COPYING. If not, write to
|
||
the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
||
Boston, MA 02111-1307, USA. */
|
||
|
||
|
||
#include "system.h"
|
||
#include "getargs.h"
|
||
#include "files.h"
|
||
#include "complain.h"
|
||
#include "derives.h"
|
||
|
||
#if 0 /* XXX currently unused. */
|
||
/* Nonzero means failure has been detected; don't write a parser file. */
|
||
static int failure;
|
||
#endif
|
||
|
||
/* The name this program was run with, for messages. */
|
||
char *program_name;
|
||
|
||
extern char *printable_version PARAMS ((int));
|
||
extern void berror PARAMS ((const char *));
|
||
|
||
extern void openfiles PARAMS ((void));
|
||
extern void reader PARAMS ((void));
|
||
extern void reduce_grammar PARAMS ((void));
|
||
extern void set_nullable PARAMS ((void));
|
||
extern void free_nullable PARAMS ((void));
|
||
extern void generate_states PARAMS ((void));
|
||
extern void lalr PARAMS ((void));
|
||
extern void initialize_conflicts PARAMS ((void));
|
||
extern void finalize_conflicts PARAMS ((void));
|
||
extern void verbose PARAMS ((void));
|
||
extern void terse PARAMS ((void));
|
||
extern void output PARAMS ((void));
|
||
|
||
|
||
/* VMS complained about using `int'. */
|
||
|
||
int
|
||
main (int argc, char *argv[])
|
||
{
|
||
program_name = argv[0];
|
||
setlocale (LC_ALL, "");
|
||
bindtextdomain (PACKAGE, LOCALEDIR);
|
||
textdomain (PACKAGE);
|
||
|
||
lineno = 0;
|
||
getargs (argc, argv);
|
||
|
||
/* Be ready to clean up if we exit. */
|
||
atexit (done);
|
||
|
||
openfiles ();
|
||
|
||
/* Read the input. Copy some parts of it to FGUARD, FACTION, FTABLE
|
||
and FATTRS. In file reader.c. The other parts are recorded in
|
||
the grammar; see gram.h. */
|
||
reader ();
|
||
if (complain_message_count)
|
||
exit (1);
|
||
|
||
/* find useless nonterminals and productions and reduce the grammar. In
|
||
file reduce.c */
|
||
reduce_grammar ();
|
||
|
||
/* record other info about the grammar. In files derives and nullable. */
|
||
set_derives ();
|
||
set_nullable ();
|
||
|
||
/* convert to nondeterministic finite state machine. In file LR0.
|
||
See state.h for more info. */
|
||
generate_states ();
|
||
|
||
/* make it deterministic. In file lalr. */
|
||
lalr ();
|
||
|
||
/* Find and record any conflicts: places where one token of
|
||
lookahead is not enough to disambiguate the parsing. In file
|
||
conflicts. Also resolve s/r conflicts based on precedence
|
||
declarations. */
|
||
initialize_conflicts ();
|
||
|
||
/* Print information about results, if requested. In file print.
|
||
*/
|
||
if (verboseflag)
|
||
verbose ();
|
||
else
|
||
terse ();
|
||
|
||
/* Output the tables and the parser to ftable. In file output. */
|
||
output ();
|
||
|
||
finalize_conflicts ();
|
||
free_nullable ();
|
||
free_derives ();
|
||
|
||
exit (complain_message_count ? 1 : 0);
|
||
}
|
||
|
||
/* Return a string containing a printable version of C:
|
||
either C itself, or the corresponding \DDD code. */
|
||
|
||
char *
|
||
printable_version (int c)
|
||
{
|
||
static char buf[10];
|
||
if (c < ' ' || c >= '\177')
|
||
sprintf (buf, "\\%o", c);
|
||
else
|
||
{
|
||
buf[0] = c;
|
||
buf[1] = '\0';
|
||
}
|
||
return buf;
|
||
}
|
||
|
||
/* Abort for an internal error denoted by string S. */
|
||
|
||
void
|
||
berror (const char *s)
|
||
{
|
||
fprintf (stderr, _("%s: internal error: %s\n"), program_name, s);
|
||
abort ();
|
||
}
|