diff options
Diffstat (limited to 'basic/source/comp/exprgen.cxx')
-rw-r--r-- | basic/source/comp/exprgen.cxx | 82 |
1 files changed, 41 insertions, 41 deletions
diff --git a/basic/source/comp/exprgen.cxx b/basic/source/comp/exprgen.cxx index eb6c27360959..664655e22b24 100644 --- a/basic/source/comp/exprgen.cxx +++ b/basic/source/comp/exprgen.cxx @@ -2,7 +2,7 @@ /************************************************************************* * * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * + * * Copyright 2000, 2010 Oracle and/or its affiliates. * * OpenOffice.org - a multi-platform office productivity suite @@ -35,32 +35,32 @@ // Umsetztabelle fuer Token-Operatoren und Opcodes typedef struct { - SbiToken eTok; // Token - SbiOpcode eOp; // Opcode + SbiToken eTok; // Token + SbiOpcode eOp; // Opcode } OpTable; static OpTable aOpTable [] = { { EXPON,_EXP }, - { MUL, _MUL }, - { DIV, _DIV }, - { IDIV, _IDIV }, - { MOD, _MOD }, - { PLUS, _PLUS }, + { MUL, _MUL }, + { DIV, _DIV }, + { IDIV, _IDIV }, + { MOD, _MOD }, + { PLUS, _PLUS }, { MINUS,_MINUS }, - { EQ, _EQ }, - { NE, _NE }, - { LE, _LE }, - { GE, _GE }, - { LT, _LT }, - { GT, _GT }, - { AND, _AND }, - { OR, _OR }, - { XOR, _XOR }, - { EQV, _EQV }, - { IMP, _IMP }, - { NOT, _NOT }, - { NEG, _NEG }, - { CAT, _CAT }, + { EQ, _EQ }, + { NE, _NE }, + { LE, _LE }, + { GE, _GE }, + { LT, _LT }, + { GT, _GT }, + { AND, _AND }, + { OR, _OR }, + { XOR, _XOR }, + { EQV, _EQV }, + { IMP, _IMP }, + { NOT, _NOT }, + { NEG, _NEG }, + { CAT, _CAT }, { LIKE, _LIKE }, { IS, _IS }, { NIL, _NOP }}; @@ -72,9 +72,9 @@ void SbiExprNode::Gen( RecursiveMode eRecMode ) { switch( GetType() ) { - case SbxEMPTY: pGen->Gen( _EMPTY ); break; + case SbxEMPTY: pGen->Gen( _EMPTY ); break; case SbxINTEGER: pGen->Gen( _CONST, (short) nVal ); break; - case SbxSTRING: + case SbxSTRING: { USHORT nStringId = pGen->GetParser()->aGblStrings.Add( aStrVal, TRUE ); pGen->Gen( _SCONST, nStringId ); break; @@ -112,17 +112,17 @@ void SbiExprNode::Gen( RecursiveMode eRecMode ) // AB: 17.12.1995, Spezialbehandlung fuer WITH else if( (pWithParent_ = GetWithParent()) != NULL ) { - eOp = _ELEM; // .-Ausdruck in WITH + eOp = _ELEM; // .-Ausdruck in WITH } else { - eOp = ( aVar.pDef->GetScope() == SbRTL ) ? _RTL : + eOp = ( aVar.pDef->GetScope() == SbRTL ) ? _RTL : (aVar.pDef->IsGlobal() ? _FIND_G : _FIND); } if( eOp == _FIND ) { - + SbiProcDef* pProc = aVar.pDef->GetProcDef(); if ( pGen->GetParser()->bClassModule ) eOp = _FIND_CM; @@ -182,7 +182,7 @@ void SbiExprNode::GenElement( SbiOpcode eOp ) nId |= 0x8000; aVar.pPar->Gen(); } - + pGen->Gen( eOp, nId, sal::static_int_cast< UINT16 >( GetType() ) ); if( aVar.pvMorePar ) @@ -209,7 +209,7 @@ void SbiExprList::Gen() pParser->aGen.Gen( _ARGC ); // AB 10.1.96: Typ-Anpassung bei DECLARE USHORT nCount = 1 /*, nParAnz = 0*/; -// SbiSymPool* pPool = NULL; +// SbiSymPool* pPool = NULL; for( SbiExpression* pExpr = pFirst; pExpr; pExpr = pExpr->pNext,nCount++ ) { pExpr->Gen(); @@ -229,17 +229,17 @@ void SbiExprList::Gen() // Spaeter, wenn Named Args bei DECLARE moeglich //for( USHORT i = 1 ; i < nParAnz ; i++ ) //{ - // SbiSymDef* pDef = pPool->Get( i ); - // const String& rName = pDef->GetName(); - // if( rName.Len() ) - // { - // if( pExpr->GetName().ICompare( rName ) - // == COMPARE_EQUAL ) - // { - // pParser->aGen.Gen( _ARGTYP, pDef->GetType() ); - // break; - // } - // } + // SbiSymDef* pDef = pPool->Get( i ); + // const String& rName = pDef->GetName(); + // if( rName.Len() ) + // { + // if( pExpr->GetName().ICompare( rName ) + // == COMPARE_EQUAL ) + // { + // pParser->aGen.Gen( _ARGTYP, pDef->GetType() ); + // break; + // } + // } //} } */ @@ -263,7 +263,7 @@ void SbiExpression::Gen( RecursiveMode eRecMode ) { USHORT uBase = pParser->nBase; if( pParser->IsCompatible() ) - uBase |= 0x8000; // #109275 Flag compatiblity + uBase |= 0x8000; // #109275 Flag compatiblity pParser->aGen.Gen( _BASED, uBase ); pParser->aGen.Gen( _ARGV ); } |