Add self as d10v maintainer.
[binutils-gdb.git] / gdb / symtab.h
1 /* Symbol table definitions for GDB.
2 Copyright 1986, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996,
3 1997, 1998, 1999, 2000, 2001
4 Free Software Foundation, Inc.
5
6 This file is part of GDB.
7
8 This program 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 of the License, or
11 (at your option) any later version.
12
13 This program 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 this program; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA. */
22
23 #if !defined (SYMTAB_H)
24 #define SYMTAB_H 1
25
26 /* Some definitions and declarations to go with use of obstacks. */
27
28 #include "obstack.h"
29 #define obstack_chunk_alloc xmalloc
30 #define obstack_chunk_free xfree
31 #include "bcache.h"
32
33 /* Don't do this; it means that if some .o's are compiled with GNU C
34 and some are not (easy to do accidentally the way we configure
35 things; also it is a pain to have to "make clean" every time you
36 want to switch compilers), then GDB dies a horrible death. */
37 /* GNU C supports enums that are bitfields. Some compilers don't. */
38 #if 0 && defined(__GNUC__) && !defined(BYTE_BITFIELD)
39 #define BYTE_BITFIELD :8;
40 #else
41 #define BYTE_BITFIELD /*nothing */
42 #endif
43
44 /* Define a structure for the information that is common to all symbol types,
45 including minimal symbols, partial symbols, and full symbols. In a
46 multilanguage environment, some language specific information may need to
47 be recorded along with each symbol.
48
49 These fields are ordered to encourage good packing, since we frequently
50 have tens or hundreds of thousands of these. */
51
52 struct general_symbol_info
53 {
54 /* Name of the symbol. This is a required field. Storage for the name is
55 allocated on the psymbol_obstack or symbol_obstack for the associated
56 objfile. */
57
58 char *name;
59
60 /* Value of the symbol. Which member of this union to use, and what
61 it means, depends on what kind of symbol this is and its
62 SYMBOL_CLASS. See comments there for more details. All of these
63 are in host byte order (though what they point to might be in
64 target byte order, e.g. LOC_CONST_BYTES). */
65
66 union
67 {
68 /* The fact that this is a long not a LONGEST mainly limits the
69 range of a LOC_CONST. Since LOC_CONST_BYTES exists, I'm not
70 sure that is a big deal. */
71 long ivalue;
72
73 struct block *block;
74
75 char *bytes;
76
77 CORE_ADDR address;
78
79 /* for opaque typedef struct chain */
80
81 struct symbol *chain;
82 }
83 value;
84
85 /* Since one and only one language can apply, wrap the language specific
86 information inside a union. */
87
88 union
89 {
90 struct cplus_specific /* For C++ */
91 /* and Java */
92 {
93 char *demangled_name;
94 }
95 cplus_specific;
96 struct chill_specific /* For Chill */
97 {
98 char *demangled_name;
99 }
100 chill_specific;
101 }
102 language_specific;
103
104 /* Record the source code language that applies to this symbol.
105 This is used to select one of the fields from the language specific
106 union above. */
107
108 enum language language BYTE_BITFIELD;
109
110 /* Which section is this symbol in? This is an index into
111 section_offsets for this objfile. Negative means that the symbol
112 does not get relocated relative to a section.
113 Disclaimer: currently this is just used for xcoff, so don't
114 expect all symbol-reading code to set it correctly (the ELF code
115 also tries to set it correctly). */
116
117 short section;
118
119 /* The bfd section associated with this symbol. */
120
121 asection *bfd_section;
122 };
123
124 extern CORE_ADDR symbol_overlayed_address (CORE_ADDR, asection *);
125
126 #define SYMBOL_NAME(symbol) (symbol)->ginfo.name
127 #define SYMBOL_VALUE(symbol) (symbol)->ginfo.value.ivalue
128 #define SYMBOL_VALUE_ADDRESS(symbol) (symbol)->ginfo.value.address
129 #define SYMBOL_VALUE_BYTES(symbol) (symbol)->ginfo.value.bytes
130 #define SYMBOL_BLOCK_VALUE(symbol) (symbol)->ginfo.value.block
131 #define SYMBOL_VALUE_CHAIN(symbol) (symbol)->ginfo.value.chain
132 #define SYMBOL_LANGUAGE(symbol) (symbol)->ginfo.language
133 #define SYMBOL_SECTION(symbol) (symbol)->ginfo.section
134 #define SYMBOL_BFD_SECTION(symbol) (symbol)->ginfo.bfd_section
135
136 #define SYMBOL_CPLUS_DEMANGLED_NAME(symbol) \
137 (symbol)->ginfo.language_specific.cplus_specific.demangled_name
138
139 /* Macro that initializes the language dependent portion of a symbol
140 depending upon the language for the symbol. */
141
142 #define SYMBOL_INIT_LANGUAGE_SPECIFIC(symbol,language) \
143 do { \
144 SYMBOL_LANGUAGE (symbol) = language; \
145 if (SYMBOL_LANGUAGE (symbol) == language_cplus \
146 || SYMBOL_LANGUAGE (symbol) == language_java \
147 ) \
148 { \
149 SYMBOL_CPLUS_DEMANGLED_NAME (symbol) = NULL; \
150 } \
151 else if (SYMBOL_LANGUAGE (symbol) == language_chill) \
152 { \
153 SYMBOL_CHILL_DEMANGLED_NAME (symbol) = NULL; \
154 } \
155 else \
156 { \
157 memset (&(symbol)->ginfo.language_specific, 0, \
158 sizeof ((symbol)->ginfo.language_specific)); \
159 } \
160 } while (0)
161
162 #define SYMBOL_INIT_DEMANGLED_NAME(symbol,obstack) \
163 (symbol_init_demangled_name (&symbol->ginfo, (obstack)))
164 extern void symbol_init_demangled_name (struct general_symbol_info *symbol,
165 struct obstack *obstack);
166
167
168 /* Macro that returns the demangled name for a symbol based on the language
169 for that symbol. If no demangled name exists, returns NULL. */
170
171 #define SYMBOL_DEMANGLED_NAME(symbol) \
172 (SYMBOL_LANGUAGE (symbol) == language_cplus \
173 || SYMBOL_LANGUAGE (symbol) == language_java \
174 ? SYMBOL_CPLUS_DEMANGLED_NAME (symbol) \
175 : (SYMBOL_LANGUAGE (symbol) == language_chill \
176 ? SYMBOL_CHILL_DEMANGLED_NAME (symbol) \
177 : NULL))
178
179 #define SYMBOL_CHILL_DEMANGLED_NAME(symbol) \
180 (symbol)->ginfo.language_specific.chill_specific.demangled_name
181
182 /* Macro that returns the "natural source name" of a symbol. In C++ this is
183 the "demangled" form of the name if demangle is on and the "mangled" form
184 of the name if demangle is off. In other languages this is just the
185 symbol name. The result should never be NULL. */
186
187 #define SYMBOL_SOURCE_NAME(symbol) \
188 (demangle && SYMBOL_DEMANGLED_NAME (symbol) != NULL \
189 ? SYMBOL_DEMANGLED_NAME (symbol) \
190 : SYMBOL_NAME (symbol))
191
192 /* Macro that returns the "natural assembly name" of a symbol. In C++ this is
193 the "mangled" form of the name if demangle is off, or if demangle is on and
194 asm_demangle is off. Otherwise if asm_demangle is on it is the "demangled"
195 form. In other languages this is just the symbol name. The result should
196 never be NULL. */
197
198 #define SYMBOL_LINKAGE_NAME(symbol) \
199 (demangle && asm_demangle && SYMBOL_DEMANGLED_NAME (symbol) != NULL \
200 ? SYMBOL_DEMANGLED_NAME (symbol) \
201 : SYMBOL_NAME (symbol))
202
203 /* Macro that tests a symbol for a match against a specified name string.
204 First test the unencoded name, then looks for and test a C++ encoded
205 name if it exists. Note that whitespace is ignored while attempting to
206 match a C++ encoded name, so that "foo::bar(int,long)" is the same as
207 "foo :: bar (int, long)".
208 Evaluates to zero if the match fails, or nonzero if it succeeds. */
209
210 #define SYMBOL_MATCHES_NAME(symbol, name) \
211 (STREQ (SYMBOL_NAME (symbol), (name)) \
212 || (SYMBOL_DEMANGLED_NAME (symbol) != NULL \
213 && strcmp_iw (SYMBOL_DEMANGLED_NAME (symbol), (name)) == 0))
214
215 /* Macro that tests a symbol for an re-match against the last compiled regular
216 expression. First test the unencoded name, then look for and test a C++
217 encoded name if it exists.
218 Evaluates to zero if the match fails, or nonzero if it succeeds. */
219
220 #define SYMBOL_MATCHES_REGEXP(symbol) \
221 (re_exec (SYMBOL_NAME (symbol)) != 0 \
222 || (SYMBOL_DEMANGLED_NAME (symbol) != NULL \
223 && re_exec (SYMBOL_DEMANGLED_NAME (symbol)) != 0))
224
225 /* Define a simple structure used to hold some very basic information about
226 all defined global symbols (text, data, bss, abs, etc). The only required
227 information is the general_symbol_info.
228
229 In many cases, even if a file was compiled with no special options for
230 debugging at all, as long as was not stripped it will contain sufficient
231 information to build a useful minimal symbol table using this structure.
232 Even when a file contains enough debugging information to build a full
233 symbol table, these minimal symbols are still useful for quickly mapping
234 between names and addresses, and vice versa. They are also sometimes
235 used to figure out what full symbol table entries need to be read in. */
236
237 struct minimal_symbol
238 {
239
240 /* The general symbol info required for all types of symbols.
241
242 The SYMBOL_VALUE_ADDRESS contains the address that this symbol
243 corresponds to. */
244
245 struct general_symbol_info ginfo;
246
247 /* The info field is available for caching machine-specific information
248 so it doesn't have to rederive the info constantly (over a serial line).
249 It is initialized to zero and stays that way until target-dependent code
250 sets it. Storage for any data pointed to by this field should be allo-
251 cated on the symbol_obstack for the associated objfile.
252 The type would be "void *" except for reasons of compatibility with older
253 compilers. This field is optional.
254
255 Currently, the AMD 29000 tdep.c uses it to remember things it has decoded
256 from the instructions in the function header, and the MIPS-16 code uses
257 it to identify 16-bit procedures. */
258
259 char *info;
260
261 #ifdef SOFUN_ADDRESS_MAYBE_MISSING
262 /* Which source file is this symbol in? Only relevant for mst_file_*. */
263 char *filename;
264 #endif
265
266 /* Classification types for this symbol. These should be taken as "advisory
267 only", since if gdb can't easily figure out a classification it simply
268 selects mst_unknown. It may also have to guess when it can't figure out
269 which is a better match between two types (mst_data versus mst_bss) for
270 example. Since the minimal symbol info is sometimes derived from the
271 BFD library's view of a file, we need to live with what information bfd
272 supplies. */
273
274 enum minimal_symbol_type
275 {
276 mst_unknown = 0, /* Unknown type, the default */
277 mst_text, /* Generally executable instructions */
278 mst_data, /* Generally initialized data */
279 mst_bss, /* Generally uninitialized data */
280 mst_abs, /* Generally absolute (nonrelocatable) */
281 /* GDB uses mst_solib_trampoline for the start address of a shared
282 library trampoline entry. Breakpoints for shared library functions
283 are put there if the shared library is not yet loaded.
284 After the shared library is loaded, lookup_minimal_symbol will
285 prefer the minimal symbol from the shared library (usually
286 a mst_text symbol) over the mst_solib_trampoline symbol, and the
287 breakpoints will be moved to their true address in the shared
288 library via breakpoint_re_set. */
289 mst_solib_trampoline, /* Shared library trampoline code */
290 /* For the mst_file* types, the names are only guaranteed to be unique
291 within a given .o file. */
292 mst_file_text, /* Static version of mst_text */
293 mst_file_data, /* Static version of mst_data */
294 mst_file_bss /* Static version of mst_bss */
295 }
296 type BYTE_BITFIELD;
297
298 /* Minimal symbols with the same hash key are kept on a linked
299 list. This is the link. */
300
301 struct minimal_symbol *hash_next;
302
303 /* Minimal symbols are stored in two different hash tables. This is
304 the `next' pointer for the demangled hash table. */
305
306 struct minimal_symbol *demangled_hash_next;
307 };
308
309 #define MSYMBOL_INFO(msymbol) (msymbol)->info
310 #define MSYMBOL_TYPE(msymbol) (msymbol)->type
311
312 \f
313
314 /* All of the name-scope contours of the program
315 are represented by `struct block' objects.
316 All of these objects are pointed to by the blockvector.
317
318 Each block represents one name scope.
319 Each lexical context has its own block.
320
321 The blockvector begins with some special blocks.
322 The GLOBAL_BLOCK contains all the symbols defined in this compilation
323 whose scope is the entire program linked together.
324 The STATIC_BLOCK contains all the symbols whose scope is the
325 entire compilation excluding other separate compilations.
326 Blocks starting with the FIRST_LOCAL_BLOCK are not special.
327
328 Each block records a range of core addresses for the code that
329 is in the scope of the block. The STATIC_BLOCK and GLOBAL_BLOCK
330 give, for the range of code, the entire range of code produced
331 by the compilation that the symbol segment belongs to.
332
333 The blocks appear in the blockvector
334 in order of increasing starting-address,
335 and, within that, in order of decreasing ending-address.
336
337 This implies that within the body of one function
338 the blocks appear in the order of a depth-first tree walk. */
339
340 struct blockvector
341 {
342 /* Number of blocks in the list. */
343 int nblocks;
344 /* The blocks themselves. */
345 struct block *block[1];
346 };
347
348 #define BLOCKVECTOR_NBLOCKS(blocklist) (blocklist)->nblocks
349 #define BLOCKVECTOR_BLOCK(blocklist,n) (blocklist)->block[n]
350
351 /* Special block numbers */
352
353 #define GLOBAL_BLOCK 0
354 #define STATIC_BLOCK 1
355 #define FIRST_LOCAL_BLOCK 2
356
357 struct block
358 {
359
360 /* Addresses in the executable code that are in this block. */
361
362 CORE_ADDR startaddr;
363 CORE_ADDR endaddr;
364
365 /* The symbol that names this block, if the block is the body of a
366 function; otherwise, zero. */
367
368 struct symbol *function;
369
370 /* The `struct block' for the containing block, or 0 if none.
371
372 The superblock of a top-level local block (i.e. a function in the
373 case of C) is the STATIC_BLOCK. The superblock of the
374 STATIC_BLOCK is the GLOBAL_BLOCK. */
375
376 struct block *superblock;
377
378 /* Version of GCC used to compile the function corresponding
379 to this block, or 0 if not compiled with GCC. When possible,
380 GCC should be compatible with the native compiler, or if that
381 is not feasible, the differences should be fixed during symbol
382 reading. As of 16 Apr 93, this flag is never used to distinguish
383 between gcc2 and the native compiler.
384
385 If there is no function corresponding to this block, this meaning
386 of this flag is undefined. */
387
388 unsigned char gcc_compile_flag;
389
390 /* Number of local symbols. */
391
392 int nsyms;
393
394 /* The symbols. If some of them are arguments, then they must be
395 in the order in which we would like to print them. */
396
397 struct symbol *sym[1];
398 };
399
400 #define BLOCK_START(bl) (bl)->startaddr
401 #define BLOCK_END(bl) (bl)->endaddr
402 #define BLOCK_NSYMS(bl) (bl)->nsyms
403 #define BLOCK_SYM(bl, n) (bl)->sym[n]
404 #define BLOCK_FUNCTION(bl) (bl)->function
405 #define BLOCK_SUPERBLOCK(bl) (bl)->superblock
406 #define BLOCK_GCC_COMPILED(bl) (bl)->gcc_compile_flag
407
408 /* Macro to loop through all symbols in a block BL.
409 i counts which symbol we are looking at, and sym points to the current
410 symbol.
411 The contortion at the end is to avoid reading past the last valid
412 BLOCK_SYM. */
413 #define ALL_BLOCK_SYMBOLS(bl, i, sym) \
414 for ((i) = 0, (sym) = BLOCK_SYM ((bl), (i)); \
415 (i) < BLOCK_NSYMS ((bl)); \
416 ++(i), (sym) = ((i) < BLOCK_NSYMS ((bl))) \
417 ? BLOCK_SYM ((bl), (i)) \
418 : NULL)
419
420 /* Nonzero if symbols of block BL should be sorted alphabetically.
421 Don't sort a block which corresponds to a function. If we did the
422 sorting would have to preserve the order of the symbols for the
423 arguments. */
424
425 #define BLOCK_SHOULD_SORT(bl) ((bl)->nsyms >= 40 && BLOCK_FUNCTION (bl) == NULL)
426 \f
427
428 /* Represent one symbol name; a variable, constant, function or typedef. */
429
430 /* Different name spaces for symbols. Looking up a symbol specifies a
431 namespace and ignores symbol definitions in other name spaces. */
432
433 typedef enum
434 {
435 /* UNDEF_NAMESPACE is used when a namespace has not been discovered or
436 none of the following apply. This usually indicates an error either
437 in the symbol information or in gdb's handling of symbols. */
438
439 UNDEF_NAMESPACE,
440
441 /* VAR_NAMESPACE is the usual namespace. In C, this contains variables,
442 function names, typedef names and enum type values. */
443
444 VAR_NAMESPACE,
445
446 /* STRUCT_NAMESPACE is used in C to hold struct, union and enum type names.
447 Thus, if `struct foo' is used in a C program, it produces a symbol named
448 `foo' in the STRUCT_NAMESPACE. */
449
450 STRUCT_NAMESPACE,
451
452 /* LABEL_NAMESPACE may be used for names of labels (for gotos);
453 currently it is not used and labels are not recorded at all. */
454
455 LABEL_NAMESPACE,
456
457 /* Searching namespaces. These overlap with VAR_NAMESPACE, providing
458 some granularity with the search_symbols function. */
459
460 /* Everything in VAR_NAMESPACE minus FUNCTIONS_-, TYPES_-, and
461 METHODS_NAMESPACE */
462 VARIABLES_NAMESPACE,
463
464 /* All functions -- for some reason not methods, though. */
465 FUNCTIONS_NAMESPACE,
466
467 /* All defined types */
468 TYPES_NAMESPACE,
469
470 /* All class methods -- why is this separated out? */
471 METHODS_NAMESPACE
472
473 }
474 namespace_enum;
475
476 /* An address-class says where to find the value of a symbol. */
477
478 enum address_class
479 {
480 /* Not used; catches errors */
481
482 LOC_UNDEF,
483
484 /* Value is constant int SYMBOL_VALUE, host byteorder */
485
486 LOC_CONST,
487
488 /* Value is at fixed address SYMBOL_VALUE_ADDRESS */
489
490 LOC_STATIC,
491
492 /* Value is in register. SYMBOL_VALUE is the register number. */
493
494 LOC_REGISTER,
495
496 /* It's an argument; the value is at SYMBOL_VALUE offset in arglist. */
497
498 LOC_ARG,
499
500 /* Value address is at SYMBOL_VALUE offset in arglist. */
501
502 LOC_REF_ARG,
503
504 /* Value is in register number SYMBOL_VALUE. Just like LOC_REGISTER
505 except this is an argument. Probably the cleaner way to handle
506 this would be to separate address_class (which would include
507 separate ARG and LOCAL to deal with FRAME_ARGS_ADDRESS versus
508 FRAME_LOCALS_ADDRESS), and an is_argument flag.
509
510 For some symbol formats (stabs, for some compilers at least),
511 the compiler generates two symbols, an argument and a register.
512 In some cases we combine them to a single LOC_REGPARM in symbol
513 reading, but currently not for all cases (e.g. it's passed on the
514 stack and then loaded into a register). */
515
516 LOC_REGPARM,
517
518 /* Value is in specified register. Just like LOC_REGPARM except the
519 register holds the address of the argument instead of the argument
520 itself. This is currently used for the passing of structs and unions
521 on sparc and hppa. It is also used for call by reference where the
522 address is in a register, at least by mipsread.c. */
523
524 LOC_REGPARM_ADDR,
525
526 /* Value is a local variable at SYMBOL_VALUE offset in stack frame. */
527
528 LOC_LOCAL,
529
530 /* Value not used; definition in SYMBOL_TYPE. Symbols in the namespace
531 STRUCT_NAMESPACE all have this class. */
532
533 LOC_TYPEDEF,
534
535 /* Value is address SYMBOL_VALUE_ADDRESS in the code */
536
537 LOC_LABEL,
538
539 /* In a symbol table, value is SYMBOL_BLOCK_VALUE of a `struct block'.
540 In a partial symbol table, SYMBOL_VALUE_ADDRESS is the start address
541 of the block. Function names have this class. */
542
543 LOC_BLOCK,
544
545 /* Value is a constant byte-sequence pointed to by SYMBOL_VALUE_BYTES, in
546 target byte order. */
547
548 LOC_CONST_BYTES,
549
550 /* Value is arg at SYMBOL_VALUE offset in stack frame. Differs from
551 LOC_LOCAL in that symbol is an argument; differs from LOC_ARG in
552 that we find it in the frame (FRAME_LOCALS_ADDRESS), not in the
553 arglist (FRAME_ARGS_ADDRESS). Added for i960, which passes args
554 in regs then copies to frame. */
555
556 LOC_LOCAL_ARG,
557
558 /* Value is at SYMBOL_VALUE offset from the current value of
559 register number SYMBOL_BASEREG. This exists mainly for the same
560 things that LOC_LOCAL and LOC_ARG do; but we need to do this
561 instead because on 88k DWARF gives us the offset from the
562 frame/stack pointer, rather than the offset from the "canonical
563 frame address" used by COFF, stabs, etc., and we don't know how
564 to convert between these until we start examining prologues.
565
566 Note that LOC_BASEREG is much less general than a DWARF expression.
567 We don't need the generality (at least not yet), and storing a general
568 DWARF expression would presumably take up more space than the existing
569 scheme. */
570
571 LOC_BASEREG,
572
573 /* Same as LOC_BASEREG but it is an argument. */
574
575 LOC_BASEREG_ARG,
576
577 /* Value is at fixed address, but the address of the variable has
578 to be determined from the minimal symbol table whenever the
579 variable is referenced.
580 This happens if debugging information for a global symbol is
581 emitted and the corresponding minimal symbol is defined
582 in another object file or runtime common storage.
583 The linker might even remove the minimal symbol if the global
584 symbol is never referenced, in which case the symbol remains
585 unresolved. */
586
587 LOC_UNRESOLVED,
588
589 /* Value is at a thread-specific location calculated by a
590 target-specific method. */
591
592 LOC_THREAD_LOCAL_STATIC,
593
594 /* The variable does not actually exist in the program.
595 The value is ignored. */
596
597 LOC_OPTIMIZED_OUT,
598
599 /* The variable is static, but actually lives at * (address).
600 * I.e. do an extra indirection to get to it.
601 * This is used on HP-UX to get at globals that are allocated
602 * in shared libraries, where references from images other
603 * than the one where the global was allocated are done
604 * with a level of indirection.
605 */
606
607 LOC_INDIRECT
608
609 };
610
611 /* Linked list of symbol's live ranges. */
612
613 struct range_list
614 {
615 CORE_ADDR start;
616 CORE_ADDR end;
617 struct range_list *next;
618 };
619
620 /* Linked list of aliases for a particular main/primary symbol. */
621 struct alias_list
622 {
623 struct symbol *sym;
624 struct alias_list *next;
625 };
626
627 struct symbol
628 {
629
630 /* The general symbol info required for all types of symbols. */
631
632 struct general_symbol_info ginfo;
633
634 /* Data type of value */
635
636 struct type *type;
637
638 /* Name space code. */
639
640 #ifdef __MFC4__
641 /* FIXME: don't conflict with C++'s namespace */
642 /* would be safer to do a global change for all namespace identifiers. */
643 #define namespace _namespace
644 #endif
645 namespace_enum namespace BYTE_BITFIELD;
646
647 /* Address class */
648
649 enum address_class aclass BYTE_BITFIELD;
650
651 /* Line number of definition. FIXME: Should we really make the assumption
652 that nobody will try to debug files longer than 64K lines? What about
653 machine generated programs? */
654
655 unsigned short line;
656
657 /* Some symbols require an additional value to be recorded on a per-
658 symbol basis. Stash those values here. */
659
660 union
661 {
662 /* Used by LOC_BASEREG and LOC_BASEREG_ARG. */
663 short basereg;
664 }
665 aux_value;
666
667
668 /* Link to a list of aliases for this symbol.
669 Only a "primary/main symbol may have aliases. */
670 struct alias_list *aliases;
671
672 /* List of ranges where this symbol is active. This is only
673 used by alias symbols at the current time. */
674 struct range_list *ranges;
675 };
676
677
678 #define SYMBOL_NAMESPACE(symbol) (symbol)->namespace
679 #define SYMBOL_CLASS(symbol) (symbol)->aclass
680 #define SYMBOL_TYPE(symbol) (symbol)->type
681 #define SYMBOL_LINE(symbol) (symbol)->line
682 #define SYMBOL_BASEREG(symbol) (symbol)->aux_value.basereg
683 #define SYMBOL_ALIASES(symbol) (symbol)->aliases
684 #define SYMBOL_RANGES(symbol) (symbol)->ranges
685 \f
686 /* A partial_symbol records the name, namespace, and address class of
687 symbols whose types we have not parsed yet. For functions, it also
688 contains their memory address, so we can find them from a PC value.
689 Each partial_symbol sits in a partial_symtab, all of which are chained
690 on a partial symtab list and which points to the corresponding
691 normal symtab once the partial_symtab has been referenced. */
692
693 struct partial_symbol
694 {
695
696 /* The general symbol info required for all types of symbols. */
697
698 struct general_symbol_info ginfo;
699
700 /* Name space code. */
701
702 namespace_enum namespace BYTE_BITFIELD;
703
704 /* Address class (for info_symbols) */
705
706 enum address_class aclass BYTE_BITFIELD;
707
708 };
709
710 #define PSYMBOL_NAMESPACE(psymbol) (psymbol)->namespace
711 #define PSYMBOL_CLASS(psymbol) (psymbol)->aclass
712 \f
713
714 /* Source-file information. This describes the relation between source files,
715 line numbers and addresses in the program text. */
716
717 struct sourcevector
718 {
719 int length; /* Number of source files described */
720 struct source *source[1]; /* Descriptions of the files */
721 };
722
723 /* Each item represents a line-->pc (or the reverse) mapping. This is
724 somewhat more wasteful of space than one might wish, but since only
725 the files which are actually debugged are read in to core, we don't
726 waste much space. */
727
728 struct linetable_entry
729 {
730 int line;
731 CORE_ADDR pc;
732 };
733
734 /* The order of entries in the linetable is significant. They should
735 be sorted by increasing values of the pc field. If there is more than
736 one entry for a given pc, then I'm not sure what should happen (and
737 I not sure whether we currently handle it the best way).
738
739 Example: a C for statement generally looks like this
740
741 10 0x100 - for the init/test part of a for stmt.
742 20 0x200
743 30 0x300
744 10 0x400 - for the increment part of a for stmt.
745
746 If an entry has a line number of zero, it marks the start of a PC
747 range for which no line number information is available. It is
748 acceptable, though wasteful of table space, for such a range to be
749 zero length. */
750
751 struct linetable
752 {
753 int nitems;
754
755 /* Actually NITEMS elements. If you don't like this use of the
756 `struct hack', you can shove it up your ANSI (seriously, if the
757 committee tells us how to do it, we can probably go along). */
758 struct linetable_entry item[1];
759 };
760
761 /* All the information on one source file. */
762
763 struct source
764 {
765 char *name; /* Name of file */
766 struct linetable contents;
767 };
768
769 /* How to relocate the symbols from each section in a symbol file.
770 Each struct contains an array of offsets.
771 The ordering and meaning of the offsets is file-type-dependent;
772 typically it is indexed by section numbers or symbol types or
773 something like that.
774
775 To give us flexibility in changing the internal representation
776 of these offsets, the ANOFFSET macro must be used to insert and
777 extract offset values in the struct. */
778
779 struct section_offsets
780 {
781 CORE_ADDR offsets[1]; /* As many as needed. */
782 };
783
784 #define ANOFFSET(secoff, whichone) \
785 ((whichone == -1) \
786 ? (internal_error (__FILE__, __LINE__, "Section index is uninitialized"), -1) \
787 : secoff->offsets[whichone])
788
789 /* The maximum possible size of a section_offsets table. */
790
791 #define SIZEOF_SECTION_OFFSETS \
792 (sizeof (struct section_offsets) \
793 + sizeof (((struct section_offsets *) 0)->offsets) * (SECT_OFF_MAX-1))
794
795 /* Each source file or header is represented by a struct symtab.
796 These objects are chained through the `next' field. */
797
798 struct symtab
799 {
800
801 /* Chain of all existing symtabs. */
802
803 struct symtab *next;
804
805 /* List of all symbol scope blocks for this symtab. May be shared
806 between different symtabs (and normally is for all the symtabs
807 in a given compilation unit). */
808
809 struct blockvector *blockvector;
810
811 /* Table mapping core addresses to line numbers for this file.
812 Can be NULL if none. Never shared between different symtabs. */
813
814 struct linetable *linetable;
815
816 /* Section in objfile->section_offsets for the blockvector and
817 the linetable. Probably always SECT_OFF_TEXT. */
818
819 int block_line_section;
820
821 /* If several symtabs share a blockvector, exactly one of them
822 should be designated the primary, so that the blockvector
823 is relocated exactly once by objfile_relocate. */
824
825 int primary;
826
827 /* The macro table for this symtab. Like the blockvector, this
828 may be shared between different symtabs --- and normally is for
829 all the symtabs in a given compilation unit. */
830 struct macro_table *macro_table;
831
832 /* Name of this source file. */
833
834 char *filename;
835
836 /* Directory in which it was compiled, or NULL if we don't know. */
837
838 char *dirname;
839
840 /* This component says how to free the data we point to:
841 free_contents => do a tree walk and free each object.
842 free_nothing => do nothing; some other symtab will free
843 the data this one uses.
844 free_linetable => free just the linetable. FIXME: Is this redundant
845 with the primary field? */
846
847 enum free_code
848 {
849 free_nothing, free_contents, free_linetable
850 }
851 free_code;
852
853 /* Pointer to one block of storage to be freed, if nonzero. */
854 /* This is IN ADDITION to the action indicated by free_code. */
855
856 char *free_ptr;
857
858 /* Total number of lines found in source file. */
859
860 int nlines;
861
862 /* line_charpos[N] is the position of the (N-1)th line of the
863 source file. "position" means something we can lseek() to; it
864 is not guaranteed to be useful any other way. */
865
866 int *line_charpos;
867
868 /* Language of this source file. */
869
870 enum language language;
871
872 /* String that identifies the format of the debugging information, such
873 as "stabs", "dwarf 1", "dwarf 2", "coff", etc. This is mostly useful
874 for automated testing of gdb but may also be information that is
875 useful to the user. */
876
877 char *debugformat;
878
879 /* String of version information. May be zero. */
880
881 char *version;
882
883 /* Full name of file as found by searching the source path.
884 NULL if not yet known. */
885
886 char *fullname;
887
888 /* Object file from which this symbol information was read. */
889
890 struct objfile *objfile;
891
892 };
893
894 #define BLOCKVECTOR(symtab) (symtab)->blockvector
895 #define LINETABLE(symtab) (symtab)->linetable
896 \f
897
898 /* Each source file that has not been fully read in is represented by
899 a partial_symtab. This contains the information on where in the
900 executable the debugging symbols for a specific file are, and a
901 list of names of global symbols which are located in this file.
902 They are all chained on partial symtab lists.
903
904 Even after the source file has been read into a symtab, the
905 partial_symtab remains around. They are allocated on an obstack,
906 psymbol_obstack. FIXME, this is bad for dynamic linking or VxWorks-
907 style execution of a bunch of .o's. */
908
909 struct partial_symtab
910 {
911
912 /* Chain of all existing partial symtabs. */
913
914 struct partial_symtab *next;
915
916 /* Name of the source file which this partial_symtab defines */
917
918 char *filename;
919
920 /* Full path of the source file. NULL if not known. */
921
922 char *fullname;
923
924 /* Information about the object file from which symbols should be read. */
925
926 struct objfile *objfile;
927
928 /* Set of relocation offsets to apply to each section. */
929
930 struct section_offsets *section_offsets;
931
932 /* Range of text addresses covered by this file; texthigh is the
933 beginning of the next section. */
934
935 CORE_ADDR textlow;
936 CORE_ADDR texthigh;
937
938 /* Array of pointers to all of the partial_symtab's which this one
939 depends on. Since this array can only be set to previous or
940 the current (?) psymtab, this dependency tree is guaranteed not
941 to have any loops. "depends on" means that symbols must be read
942 for the dependencies before being read for this psymtab; this is
943 for type references in stabs, where if foo.c includes foo.h, declarations
944 in foo.h may use type numbers defined in foo.c. For other debugging
945 formats there may be no need to use dependencies. */
946
947 struct partial_symtab **dependencies;
948
949 int number_of_dependencies;
950
951 /* Global symbol list. This list will be sorted after readin to
952 improve access. Binary search will be the usual method of
953 finding a symbol within it. globals_offset is an integer offset
954 within global_psymbols[]. */
955
956 int globals_offset;
957 int n_global_syms;
958
959 /* Static symbol list. This list will *not* be sorted after readin;
960 to find a symbol in it, exhaustive search must be used. This is
961 reasonable because searches through this list will eventually
962 lead to either the read in of a files symbols for real (assumed
963 to take a *lot* of time; check) or an error (and we don't care
964 how long errors take). This is an offset and size within
965 static_psymbols[]. */
966
967 int statics_offset;
968 int n_static_syms;
969
970 /* Pointer to symtab eventually allocated for this source file, 0 if
971 !readin or if we haven't looked for the symtab after it was readin. */
972
973 struct symtab *symtab;
974
975 /* Pointer to function which will read in the symtab corresponding to
976 this psymtab. */
977
978 void (*read_symtab) (struct partial_symtab *);
979
980 /* Information that lets read_symtab() locate the part of the symbol table
981 that this psymtab corresponds to. This information is private to the
982 format-dependent symbol reading routines. For further detail examine
983 the various symbol reading modules. Should really be (void *) but is
984 (char *) as with other such gdb variables. (FIXME) */
985
986 char *read_symtab_private;
987
988 /* Non-zero if the symtab corresponding to this psymtab has been readin */
989
990 unsigned char readin;
991 };
992
993 /* A fast way to get from a psymtab to its symtab (after the first time). */
994 #define PSYMTAB_TO_SYMTAB(pst) \
995 ((pst) -> symtab != NULL ? (pst) -> symtab : psymtab_to_symtab (pst))
996 \f
997
998 /* The virtual function table is now an array of structures which have the
999 form { int16 offset, delta; void *pfn; }.
1000
1001 In normal virtual function tables, OFFSET is unused.
1002 DELTA is the amount which is added to the apparent object's base
1003 address in order to point to the actual object to which the
1004 virtual function should be applied.
1005 PFN is a pointer to the virtual function.
1006
1007 Note that this macro is g++ specific (FIXME). */
1008
1009 #define VTBL_FNADDR_OFFSET 2
1010
1011 /* External variables and functions for the objects described above. */
1012
1013 /* This symtab variable specifies the current file for printing source lines */
1014
1015 extern struct symtab *current_source_symtab;
1016
1017 /* This is the next line to print for listing source lines. */
1018
1019 extern int current_source_line;
1020
1021 /* See the comment in symfile.c about how current_objfile is used. */
1022
1023 extern struct objfile *current_objfile;
1024
1025 /* True if we are nested inside psymtab_to_symtab. */
1026
1027 extern int currently_reading_symtab;
1028
1029 /* From utils.c. */
1030 extern int demangle;
1031 extern int asm_demangle;
1032
1033 /* symtab.c lookup functions */
1034
1035 /* lookup a symbol table by source file name */
1036
1037 extern struct symtab *lookup_symtab (const char *);
1038
1039 /* lookup a symbol by name (optional block, optional symtab) */
1040
1041 extern struct symbol *lookup_symbol (const char *, const struct block *,
1042 const namespace_enum, int *,
1043 struct symtab **);
1044
1045 /* lookup a symbol by name, within a specified block */
1046
1047 extern struct symbol *lookup_block_symbol (const struct block *, const char *,
1048 const char *,
1049 const namespace_enum);
1050
1051 /* lookup a [struct, union, enum] by name, within a specified block */
1052
1053 extern struct type *lookup_struct (char *, struct block *);
1054
1055 extern struct type *lookup_union (char *, struct block *);
1056
1057 extern struct type *lookup_enum (char *, struct block *);
1058
1059 /* lookup the function corresponding to the block */
1060
1061 extern struct symbol *block_function (struct block *);
1062
1063 /* from blockframe.c: */
1064
1065 /* lookup the function symbol corresponding to the address */
1066
1067 extern struct symbol *find_pc_function (CORE_ADDR);
1068
1069 /* lookup the function corresponding to the address and section */
1070
1071 extern struct symbol *find_pc_sect_function (CORE_ADDR, asection *);
1072
1073 /* lookup function from address, return name, start addr and end addr */
1074
1075 extern int
1076 find_pc_partial_function (CORE_ADDR, char **, CORE_ADDR *, CORE_ADDR *);
1077
1078 extern void clear_pc_function_cache (void);
1079
1080 extern int
1081 find_pc_sect_partial_function (CORE_ADDR, asection *,
1082 char **, CORE_ADDR *, CORE_ADDR *);
1083
1084 /* from symtab.c: */
1085
1086 /* lookup partial symbol table by filename */
1087
1088 extern struct partial_symtab *lookup_partial_symtab (const char *);
1089
1090 /* lookup partial symbol table by address */
1091
1092 extern struct partial_symtab *find_pc_psymtab (CORE_ADDR);
1093
1094 /* lookup partial symbol table by address and section */
1095
1096 extern struct partial_symtab *find_pc_sect_psymtab (CORE_ADDR, asection *);
1097
1098 /* lookup full symbol table by address */
1099
1100 extern struct symtab *find_pc_symtab (CORE_ADDR);
1101
1102 /* lookup full symbol table by address and section */
1103
1104 extern struct symtab *find_pc_sect_symtab (CORE_ADDR, asection *);
1105
1106 /* lookup partial symbol by address */
1107
1108 extern struct partial_symbol *find_pc_psymbol (struct partial_symtab *,
1109 CORE_ADDR);
1110
1111 /* lookup partial symbol by address and section */
1112
1113 extern struct partial_symbol *find_pc_sect_psymbol (struct partial_symtab *,
1114 CORE_ADDR, asection *);
1115
1116 extern int find_pc_line_pc_range (CORE_ADDR, CORE_ADDR *, CORE_ADDR *);
1117
1118 extern int contained_in (struct block *, struct block *);
1119
1120 extern void reread_symbols (void);
1121
1122 extern struct type *lookup_transparent_type (const char *);
1123
1124
1125 /* Macro for name of symbol to indicate a file compiled with gcc. */
1126 #ifndef GCC_COMPILED_FLAG_SYMBOL
1127 #define GCC_COMPILED_FLAG_SYMBOL "gcc_compiled."
1128 #endif
1129
1130 /* Macro for name of symbol to indicate a file compiled with gcc2. */
1131 #ifndef GCC2_COMPILED_FLAG_SYMBOL
1132 #define GCC2_COMPILED_FLAG_SYMBOL "gcc2_compiled."
1133 #endif
1134
1135 /* Functions for dealing with the minimal symbol table, really a misc
1136 address<->symbol mapping for things we don't have debug symbols for. */
1137
1138 extern void prim_record_minimal_symbol (const char *, CORE_ADDR,
1139 enum minimal_symbol_type,
1140 struct objfile *);
1141
1142 extern struct minimal_symbol *prim_record_minimal_symbol_and_info
1143 (const char *, CORE_ADDR,
1144 enum minimal_symbol_type,
1145 char *info, int section, asection * bfd_section, struct objfile *);
1146
1147 extern unsigned int msymbol_hash_iw (const char *);
1148
1149 extern unsigned int msymbol_hash (const char *);
1150
1151 extern void
1152 add_minsym_to_hash_table (struct minimal_symbol *sym,
1153 struct minimal_symbol **table);
1154
1155 extern struct minimal_symbol *lookup_minimal_symbol (const char *,
1156 const char *,
1157 struct objfile *);
1158
1159 extern struct minimal_symbol *lookup_minimal_symbol_text (const char *,
1160 const char *,
1161 struct objfile *);
1162
1163 struct minimal_symbol *lookup_minimal_symbol_solib_trampoline (const char *,
1164 const char *,
1165 struct objfile
1166 *);
1167
1168 extern struct minimal_symbol *lookup_minimal_symbol_by_pc (CORE_ADDR);
1169
1170 extern struct minimal_symbol *lookup_minimal_symbol_by_pc_section (CORE_ADDR,
1171 asection
1172 *);
1173
1174 extern struct minimal_symbol
1175 *lookup_solib_trampoline_symbol_by_pc (CORE_ADDR);
1176
1177 extern CORE_ADDR find_solib_trampoline_target (CORE_ADDR);
1178
1179 extern void init_minimal_symbol_collection (void);
1180
1181 extern struct cleanup *make_cleanup_discard_minimal_symbols (void);
1182
1183 extern void install_minimal_symbols (struct objfile *);
1184
1185 /* Sort all the minimal symbols in OBJFILE. */
1186
1187 extern void msymbols_sort (struct objfile *objfile);
1188
1189 struct symtab_and_line
1190 {
1191 struct symtab *symtab;
1192 asection *section;
1193 /* Line number. Line numbers start at 1 and proceed through symtab->nlines.
1194 0 is never a valid line number; it is used to indicate that line number
1195 information is not available. */
1196 int line;
1197
1198 CORE_ADDR pc;
1199 CORE_ADDR end;
1200 };
1201
1202 #define INIT_SAL(sal) { \
1203 (sal)->symtab = 0; \
1204 (sal)->section = 0; \
1205 (sal)->line = 0; \
1206 (sal)->pc = 0; \
1207 (sal)->end = 0; \
1208 }
1209
1210 struct symtabs_and_lines
1211 {
1212 struct symtab_and_line *sals;
1213 int nelts;
1214 };
1215 \f
1216
1217
1218 /* Some types and macros needed for exception catchpoints.
1219 Can't put these in target.h because symtab_and_line isn't
1220 known there. This file will be included by breakpoint.c,
1221 hppa-tdep.c, etc. */
1222
1223 /* Enums for exception-handling support */
1224 enum exception_event_kind
1225 {
1226 EX_EVENT_THROW,
1227 EX_EVENT_CATCH
1228 };
1229
1230 /* Type for returning info about an exception */
1231 struct exception_event_record
1232 {
1233 enum exception_event_kind kind;
1234 struct symtab_and_line throw_sal;
1235 struct symtab_and_line catch_sal;
1236 /* This may need to be extended in the future, if
1237 some platforms allow reporting more information,
1238 such as point of rethrow, type of exception object,
1239 type expected by catch clause, etc. */
1240 };
1241
1242 #define CURRENT_EXCEPTION_KIND (current_exception_event->kind)
1243 #define CURRENT_EXCEPTION_CATCH_SAL (current_exception_event->catch_sal)
1244 #define CURRENT_EXCEPTION_CATCH_LINE (current_exception_event->catch_sal.line)
1245 #define CURRENT_EXCEPTION_CATCH_FILE (current_exception_event->catch_sal.symtab->filename)
1246 #define CURRENT_EXCEPTION_CATCH_PC (current_exception_event->catch_sal.pc)
1247 #define CURRENT_EXCEPTION_THROW_SAL (current_exception_event->throw_sal)
1248 #define CURRENT_EXCEPTION_THROW_LINE (current_exception_event->throw_sal.line)
1249 #define CURRENT_EXCEPTION_THROW_FILE (current_exception_event->throw_sal.symtab->filename)
1250 #define CURRENT_EXCEPTION_THROW_PC (current_exception_event->throw_sal.pc)
1251 \f
1252
1253 /* Given a pc value, return line number it is in. Second arg nonzero means
1254 if pc is on the boundary use the previous statement's line number. */
1255
1256 extern struct symtab_and_line find_pc_line (CORE_ADDR, int);
1257
1258 /* Same function, but specify a section as well as an address */
1259
1260 extern struct symtab_and_line find_pc_sect_line (CORE_ADDR, asection *, int);
1261
1262 /* Given an address, return the nearest symbol at or below it in memory.
1263 Optionally return the symtab it's from through 2nd arg, and the
1264 address in inferior memory of the symbol through 3rd arg. */
1265
1266 extern struct symbol *find_addr_symbol (CORE_ADDR, struct symtab **,
1267 CORE_ADDR *);
1268
1269 /* Given a symtab and line number, return the pc there. */
1270
1271 extern int find_line_pc (struct symtab *, int, CORE_ADDR *);
1272
1273 extern int
1274 find_line_pc_range (struct symtab_and_line, CORE_ADDR *, CORE_ADDR *);
1275
1276 extern void resolve_sal_pc (struct symtab_and_line *);
1277
1278 /* Given a string, return the line specified by it. For commands like "list"
1279 and "breakpoint". */
1280
1281 extern struct symtabs_and_lines decode_line_spec (char *, int);
1282
1283 extern struct symtabs_and_lines decode_line_spec_1 (char *, int);
1284
1285 /* Symmisc.c */
1286
1287 void maintenance_print_symbols (char *, int);
1288
1289 void maintenance_print_psymbols (char *, int);
1290
1291 void maintenance_print_msymbols (char *, int);
1292
1293 void maintenance_print_objfiles (char *, int);
1294
1295 void maintenance_check_symtabs (char *, int);
1296
1297 /* maint.c */
1298
1299 void maintenance_print_statistics (char *, int);
1300
1301 extern void free_symtab (struct symtab *);
1302
1303 /* Symbol-reading stuff in symfile.c and solib.c. */
1304
1305 extern struct symtab *psymtab_to_symtab (struct partial_symtab *);
1306
1307 extern void clear_solib (void);
1308
1309 /* source.c */
1310
1311 extern int identify_source_line (struct symtab *, int, int, CORE_ADDR);
1312
1313 extern void print_source_lines (struct symtab *, int, int, int);
1314
1315 extern void forget_cached_source_info (void);
1316
1317 extern void select_source_symtab (struct symtab *);
1318
1319 extern char **make_symbol_completion_list (char *, char *);
1320
1321 extern char **make_file_symbol_completion_list (char *, char *, char *);
1322
1323 extern struct symbol **make_symbol_overload_list (struct symbol *);
1324
1325 extern char **make_source_files_completion_list (char *, char *);
1326
1327 /* symtab.c */
1328
1329 extern struct partial_symtab *find_main_psymtab (void);
1330
1331 extern struct symtab *find_line_symtab (struct symtab *, int, int *, int *);
1332
1333 extern struct symtab_and_line find_function_start_sal (struct symbol *sym, int);
1334
1335 /* blockframe.c */
1336
1337 extern struct blockvector *blockvector_for_pc (CORE_ADDR, int *);
1338
1339 extern struct blockvector *blockvector_for_pc_sect (CORE_ADDR, asection *,
1340 int *, struct symtab *);
1341
1342 /* symfile.c */
1343
1344 extern void clear_symtab_users (void);
1345
1346 extern enum language deduce_language_from_filename (char *);
1347
1348 /* symtab.c */
1349
1350 extern int in_prologue (CORE_ADDR pc, CORE_ADDR func_start);
1351
1352 extern struct symbol *fixup_symbol_section (struct symbol *,
1353 struct objfile *);
1354
1355 extern struct partial_symbol *fixup_psymbol_section (struct partial_symbol
1356 *psym,
1357 struct objfile *objfile);
1358
1359 /* Symbol searching */
1360
1361 /* When using search_symbols, a list of the following structs is returned.
1362 Callers must free the search list using free_search_symbols! */
1363 struct symbol_search
1364 {
1365 /* The block in which the match was found. Could be, for example,
1366 STATIC_BLOCK or GLOBAL_BLOCK. */
1367 int block;
1368
1369 /* Information describing what was found.
1370
1371 If symtab abd symbol are NOT NULL, then information was found
1372 for this match. */
1373 struct symtab *symtab;
1374 struct symbol *symbol;
1375
1376 /* If msymbol is non-null, then a match was made on something for
1377 which only minimal_symbols exist. */
1378 struct minimal_symbol *msymbol;
1379
1380 /* A link to the next match, or NULL for the end. */
1381 struct symbol_search *next;
1382 };
1383
1384 extern void search_symbols (char *, namespace_enum, int, char **,
1385 struct symbol_search **);
1386 extern void free_search_symbols (struct symbol_search *);
1387 extern struct cleanup *make_cleanup_free_search_symbols (struct symbol_search *);
1388
1389 /* The name of the ``main'' function.
1390 FIXME: cagney/2001-03-20: Can't make main_name() const since some
1391 of the calling code currently assumes that the string isn't
1392 const. */
1393 extern void set_main_name (const char *name);
1394 extern /*const*/ char *main_name (void);
1395
1396 #endif /* !defined(SYMTAB_H) */