Translation of comments to English
This commit is contained in:
@@ -35,7 +35,7 @@
|
||||
#include <limits>
|
||||
#include <com/sun/star/script/ModuleType.hpp>
|
||||
|
||||
// nInc ist die Inkrementgroesse der Puffer
|
||||
// nInc is the increment size of the buffers
|
||||
|
||||
SbiCodeGen::SbiCodeGen( SbModule& r, SbiParser* p, short nInc )
|
||||
: rMod( r ), aCode( p, nInc )
|
||||
@@ -52,7 +52,7 @@ UINT32 SbiCodeGen::GetPC()
|
||||
return aCode.GetSize();
|
||||
}
|
||||
|
||||
// Statement merken
|
||||
// memorize the statement
|
||||
|
||||
void SbiCodeGen::Statement()
|
||||
{
|
||||
@@ -61,12 +61,12 @@ void SbiCodeGen::Statement()
|
||||
nLine = pParser->GetLine();
|
||||
nCol = pParser->GetCol1();
|
||||
|
||||
// #29955 Information der for-Schleifen-Ebene
|
||||
// in oberen Byte der Spalte speichern
|
||||
// #29955 Store the information of the for-loop-layer
|
||||
// in the uppper Byte of the column
|
||||
nCol = (nCol & 0xff) + 0x100 * nForLevel;
|
||||
}
|
||||
|
||||
// Anfang eines Statements markieren
|
||||
// Mark the beginning of a statement
|
||||
|
||||
void SbiCodeGen::GenStmnt()
|
||||
{
|
||||
@@ -77,8 +77,8 @@ void SbiCodeGen::GenStmnt()
|
||||
}
|
||||
}
|
||||
|
||||
// Die Gen-Routinen returnen den Offset des 1. Operanden,
|
||||
// damit Jumps dort ihr Backchain versenken koennen
|
||||
// The Gen-Routines return the offset of the 1. operand,
|
||||
// so that jumps can sink their backchain there.
|
||||
|
||||
UINT32 SbiCodeGen::Gen( SbiOpcode eOpcode )
|
||||
{
|
||||
@@ -118,15 +118,15 @@ UINT32 SbiCodeGen::Gen( SbiOpcode eOpcode, UINT32 nOpnd1, UINT32 nOpnd2 )
|
||||
return n;
|
||||
}
|
||||
|
||||
// Abspeichern des erzeugten Images im Modul
|
||||
// Storing of the created image in the module
|
||||
|
||||
void SbiCodeGen::Save()
|
||||
{
|
||||
SbiImage* p = new SbiImage;
|
||||
rMod.StartDefinitions();
|
||||
// OPTION BASE-Wert:
|
||||
// OPTION BASE-Value:
|
||||
p->nDimBase = pParser->nBase;
|
||||
// OPTION EXPLICIT-Flag uebernehmen
|
||||
// OPTION take over the EXPLICIT-Flag
|
||||
if( pParser->bExplicit )
|
||||
p->SetFlag( SBIMG_EXPLICIT );
|
||||
|
||||
@@ -267,22 +267,22 @@ void SbiCodeGen::Save()
|
||||
pMeth->nStart = pProc->GetAddr();
|
||||
pMeth->nLine1 = pProc->GetLine1();
|
||||
pMeth->nLine2 = pProc->GetLine2();
|
||||
// Die Parameter:
|
||||
// The parameter:
|
||||
SbxInfo* pInfo = pMeth->GetInfo();
|
||||
String aHelpFile, aComment;
|
||||
ULONG nHelpId = 0;
|
||||
if( pInfo )
|
||||
{
|
||||
// Die Zusatzdaten retten
|
||||
// Rescue the additional data
|
||||
aHelpFile = pInfo->GetHelpFile();
|
||||
aComment = pInfo->GetComment();
|
||||
nHelpId = pInfo->GetHelpId();
|
||||
}
|
||||
// Und die Parameterliste neu aufbauen
|
||||
// And reestablish the parameter list
|
||||
pInfo = new SbxInfo( aHelpFile, nHelpId );
|
||||
pInfo->SetComment( aComment );
|
||||
SbiSymPool* pPool = &pProc->GetParams();
|
||||
// Das erste Element ist immer der Funktionswert!
|
||||
// The first element is always the value of the function!
|
||||
for( USHORT i = 1; i < pPool->GetSize(); i++ )
|
||||
{
|
||||
SbiSymDef* pPar = pPool->Get( i );
|
||||
@@ -291,7 +291,7 @@ void SbiCodeGen::Save()
|
||||
t = (SbxDataType) ( t | SbxBYREF );
|
||||
if( pPar->GetDims() )
|
||||
t = (SbxDataType) ( t | SbxARRAY );
|
||||
// #33677 Optional-Info durchreichen
|
||||
// #33677 hand-over an Optional-Info
|
||||
USHORT nFlags = SBX_READ;
|
||||
if( pPar->IsOptional() )
|
||||
nFlags |= SBX_OPTIONAL;
|
||||
@@ -316,10 +316,10 @@ void SbiCodeGen::Save()
|
||||
} // for( iPass...
|
||||
}
|
||||
}
|
||||
// Der Code
|
||||
// The code
|
||||
p->AddCode( aCode.GetBuffer(), aCode.GetSize() );
|
||||
|
||||
// Der globale StringPool. 0 ist nicht belegt.
|
||||
// The global StringPool. 0 is not occupied.
|
||||
SbiStringPool* pPool = &pParser->aGblStrings;
|
||||
USHORT nSize = pPool->GetSize();
|
||||
p->MakeStrings( nSize );
|
||||
@@ -327,7 +327,7 @@ void SbiCodeGen::Save()
|
||||
for( i = 1; i <= nSize; i++ )
|
||||
p->AddString( pPool->Find( i ) );
|
||||
|
||||
// Typen einfuegen
|
||||
// Insert types
|
||||
USHORT nCount = pParser->rTypeArray->Count();
|
||||
for (i = 0; i < nCount; i++)
|
||||
p->AddType((SbxObject *)pParser->rTypeArray->Get(i));
|
||||
|
Reference in New Issue
Block a user