X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2FSDCCast.c;h=dd7e0de77da28fae6ffe172bd35a800e5a9e8c26;hb=784a6b87948d0175947cad8d22613e8f67d3638c;hp=91a4f81e08fe35e461a888234810291af6c47aa9;hpb=0f7dd0b394676afa210e8d1a96b12029b190b956;p=fw%2Fsdcc

diff --git a/src/SDCCast.c b/src/SDCCast.c
index 91a4f81e..dd7e0de7 100644
--- a/src/SDCCast.c
+++ b/src/SDCCast.c
@@ -3232,7 +3232,6 @@ decorateType (ast * tree)
 	{
 	  werror (E_TYPE_MISMATCH, "assignment", " ");
 	  printFromToType(RTYPE(tree),LTYPE(tree));
-	  //goto errorTreeReturn;
 	}
 
       /* if the left side of the tree is of type void
@@ -3283,12 +3282,15 @@ decorateType (ast * tree)
       if ((options.stackAuto || IFFUNC_ISREENT (LTYPE (tree))) && 
 	  !IFFUNC_ISBUILTIN(LTYPE(tree)))
 	{
-	  //FUNC_ARGS(tree->left->ftype) = 
-	  //reverseVal (FUNC_ARGS(tree->left->ftype));
 	  reverseParms (tree->right);
 	}
 
-      TETYPE (tree) = getSpec (TTYPE (tree) = LTYPE (tree)->next);
+      if (IS_CODEPTR(LTYPE(tree))) {
+	TTYPE(tree) = LTYPE(tree)->next->next;
+      } else {
+	TTYPE(tree) = LTYPE(tree)->next;
+      }
+      TETYPE (tree) = getSpec (TTYPE (tree));
       return tree;
 
       /*------------------------------------------------------------------*/