undo Johan's changes for the moment

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

diff --git a/src/SDCCast.c b/src/SDCCast.c
index 18a035a189fe50c2a25392ed7a463e2d02b56e86..230be7ec9b76b555dce5b1e6bcd470524c422b57 100644 (file)
--- a/src/SDCCast.c
+++ b/src/SDCCast.c
@@ -648,14 +648,19 @@ int processParms (ast *func, value *defParm,
     resolveSymbols(actParm);
     /* if this is a PARAM node then match left & right */
     if ( actParm->type == EX_OP && actParm->opval.op == PARAM) {
-      return (processParms (func,defParm->next, actParm->right,parmNumber) );
-    } else {
+      return (processParms (func,defParm,actParm->left,parmNumber) ||
+             processParms (func,defParm->next, actParm->right,parmNumber) );
+    } 
+#if 0
+    /* Pending discussion with Johan. */
+    else {
       /* if more defined parameters present but no more actual parameters */
       if (defParm->next) {
        werror(E_TOO_FEW_PARMS);
        return 1;
       }
     }
+#endif
        
     /* the parameter type must be atleast castable */
     if (checkType(defParm->type,actParm->ftype) == 0) {