From fdd115ebc537fa985b45ed8d4cf7c06fb470b054 Mon Sep 17 00:00:00 2001
From: sandeep <sandeep@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Wed, 30 Jan 2002 04:08:15 +0000
Subject: [PATCH] added option parms-in-bank1

git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@1860 4a8a32a2-be11-0410-ad9d-d568d2c75423
---
 src/SDCCast.c | 1 +
 src/SDCCast.h | 3 +++
 2 files changed, 4 insertions(+)

diff --git a/src/SDCCast.c b/src/SDCCast.c
index d6d8a8f6..4e928147 100644
--- a/src/SDCCast.c
+++ b/src/SDCCast.c
@@ -753,6 +753,7 @@ processParms (ast * func,
   /* make a copy and change the regparm type to the defined parm */
   actParm->etype = getSpec (actParm->ftype = copyLinkChain (actParm->ftype));
   SPEC_REGPARM (actParm->etype) = SPEC_REGPARM (defParm->etype);
+  SPEC_ARGREG  (actParm->etype) = SPEC_ARGREG (defParm->etype);
   (*parmNumber)++;
   return 0;
 }
diff --git a/src/SDCCast.h b/src/SDCCast.h
index d42b7c6c..fa0b6231 100644
--- a/src/SDCCast.h
+++ b/src/SDCCast.h
@@ -91,6 +91,7 @@ typedef struct ast
 	unsigned literalFromCast;	/* true if this is an EX_VALUE of LITERAL 
 					 * type resulting from a typecast.
 					 */
+	int argreg;                     /* argreg number when operand type == EX_OPERAND */
       }
     values;
 
@@ -142,6 +143,8 @@ ast;
 #define AST_VALUE(x)            (x->opval.val)
 #define AST_VALUES(x,y)	(x->values.y)
 #define AST_FOR(x,y) x->values.forVals.y
+#define AST_ARGREG(x) x->values.argreg
+
 #define  IS_AST_PARAM(x)	(IS_AST_OP(x) && x->opval.op == PARAM)
 
 #define  CAN_EVAL(x)	(     x	==  '[' || x == '.' || x == PTR_OP ||	\
-- 
2.30.2