INTEGRATION: CWS ab12fixes (1.3.234); FILE MERGED

2004/11/23 12:45:03 ab 1.3.234.1: #118234# SbiExpression::Term(): Allow Input as symbol for action option compatible

basic/source/comp/exprtree.cxx

@@ -2,9 +2,9 @@
  *
  *  $RCSfile: exprtree.cxx,v $
  *
- *  $Revision: 1.3 $
+ *  $Revision: 1.4 $
  *
- *  last change: $Author: mh $ $Date: 2001-10-17 18:53:05 $
+ *  last change: $Author: kz $ $Date: 2005-01-13 18:47:24 $
  *
  *  The Contents of this file are made available subject to the terms of
  *  either of the following licenses
@@ -241,10 +241,17 @@ SbiExprNode* SbiExpression::Term()
     }
     // ab hier sind keine Keywords zugelassen!
     if( pParser->IsKwd( eTok ) )
+    {
+        if( pParser->IsCompatible() && eTok == INPUT )
+        {
+            eTok = SYMBOL;
+        }
+        else
         {
             pParser->Error( SbERR_SYNTAX );
             bError = TRUE;
         }
+    }
 
     if( DoParametersFollow( pParser, eCurExpr, eTok = eNextTok ) )
     {