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 6c5f0d87949cab378694c9c3b454d2d3894f05f4..dece30c26ef3fe7a78237ed3aaecb0b523673e31 100644 (file)
--- 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);