84 lines
2.3 KiB
C
84 lines
2.3 KiB
C
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <getopt.h>
|
|
#include <vslc.h>
|
|
|
|
|
|
/* Global state */
|
|
|
|
node_t *root; // Syntax tree
|
|
tlhash_t *global_names; // Symbol table
|
|
char **string_list; // List of strings in the source
|
|
size_t n_string_list = 8; // Initial string list capacity (grow on demand)
|
|
size_t stringc = 0; // Initial string count
|
|
|
|
/* Command line option parsing for the main function */
|
|
static void options ( int argc, char **argv );
|
|
bool
|
|
print_full_tree = false,
|
|
print_simplified_tree = false,
|
|
print_symbol_table_contents = false,
|
|
print_generated_program = true,
|
|
new_print_style = true;
|
|
|
|
|
|
/* Entry point */
|
|
int
|
|
main ( int argc, char **argv )
|
|
{
|
|
options ( argc, argv );
|
|
|
|
yyparse(); // Generated from grammar/bison, constructs syntax tree
|
|
yylex_destroy(); // Free heap used by flex
|
|
|
|
if ( print_full_tree )
|
|
print_syntax_tree ();
|
|
simplify_syntax_tree (); // In tree.c
|
|
if ( print_simplified_tree )
|
|
print_syntax_tree ();
|
|
|
|
create_symbol_table (); // In ir.c
|
|
if ( print_symbol_table_contents )
|
|
print_symbol_table();
|
|
|
|
if ( print_generated_program )
|
|
generate_program (); // In generator.c
|
|
|
|
|
|
destroy_syntax_tree (); // In tree.c
|
|
destroy_symbol_table (); // In ir.c
|
|
}
|
|
|
|
|
|
static const char *usage =
|
|
"Command line options\n"
|
|
"\t-h\tOutput this text and halt\n"
|
|
"\t-t\tOutput the full syntax tree\n"
|
|
"\t-T\tOutput the simplified syntax tree\n"
|
|
"\t-s\tOutput the symbol table contents\n"
|
|
"\t-q\tQuiet: suppress output from the code generator\n"
|
|
"\t-u\tDo not use print style more like the tree command\n";
|
|
|
|
|
|
static void
|
|
options ( int argc, char **argv )
|
|
{
|
|
int o;
|
|
while ( (o=getopt(argc,argv,"htTsqu")) != -1 )
|
|
{
|
|
switch ( o )
|
|
{
|
|
case 'h':
|
|
printf ( "%s:\n%s", argv[0], usage );
|
|
exit ( EXIT_FAILURE );
|
|
break;
|
|
case 't': print_full_tree = true; break;
|
|
case 'T': print_simplified_tree = true; break;
|
|
case 's': print_symbol_table_contents = true; break;
|
|
case 'q': print_generated_program = false; break;
|
|
case 'u': new_print_style = false; break;
|
|
}
|
|
}
|
|
}
|
|
|