diff options
| author | Rüdiger Timm <rt@openoffice.org> | 2003-04-23 15:56:49 +0000 |
|---|---|---|
| committer | Rüdiger Timm <rt@openoffice.org> | 2003-04-23 15:56:49 +0000 |
| commit | 57863dab4ecddbf3182a29c5995adb83bf617cb0 (patch) | |
| tree | 3235a30c1f89bdf68aed6abc7bb6dd0aeadce404 /basic/source/comp/parser.cxx | |
| parent | 9a75f39c781670c411bf92cd1702e3c39685f9a4 (diff) | |
INTEGRATION: CWS uno2 (1.3.44); FILE MERGED
2003/04/13 16:06:27 ab 1.3.44.2: #100883# Enable recursion in Basic
2003/04/11 14:20:44 ab 1.3.44.1: #108672# Basic Modules > 64K
Diffstat (limited to 'basic/source/comp/parser.cxx')
| -rw-r--r-- | basic/source/comp/parser.cxx | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/basic/source/comp/parser.cxx b/basic/source/comp/parser.cxx index c16731174cb4..98628dc15ec7 100644 --- a/basic/source/comp/parser.cxx +++ b/basic/source/comp/parser.cxx @@ -2,9 +2,9 @@ * * $RCSfile: parser.cxx,v $ * - * $Revision: 1.3 $ + * $Revision: 1.4 $ * - * last change: $Author: mh $ $Date: 2001-10-17 18:53:05 $ + * last change: $Author: rt $ $Date: 2003-04-23 16:56:49 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -152,7 +152,7 @@ static SbiStatement StmntTable [] = { #endif SbiParser::SbiParser( StarBASIC* pb, SbModule* pm ) - : SbiTokenizer( pm->GetSource(), pb ), + : SbiTokenizer( pm->GetSource32(), pb ), aGblStrings( this ), aLclStrings( this ), aPublics( aGblStrings, SbPUBLIC ), @@ -501,8 +501,9 @@ SbiExprNode* SbiParser::GetWithVar() void SbiParser::Symbol() { SbiExpression aVar( this, SbSYMBOL ); - aVar.Gen(); - if( Peek() != EQ ) + bool bEQ = ( Peek() == EQ ); + aVar.Gen( bEQ ); + if( !bEQ ) { aGen.Gen( _GET ); } |