summaryrefslogtreecommitdiff
path: root/basic
diff options
context:
space:
mode:
authorPascal Junck <pjunck@openoffice.org>2004-11-02 10:53:55 +0000
committerPascal Junck <pjunck@openoffice.org>2004-11-02 10:53:55 +0000
commit39b706792418e0ff563f7c4963ef763ad78edf18 (patch)
tree327bb78693c99bf5c19018eb9e4bb192b37c61c6 /basic
parent5a41cd6026cf33fc952875de85b575086f92c2ea (diff)
INTEGRATION: CWS ab11clonepp4 (1.7.62); FILE MERGED
2004/10/15 08:39:06 ab 1.7.62.1: #118083# #118084# Class support PP4 -> SO 8
Diffstat (limited to 'basic')
-rw-r--r--basic/source/comp/exprgen.cxx9
1 files changed, 6 insertions, 3 deletions
diff --git a/basic/source/comp/exprgen.cxx b/basic/source/comp/exprgen.cxx
index d6094d932323..edd827e4b6ae 100644
--- a/basic/source/comp/exprgen.cxx
+++ b/basic/source/comp/exprgen.cxx
@@ -2,9 +2,9 @@
*
* $RCSfile: exprgen.cxx,v $
*
- * $Revision: 1.7 $
+ * $Revision: 1.8 $
*
- * last change: $Author: obo $ $Date: 2004-03-17 13:33:10 $
+ * last change: $Author: pjunck $ $Date: 2004-11-02 11:53:55 $
*
* The Contents of this file are made available subject to the terms of
* either of the following licenses
@@ -150,6 +150,9 @@ void SbiExprNode::Gen( RecursiveMode eRecMode )
(aVar.pDef->IsGlobal() ? _FIND_G : _FIND);
}
+ if( eOp == _FIND && pGen->GetParser()->bClassModule )
+ eOp = _FIND_CM;
+
for( SbiExprNode* p = this; p; p = p->aVar.pNext )
{
if( p == this && pWithParent != NULL )
@@ -178,7 +181,7 @@ void SbiExprNode::Gen( RecursiveMode eRecMode )
void SbiExprNode::GenElement( SbiOpcode eOp )
{
#ifndef PRODUCT
- if( (eOp < _RTL || eOp > _CALLC) && eOp != _FIND_G )
+ if( (eOp < _RTL || eOp > _CALLC) && eOp != _FIND_G && eOp != _FIND_CM )
pGen->GetParser()->Error( SbERR_INTERNAL_ERROR, "Opcode" );
#endif
SbiSymDef* pDef = aVar.pDef;