/* */
/* */
/* */
-/* (C) 1998-2003 Ullrich von Bassewitz */
-/* Römerstraße 52 */
-/* D-70794 Filderstadt */
-/* EMail: uz@cc65.org */
+/* (C) 1998-2011, Ullrich von Bassewitz */
+/* Roemerstrasse 52 */
+/* D-70794 Filderstadt */
+/* EMail: uz@cc65.org */
/* */
/* */
/* This software is provided 'as-is', without any expressed or implied */
#include "inline.h"
/* ca65 */
-#include "segrange.h"
#include "symentry.h"
#define ST_NONE 0x00 /* No flags */
#define ST_DEFINED 0x01 /* Scope has been defined */
-/* Symbol table types */
-enum {
- ST_GLOBAL, /* Root level */
- ST_PROC, /* .PROC */
- ST_SCOPE, /* .SCOPE */
- ST_SCOPE_HAS_DATA = ST_SCOPE, /* Last scope that contains data */
- ST_STRUCT, /* .STRUCT/.UNION */
- ST_ENUM, /* .ENUM */
- ST_UNDEF = 0xFF
-};
-
/* A symbol table */
typedef struct SymTable SymTable;
struct SymTable {
+ SymTable* Next; /* Pointer to next table in list */
SymTable* Left; /* Pointer to smaller entry */
SymTable* Right; /* Pointer to greater entry */
SymTable* Parent; /* Link to enclosing scope if any */
SymTable* Childs; /* Pointer to child scopes */
- Collection SegRanges; /* Segment ranges for this scope */
+ SymEntry* Label; /* Scope label */
+ Collection Spans; /* Spans for this scope */
+ unsigned Id; /* Scope id */
unsigned short Flags; /* Symbol table flags */
unsigned char AddrSize; /* Address size */
unsigned char Type; /* Type of the scope */
};
/* Symbol tables */
-SymTable* CurrentScope; /* Pointer to current symbol table */
-SymTable* RootScope; /* Root symbol table */
+extern SymTable* CurrentScope; /* Pointer to current symbol table */
+extern SymTable* RootScope; /* Root symbol table */
-void SymEnterLevel (const char* ScopeName, unsigned char Type, unsigned char AddrSize);
+void SymEnterLevel (const StrBuf* ScopeName, unsigned char Type,
+ unsigned char AddrSize, SymEntry* OwnerSym);
/* Enter a new lexical level */
void SymLeaveLevel (void);
/* Leave the current lexical level */
-SymTable* SymFindScope (SymTable* Parent, const char* Name, int AllocNew);
+SymTable* SymFindScope (SymTable* Parent, const StrBuf* Name, int AllocNew);
/* Find a scope in the given enclosing scope */
-SymTable* SymFindAnyScope (SymTable* Parent, const char* Name);
+SymTable* SymFindAnyScope (SymTable* Parent, const StrBuf* Name);
/* Find a scope in the given or any of its parent scopes. The function will
* never create a new symbol, since this can only be done in one specific
* scope.
*/
-SymEntry* SymFindLocal (SymEntry* Parent, const char* Name, int AllocNew);
+SymEntry* SymFindLocal (SymEntry* Parent, const StrBuf* StrBuf, int AllocNew);
/* Find a cheap local symbol. If AllocNew is given and the entry is not
* found, create a new one. Return the entry found, or the new entry created,
* or - in case AllocNew is zero - return 0.
*/
-SymEntry* SymFind (SymTable* Scope, const char* Name, int AllocNew);
+SymEntry* SymFind (SymTable* Scope, const StrBuf* Name, int AllocNew);
/* Find a new symbol table entry in the given table. If AllocNew is given and
* the entry is not found, create a new one. Return the entry found, or the
* new entry created, or - in case AllocNew is zero - return 0.
*/
-SymEntry* SymFindAny (SymTable* Scope, const char* Name);
+SymEntry* SymFindAny (SymTable* Scope, const StrBuf* Name);
/* Find a symbol in the given or any of its parent scopes. The function will
* never create a new symbol, since this can only be done in one specific
* scope.
*/
-int SymIsZP (SymEntry* Sym);
-/* Return true if the symbol is explicitly marked as zeropage symbol */
-
#if defined(HAVE_INLINE)
INLINE unsigned char GetSymTabType (const SymTable* S)
/* Return the type of the given symbol table */
# define GetSymTabType(S) ((S)->Type)
#endif
-unsigned char GetCurrentSymTabType ();
-/* Return the type of the current symbol table */
-
void SymCheck (void);
/* Run through all symbols and check for anomalies and errors */
void WriteDbgSyms (void);
/* Write a list of all symbols to the object file */
+void WriteScopes (void);
+/* Write the scope table to the object file */
+
/* End of symtab.h */