Fixed const pointer problem with arrays

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

diff --git a/device/lib/ds390/Makefile b/device/lib/ds390/Makefile
index 1ea1235e32c1f7a1801d135864c4237eea93819e..fb7d3c6dc1e7a830eb6c56a2a5f7eee4fdfa75bb 100755 (executable)
--- a/device/lib/ds390/Makefile
+++ b/device/lib/ds390/Makefile
@@ -2,7 +2,7 @@ CC = ../../../bin/sdcc
 
 #VERBOSE = --verbose
 
-OBJECTS = tinibios.rel memcpyx.rel rtc390.rel lcd390.rel i2c390.rel
+OBJECTS = tinibios.rel memcpyx.rel  lcd390.rel i2c390.rel
 
 SOURCES = $(patsubst %.rel,%.c,$(OBJECTS))
 

diff --git a/src/SDCCast.c b/src/SDCCast.c
index 46f95a3689f22c522da917e8c070e47400dca8f5..f846c98f36753d8d3f2e0c85c441cb937ff8d2de 100644 (file)
--- a/src/SDCCast.c
+++ b/src/SDCCast.c
@@ -1913,6 +1913,9 @@ decorateType (ast * tree)
        }
       RRVAL (tree) = 1;
       COPYTYPE (TTYPE (tree), TETYPE (tree), LTYPE (tree)->next);
+      if (IS_PTR(LTYPE(tree))) {
+             SPEC_CONST (TETYPE (tree)) = DCL_PTR_CONST (LTYPE(tree));
+      }
       return tree;
 
 /*------------------------------------------------------------------*/