From: MaartenBrock Date: Thu, 8 Jan 2009 17:18:01 +0000 (+0000) Subject: * src/SDCCast.c (decorateType RETURN): use RESULT_TYPE_GPTR for generic X-Git-Url: https://git.gag.com/?a=commitdiff_plain;h=8fd1c14372cacf51c58fcfb16b5e26943e384808;p=fw%2Fsdcc * src/SDCCast.c (decorateType RETURN): use RESULT_TYPE_GPTR for generic pointer return git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@5335 4a8a32a2-be11-0410-ad9d-d568d2c75423 --- diff --git a/ChangeLog b/ChangeLog index 6b506c30..9dc2e5c1 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2009-01-08 Maarten Brock + + * src/SDCCast.c (decorateType RETURN): use RESULT_TYPE_GPTR for generic + pointer return + 2009-01-05 Philipp Klaus Krause * sim/ucsim/z80.src/inst_ed.cc: diff --git a/src/SDCCast.c b/src/SDCCast.c index bdae3d5a..39140831 100644 --- a/src/SDCCast.c +++ b/src/SDCCast.c @@ -3251,7 +3251,7 @@ decorateType (ast * tree, RESULT_TYPE resultType) werrorfl (tree->filename, tree->lineno, E_LVALUE_REQUIRED, "pointer deref"); goto errorTreeReturn; } - if (IS_ADDRESS_OF_OP(tree->left)) + if (IS_ADDRESS_OF_OP (tree->left)) { /* replace *&obj with obj */ return tree->left->left; @@ -4687,8 +4687,7 @@ decorateType (ast * tree, RESULT_TYPE resultType) printFromToType(RTYPE(tree), LTYPE(tree)); } - TETYPE (tree) = getSpec (TTYPE (tree) = - LTYPE (tree)); + TETYPE (tree) = getSpec (TTYPE (tree) = LTYPE (tree)); RRVAL (tree) = 1; LLVAL (tree) = 1; if (!tree->initMode ) { @@ -4794,7 +4793,7 @@ decorateType (ast * tree, RESULT_TYPE resultType) decorateType (newNode (CAST, newAst_LINK (copyLinkChain (currFunc->type->next)), tree->right), - RESULT_TYPE_NONE); + IS_GENPTR (currFunc->type->next) ? RESULT_TYPE_GPTR : RESULT_TYPE_NONE); } RRVAL (tree) = 1;