From: kvigor <kvigor@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Fri, 26 Jul 2002 19:41:38 +0000 (+0000)
Subject: "fix" bug 585128
X-Git-Url: https://git.gag.com/?a=commitdiff_plain;h=276566d236d13dbf9a44ea940580898badb72d99;p=fw%2Fsdcc

"fix" bug 585128


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

diff --git a/src/SDCCicode.c b/src/SDCCicode.c
index 7ee7dc79..e20c2d82 100644
--- a/src/SDCCicode.c
+++ b/src/SDCCicode.c
@@ -2798,7 +2798,8 @@ geniCodeSEParms (ast * parms,int lvl)
     geniCodeRValue (ast2iCode (parms,lvl+1), FALSE);
 		
   parms->type = EX_OPERAND;
-  AST_ARGREG(parms) = SPEC_ARGREG(parms->etype);
+  AST_ARGREG(parms) = parms->etype ? SPEC_ARGREG(parms->etype) :
+  		SPEC_ARGREG(parms->ftype);
 }
 
 /*-----------------------------------------------------------------*/