src/symtab.h

   1 /* Definitions for symtab.c and callers, part of Bison.
   2
   3    Copyright (C) 1984, 1989, 1992, 2000, 2001, 2002, 2004, 2005, 2006
   4    Free Software Foundation, Inc.
   5
   6    This file is part of Bison, the GNU Compiler Compiler.
   7
   8    Bison is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 2, or (at your option)
  11    any later version.
  12
  13    Bison is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with Bison; see the file COPYING.  If not, write to
  20    the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  21    Boston, MA 02110-1301, USA.  */
  22
  23 /**
  24  * \file symtab.h
  25  * \brief Manipulating ::symbol.
  26  */
  27
  28 #ifndef SYMTAB_H_
  29 # define SYMTAB_H_
  30
  31 # include "assoc.h"
  32 # include "location.h"
  33 # include "uniqstr.h"
  34
  35 /*----------.
  36 | Symbols.  |
  37 `----------*/
  38
  39 /** Symbol classes.  */
  40 typedef enum
  41 {
  42   unknown_sym,          /**< Undefined.  */
  43   token_sym,            /**< Terminal. */
  44   nterm_sym             /**< Non-terminal. */
  45 } symbol_class;
  46
  47
  48 /** Internal token numbers. */
  49 typedef int symbol_number;
  50 #define SYMBOL_NUMBER_MAXIMUM INT_MAX
  51
  52
  53 typedef struct symbol symbol;
  54
  55 /* When extending this structure, be sure to complete
  56    symbol_check_alias_consistency.  */
  57 struct symbol
  58 {
  59   /** The key, name of the symbol.  */
  60   uniqstr tag;
  61   /** The location of its first occurrence.  */
  62   location location;
  63
  64   /** Its \c \%type.  */
  65   uniqstr type_name;
  66   /** Its \c \%type's location.  */
  67   location type_location;
  68
  69   /** Any \c \%destructor declared specifically for this symbol.
  70
  71      Access this field only through <tt>symbol</tt>'s interface functions.  For
  72      example, if <tt>symbol::destructor = NULL</tt>, a default \c \%destructor
  73      or a per-type \c \%destructor might be appropriate, and
  74      \c symbol_destructor_get will compute the correct one.  */
  75   const char *destructor;
  76
  77   /** The location of \c symbol::destructor.
  78
  79      Access this field only through <tt>symbol</tt>'s interface functions.
  80      \sa symbol::destructor  */
  81   location destructor_location;
  82
  83   /** Any \c \%printer declared specifically for this symbol.
  84
  85      Access this field only through <tt>symbol</tt>'s interface functions.
  86      \sa symbol::destructor  */
  87   const char *printer;
  88
  89   /** The location of \c symbol::printer.
  90
  91      Access this field only through <tt>symbol</tt>'s interface functions.
  92      \sa symbol::destructor  */
  93   location printer_location;
  94
  95   symbol_number number;
  96   location prec_location;
  97   int prec;
  98   assoc assoc;
  99   int user_token_number;
 100
 101   /* Points to the other in the identifier-symbol pair for an alias.
 102      Special value USER_NUMBER_ALIAS in the identifier half of the
 103      identifier-symbol pair for an alias.  */
 104   symbol *alias;
 105   symbol_class class;
 106   bool declared;
 107 };
 108
 109 /** Undefined user number.  */
 110 #define USER_NUMBER_UNDEFINED -1
 111
 112 /* `symbol->user_token_number == USER_NUMBER_ALIAS' means this symbol
 113    *has* (not is) a string literal alias.  For instance, `%token foo
 114    "foo"' has `"foo"' numbered regularly, and `foo' numbered as
 115    USER_NUMBER_ALIAS.  */
 116 #define USER_NUMBER_ALIAS -9991
 117
 118 /* Undefined internal token number.  */
 119 #define NUMBER_UNDEFINED (-1)
 120
 121 /** Print a symbol (for debugging). */
 122 void symbol_print (symbol *s, FILE *f);
 123
 124 /** Fetch (or create) the symbol associated to KEY.  */
 125 symbol *symbol_from_uniqstr (const uniqstr key, location loc);
 126
 127 /** Fetch (or create) the symbol associated to KEY.  */
 128 symbol *symbol_get (const char *key, location loc);
 129
 130 /** Generate a dummy nonterminal.
 131
 132    Its name cannot conflict with the user's names.  */
 133 symbol *dummy_symbol_get (location loc);
 134
 135 /** Is this a dummy nonterminal?  */
 136 bool symbol_is_dummy (const symbol *sym);
 137
 138 /** Declare the new symbol \c sym.  Make it an alias of \c symval.  */
 139 void symbol_make_alias (symbol *sym, symbol *symval, location loc);
 140
 141 /** Set the \c type_name associated with \c sym.
 142
 143     Do nothing if passed 0 as \c type_name.  */
 144 void symbol_type_set (symbol *sym, uniqstr type_name, location loc);
 145
 146 /** Set the \c destructor associated with \c sym.  */
 147 void symbol_destructor_set (symbol *sym, const char *destructor, location loc);
 148
 149 /** Get the computed \c \%destructor for \c sym, or \c NULL if none.   */
 150 const char *symbol_destructor_get (symbol *sym);
 151
 152 /** Get the grammar location of the computed \c \%destructor for \c sym.
 153
 154   \pre <tt>symbol_destructor_get (sym) != NULL</tt> */
 155 location symbol_destructor_location_get (symbol *sym);
 156
 157 /** Set the \c printer associated with \c sym.  */
 158 void symbol_printer_set (symbol *sym, const char *printer, location loc);
 159
 160 /** Get the computed \c \%printer for \c sym, or \c NULL if none.  */
 161 const char *symbol_printer_get (symbol *sym);
 162
 163 /** Get the grammar location of the computed \c \%printer for \c sym.
 164
 165   \pre <tt>symbol_printer_get (sym) != NULL</tt> */
 166 location symbol_printer_location_get (symbol *sym);
 167
 168 /* Set the \c precedence associated with \c sym.
 169
 170    Ensure that \a symbol is a terminal.
 171    Do nothing if invoked with \c undef_assoc as \c assoc.  */
 172 void symbol_precedence_set (symbol *sym, int prec, assoc a, location loc);
 173
 174 /** Set the \c class associated with \c sym.  */
 175 void symbol_class_set (symbol *sym, symbol_class class, location loc,
 176                        bool declaring);
 177
 178 /** Set the \c user_token_number associated with \c sym.  */
 179 void symbol_user_token_number_set (symbol *sym, int user_number, location loc);
 180
 181
 182 /** The error token. */
 183 extern symbol *errtoken;
 184 /** The token for unknown tokens.  */
 185 extern symbol *undeftoken;
 186 /** The end of input token.  */
 187 extern symbol *endtoken;
 188 /** The genuine start symbol.
 189
 190    $accept: start-symbol $end */
 191 extern symbol *accept;
 192
 193 /** The user start symbol. */
 194 extern symbol *startsymbol;
 195 /** The location of the \c \%start declaration.  */
 196 extern location startsymbol_location;
 197
 198
 199 /*-----------------.
 200 | Semantic types.  |
 201 `-----------------*/
 202
 203 /** A semantic type and its associated \c \%destructor and \c \%printer.
 204
 205    Access the fields of this struct only through the interface functions in
 206    this file.  \sa symbol::destructor  */
 207 typedef struct semantic_type {
 208   /** The key, name of the semantic type.  */
 209   uniqstr tag;
 210
 211   /** Any \c %destructor declared for this semantic type.  */
 212   const char *destructor;
 213   /** The location of \c semantic_type::destructor.  */
 214   location destructor_location;
 215
 216   /** Any \c %printer declared for this semantic type.  */
 217   const char *printer;
 218   /** The location of \c semantic_type::printer.  */
 219   location printer_location;
 220 } semantic_type;
 221
 222 /** Fetch (or create) the semantic type associated to KEY.  */
 223 semantic_type *semantic_type_from_uniqstr (const uniqstr key);
 224
 225 /** Fetch (or create) the semantic type associated to KEY.  */
 226 semantic_type *semantic_type_get (const char *key);
 227
 228 /** Set the \c destructor associated with \c type.  */
 229 void semantic_type_destructor_set (semantic_type *type, const char *destructor,
 230                                    location loc);
 231
 232 /** Set the \c printer associated with \c type.  */
 233 void semantic_type_printer_set (semantic_type *type, const char *printer,
 234                                 location loc);
 235
 236 /*----------------------------------.
 237 | Symbol and semantic type tables.  |
 238 `----------------------------------*/
 239
 240 /** Create the symbol and semantic type tables.  */
 241 void symbols_new (void);
 242
 243 /** Free all the memory allocated for symbols and semantic types.  */
 244 void symbols_free (void);
 245
 246 /** Check that all the symbols are defined.
 247
 248     Report any undefined symbols and consider them nonterminals.  */
 249 void symbols_check_defined (void);
 250
 251 /** Sanity checks and #token_translations construction.
 252
 253    Perform various sanity checks, assign symbol numbers, and set up
 254    #token_translations.  */
 255 void symbols_pack (void);
 256
 257
 258 /*---------------------------------------.
 259 | Default %destructor's and %printer's.  |
 260 `---------------------------------------*/
 261
 262 /** Set the default \c \%destructor for tagged values.  */
 263 void default_tagged_destructor_set (const char *destructor, location loc);
 264 /** Set the default \c \%destructor for tagless values.  */
 265 void default_tagless_destructor_set (const char *destructor, location loc);
 266
 267 /** Set the default \c \%printer for tagged values.  */
 268 void default_tagged_printer_set (const char *printer, location loc);
 269 /** Set the default \c \%printer for tagless values.  */
 270 void default_tagless_printer_set (const char *printer, location loc);
 271
 272 #endif /* !SYMTAB_H_ */