From: kvigor <kvigor@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Fri, 18 Apr 2003 21:17:16 +0000 (+0000)
Subject: Fix error messages which could cause SEGV on Solaris
X-Git-Url: https://git.gag.com/?a=commitdiff_plain;h=6c3a4a7a8f3b36246191a21502a36393a89d65db;p=fw%2Fsdcc

Fix error messages which could cause SEGV on Solaris


git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@2539 4a8a32a2-be11-0410-ad9d-d568d2c75423
---

diff --git a/src/SDCCmem.c b/src/SDCCmem.c
index 6c5f0d87..dece30c2 100644
--- a/src/SDCCmem.c
+++ b/src/SDCCmem.c
@@ -563,8 +563,9 @@ deallocParms (value * val)
       if (!lval->sym->isref)
 	{
 	  lval->sym->allocreq = 0;
-	  werror (W_NO_REFERENCE, currFunc->name,
-		  "function argument", lval->sym->name);
+	    werror (W_NO_REFERENCE, 
+		    currFunc ? currFunc->name : "(unknown)",
+		    "function argument", lval->sym->name);
 	}
 
       /* move the rname if any to the name for both val & sym */
@@ -741,7 +742,8 @@ deallocLocal (symbol * csym)
 	}
       /* if not used give a warning */
       if (!sym->isref && !IS_STATIC (sym->etype))
-	werror (W_NO_REFERENCE, currFunc->name,
+	werror (W_NO_REFERENCE, 
+		currFunc ? currFunc->name : "(unknown)",
 		"local variable", sym->name);
       /* now delete it from the symbol table */
       deleteSym (SymbolTab, sym, sym->name);