From: sandeep <sandeep@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Wed, 14 Nov 2001 05:51:17 +0000 (+0000)
Subject: Discovered pointer type for & operation could be incorrect for variables on
X-Git-Url: https://git.gag.com/?a=commitdiff_plain;h=493fa3118ec8e61be835bdffbf11a5494d9fab18;hp=82af6fdc4ebfa549308a2ec55708710fac3c9b04;p=fw%2Fsdcc

Discovered pointer type for & operation could be incorrect for variables on
ds390 stack


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

diff --git a/src/SDCCast.c b/src/SDCCast.c
index 000088b1..52e51ba4 100644
--- a/src/SDCCast.c
+++ b/src/SDCCast.c
@@ -2150,8 +2150,10 @@ decorateType (ast * tree)
 	DCL_TYPE (p) = IPOINTER;
       else if (SPEC_SCLS (tree->left->etype) == S_EEPROM)
 	DCL_TYPE (p) = EEPPOINTER;
+      else if (SPEC_OCLS(tree->left->etype))
+ 	  DCL_TYPE (p) = PTR_TYPE(SPEC_OCLS(tree->left->etype));
       else
-	DCL_TYPE (p) = POINTER;
+	  DCL_TYPE (p) = POINTER;
 
       if (IS_AST_SYM_VALUE (tree->left))
 	{