From 493fa3118ec8e61be835bdffbf11a5494d9fab18 Mon Sep 17 00:00:00 2001
From: sandeep <sandeep@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Wed, 14 Nov 2001 05:51:17 +0000
Subject: [PATCH] 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
---
 src/SDCCast.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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))
 	{
-- 
2.39.5