X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=src%2Fcc65%2Fsymtab.c;h=6f01b109496cb37d69d1ee37733b6ffbd33b692b;hb=b0324b604115989f108198c7cce41a5e626e6276;hp=459802b692e2fabc2a4db776854b539938242ecc;hpb=9cb63b679c60a5bc987551ebe7e09502022ac6cb;p=cc65

diff --git a/src/cc65/symtab.c b/src/cc65/symtab.c
index 459802b69..6f01b1094 100644
--- a/src/cc65/symtab.c
+++ b/src/cc65/symtab.c
@@ -6,10 +6,10 @@
 /*                                                                           */
 /*                                                                           */
 /*                                                                           */
-/* (C) 2000     Ullrich von Bassewitz                                        */
-/*              Wacholderweg 14                                              */
-/*              D-70597 Stuttgart                                            */
-/* EMail:       uz@musoftware.de                                             */
+/* (C) 2000-2001 Ullrich von Bassewitz                                       */
+/*               Wacholderweg 14                                             */
+/*               D-70597 Stuttgart                                           */
+/* EMail:        uz@cc65.org                                                 */
 /*                                                                           */
 /*                                                                           */
 /* This software is provided 'as-is', without any expressed or implied       */
@@ -224,13 +224,13 @@ void LeaveGlobalLevel (void)
 
     /* Dump the tables if requested */
     if (Debug) {
-	PrintSymTable (SymTab0, stdout, "Global symbol table");
-	PrintSymTable (TagTab0, stdout, "Global tag table");
+     	PrintSymTable (SymTab0, stdout, "Global symbol table");
+     	PrintSymTable (TagTab0, stdout, "Global tag table");
     }
 
     /* Don't delete the symbol and struct tables! */
-    SymTab0 = SymTab = 0;
-    TagTab0 = TagTab = 0;
+    SymTab = 0;
+    TagTab = 0;
 }
 
 
@@ -441,6 +441,14 @@ SymEntry* FindSym (const char* Name)
 
 
 
+SymEntry* FindGlobalSym (const char* Name)
+/* Find the symbol with the given name in the global symbol table only */
+{
+    return FindSymInTable (SymTab0, Name, HashStr (Name));
+}
+
+
+
 SymEntry* FindLocalSym (const char* Name)
 /* Find the symbol with the given name in the current symbol table only */
 {
@@ -664,8 +672,11 @@ SymEntry* AddLocalSym (const char* Name, const type* Type, unsigned Flags, int O
 SymEntry* AddGlobalSym (const char* Name, const type* Type, unsigned Flags)
 /* Add an external or global symbol to the symbol table and return the entry */
 {
+    /* There is some special handling for functions, so check if it is one */
+    int IsFunc = IsTypeFunc (Type);
+
     /* Functions must be inserted in the global symbol table */
-    SymTable* Tab = IsTypeFunc (Type)? SymTab0 : SymTab;
+    SymTable* Tab = IsFunc? SymTab0 : SymTab;
 
     /* Do we have an entry with this name already? */
     SymEntry* Entry = FindSymInTable (Tab, Name, HashStr (Name));
@@ -716,8 +727,12 @@ SymEntry* AddGlobalSym (const char* Name, const type* Type, unsigned Flags)
 	     * contains pointers to the new symbol tables that are needed if
 	     * an actual function definition follows.
 	     */
-	    if (IsTypeFunc (Type)) {
-	  	CopyEncode (Type+1, EType+1);
+	    if (IsFunc) {
+		/* Get the function descriptor from the new type */
+		FuncDesc* F = GetFuncDesc (Type);
+		/* Use this new function descriptor */
+		Entry->V.F.Func = F;
+		EncodePtr (EType+1, F);
 	    }
      	}
 
@@ -732,6 +747,14 @@ SymEntry* AddGlobalSym (const char* Name, const type* Type, unsigned Flags)
      	/* Set the symbol attributes */
      	Entry->Type = TypeDup (Type);
 
+	/* If this is a function, set the function descriptor and clear
+	 * additional fields.
+	 */
+	if (IsFunc) {
+	    Entry->V.F.Func = GetFuncDesc (Entry->Type);
+	    Entry->V.F.Seg  = 0;
+	}
+
      	/* Add the entry to the symbol table */
      	AddSymEntry (Tab, Entry);
     }
@@ -756,6 +779,14 @@ SymTable* GetSymTab (void)
 
 
 
+SymTable* GetGlobalSymTab (void)
+/* Return the global symbol table */
+{
+    return SymTab0;
+}
+
+
+
 int SymIsLocal (SymEntry* Sym)
 /* Return true if the symbol is defined in the highest lexical level */
 {
@@ -820,8 +851,6 @@ void EmitExternals (void)
 {
     SymEntry* Entry;
 
-    AddEmptyLine ();
-
     Entry = SymTab->SymHead;
     while (Entry) {
 	unsigned Flags = Entry->Flags;