diff options
| author | Rüdiger Timm <rt@openoffice.org> | 2008-10-28 08:22:18 +0000 |
|---|---|---|
| committer | Rüdiger Timm <rt@openoffice.org> | 2008-10-28 08:22:18 +0000 |
| commit | f07ad1e3628a79ed34d6d83ae7eb5ac10355cdd1 (patch) | |
| tree | a10d7c27c01f537313e8c70d55df603f9d323374 /basic/source/comp | |
| parent | 02e8211e5a0e51a1cbfb87104ba4da6c702158c2 (diff) | |
CWS-TOOLING: integrate CWS pflin10
Diffstat (limited to 'basic/source/comp')
| -rw-r--r-- | basic/source/comp/exprtree.cxx | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/basic/source/comp/exprtree.cxx b/basic/source/comp/exprtree.cxx index f0e6e42b58f3..29874fe5184d 100644 --- a/basic/source/comp/exprtree.cxx +++ b/basic/source/comp/exprtree.cxx @@ -117,7 +117,7 @@ static BOOL DoParametersFollow( SbiParser* p, SbiExprType eCurExpr, SbiToken eTo if( !p->WhiteSpace() || eCurExpr != SbSYMBOL ) return FALSE; if ( eTok == NUMBER || eTok == MINUS || eTok == FIXSTRING - || eTok == SYMBOL || eTok == COMMA || eTok == DOT ) + || eTok == SYMBOL || eTok == COMMA || eTok == DOT || eTok == NOT ) { return TRUE; } @@ -495,6 +495,14 @@ SbiExprNode* SbiExpression::Operand() switch( eTok = pParser->Peek() ) { case SYMBOL: + pRes = Term(); + // process something like "IF Not r Is Nothing Then .." + if( pParser->IsVBASupportOn() && pParser->Peek() == IS ) + { + eTok = pParser->Next(); + pRes = new SbiExprNode( pParser, pRes, eTok, Like() ); + } + break; case DOT: // .with pRes = Term(); break; case NUMBER: |