Skip to content
Projeler
Gruplar
Parçacıklar
Yardım
Yükleniyor...
Oturum aç / Kaydol
Gezinmeyi değiştir
C
core
Proje
Proje
Ayrıntılar
Etkinlik
Cycle Analytics
Depo (repository)
Depo (repository)
Dosyalar
Kayıtlar (commit)
Dallar (branch)
Etiketler
Katkıda bulunanlar
Grafik
Karşılaştır
Grafikler
Konular (issue)
0
Konular (issue)
0
Liste
Pano
Etiketler
Kilometre Taşları
Birleştirme (merge) Talepleri
0
Birleştirme (merge) Talepleri
0
CI / CD
CI / CD
İş akışları (pipeline)
İşler
Zamanlamalar
Grafikler
Paketler
Paketler
Wiki
Wiki
Parçacıklar
Parçacıklar
Üyeler
Üyeler
Collapse sidebar
Close sidebar
Etkinlik
Grafik
Grafikler
Yeni bir konu (issue) oluştur
İşler
Kayıtlar (commit)
Konu (issue) Panoları
Kenar çubuğunu aç
LibreOffice
core
Commits
a8647dd0
Kaydet (Commit)
a8647dd0
authored
Agu 20, 2012
tarafından
Takeshi Abe
Dosyalara gözat
Seçenekler
Dosyalara Gözat
İndir
Eposta Yamaları
Sade Fark
sal_Bool to bool
Change-Id: I427e9bb30cab4698a2495de7445a4a4982abd7b4
üst
32dafb74
Hide whitespace changes
Inline
Side-by-side
Showing
8 changed files
with
74 additions
and
74 deletions
+74
-74
dim.cxx
basic/source/comp/dim.cxx
+13
-13
io.cxx
basic/source/comp/io.cxx
+7
-7
parser.cxx
basic/source/comp/parser.cxx
+21
-21
symtbl.cxx
basic/source/comp/symtbl.cxx
+1
-1
namecont.hxx
basic/source/inc/namecont.hxx
+1
-1
parser.hxx
basic/source/inc/parser.hxx
+13
-13
symtbl.hxx
basic/source/inc/symtbl.hxx
+3
-3
namecont.cxx
basic/source/uno/namecont.cxx
+15
-15
No files found.
basic/source/comp/dim.cxx
Dosyayı görüntüle @
a8647dd0
...
@@ -68,7 +68,7 @@ SbiSymDef* SbiParser::VarDecl( SbiDimList** ppDim, bool bStatic, bool bConst )
...
@@ -68,7 +68,7 @@ SbiSymDef* SbiParser::VarDecl( SbiDimList** ppDim, bool bStatic, bool bConst )
// Resolving of a AS-Type-Declaration
// Resolving of a AS-Type-Declaration
// The data type were inserted into the handed over variable
// The data type were inserted into the handed over variable
void
SbiParser
::
TypeDecl
(
SbiSymDef
&
rDef
,
sal_B
ool
bAsNewAlreadyParsed
)
void
SbiParser
::
TypeDecl
(
SbiSymDef
&
rDef
,
b
ool
bAsNewAlreadyParsed
)
{
{
SbxDataType
eType
=
rDef
.
GetType
();
SbxDataType
eType
=
rDef
.
GetType
();
if
(
bAsNewAlreadyParsed
||
Peek
()
==
AS
)
if
(
bAsNewAlreadyParsed
||
Peek
()
==
AS
)
...
@@ -239,7 +239,7 @@ void SbiParser::DefVar( SbiOpcode eOp, bool bStatic )
...
@@ -239,7 +239,7 @@ void SbiParser::DefVar( SbiOpcode eOp, bool bStatic )
bNewGblDefs
=
false
;
bNewGblDefs
=
false
;
}
}
Next
();
Next
();
DefProc
(
sal_F
alse
,
bPrivate
);
DefProc
(
f
alse
,
bPrivate
);
return
;
return
;
}
}
else
if
(
eCurTok
==
ENUM
)
else
if
(
eCurTok
==
ENUM
)
...
@@ -547,10 +547,10 @@ void SbiParser::Erase()
...
@@ -547,10 +547,10 @@ void SbiParser::Erase()
void
SbiParser
::
Type
()
void
SbiParser
::
Type
()
{
{
DefType
(
sal_F
alse
);
DefType
(
f
alse
);
}
}
void
SbiParser
::
DefType
(
sal_B
ool
bPrivate
)
void
SbiParser
::
DefType
(
b
ool
bPrivate
)
{
{
// TODO: Use bPrivate
// TODO: Use bPrivate
(
void
)
bPrivate
;
(
void
)
bPrivate
;
...
@@ -671,10 +671,10 @@ void SbiParser::DefType( sal_Bool bPrivate )
...
@@ -671,10 +671,10 @@ void SbiParser::DefType( sal_Bool bPrivate )
void
SbiParser
::
Enum
()
void
SbiParser
::
Enum
()
{
{
DefEnum
(
sal_F
alse
);
DefEnum
(
f
alse
);
}
}
void
SbiParser
::
DefEnum
(
sal_B
ool
bPrivate
)
void
SbiParser
::
DefEnum
(
b
ool
bPrivate
)
{
{
// Read a the new Token. It had to be a symbol
// Read a the new Token. It had to be a symbol
if
(
!
TestSymbol
())
if
(
!
TestSymbol
())
...
@@ -937,10 +937,10 @@ SbiProcDef* SbiParser::ProcDecl( bool bDecl )
...
@@ -937,10 +937,10 @@ SbiProcDef* SbiParser::ProcDecl( bool bDecl )
void
SbiParser
::
Declare
()
void
SbiParser
::
Declare
()
{
{
DefDeclare
(
sal_F
alse
);
DefDeclare
(
f
alse
);
}
}
void
SbiParser
::
DefDeclare
(
sal_B
ool
bPrivate
)
void
SbiParser
::
DefDeclare
(
b
ool
bPrivate
)
{
{
Next
();
Next
();
if
(
eCurTok
!=
SUB
&&
eCurTok
!=
FUNCTION
)
if
(
eCurTok
!=
SUB
&&
eCurTok
!=
FUNCTION
)
...
@@ -1071,12 +1071,12 @@ void SbiParser::Call()
...
@@ -1071,12 +1071,12 @@ void SbiParser::Call()
void
SbiParser
::
SubFunc
()
void
SbiParser
::
SubFunc
()
{
{
DefProc
(
sal_False
,
sal_F
alse
);
DefProc
(
false
,
f
alse
);
}
}
// Read in of a procedure
// Read in of a procedure
void
SbiParser
::
DefProc
(
sal_Bool
bStatic
,
sal_B
ool
bPrivate
)
void
SbiParser
::
DefProc
(
bool
bStatic
,
b
ool
bPrivate
)
{
{
sal_uInt16
l1
=
nLine
,
l2
=
nLine
;
sal_uInt16
l1
=
nLine
,
l2
=
nLine
;
bool
bSub
=
(
eCurTok
==
SUB
);
bool
bSub
=
(
eCurTok
==
SUB
);
...
@@ -1181,10 +1181,10 @@ void SbiParser::DefProc( sal_Bool bStatic, sal_Bool bPrivate )
...
@@ -1181,10 +1181,10 @@ void SbiParser::DefProc( sal_Bool bStatic, sal_Bool bPrivate )
void
SbiParser
::
Static
()
void
SbiParser
::
Static
()
{
{
DefStatic
(
sal_F
alse
);
DefStatic
(
f
alse
);
}
}
void
SbiParser
::
DefStatic
(
sal_B
ool
bPrivate
)
void
SbiParser
::
DefStatic
(
b
ool
bPrivate
)
{
{
switch
(
Peek
()
)
switch
(
Peek
()
)
{
{
...
@@ -1199,7 +1199,7 @@ void SbiParser::DefStatic( sal_Bool bPrivate )
...
@@ -1199,7 +1199,7 @@ void SbiParser::DefStatic( sal_Bool bPrivate )
bNewGblDefs
=
false
;
bNewGblDefs
=
false
;
}
}
Next
();
Next
();
DefProc
(
sal_T
rue
,
bPrivate
);
DefProc
(
t
rue
,
bPrivate
);
break
;
break
;
default
:
{
default
:
{
if
(
!
pProc
)
if
(
!
pProc
)
...
...
basic/source/comp/io.cxx
Dosyayı görüntüle @
a8647dd0
...
@@ -22,9 +22,9 @@
...
@@ -22,9 +22,9 @@
// test if there's an I/O channel
// test if there's an I/O channel
sal_Bool
SbiParser
::
Channel
(
sal_B
ool
bAlways
)
bool
SbiParser
::
Channel
(
b
ool
bAlways
)
{
{
sal_Bool
bRes
=
sal_F
alse
;
bool
bRes
=
f
alse
;
Peek
();
Peek
();
if
(
IsHash
()
)
if
(
IsHash
()
)
{
{
...
@@ -33,7 +33,7 @@ sal_Bool SbiParser::Channel( sal_Bool bAlways )
...
@@ -33,7 +33,7 @@ sal_Bool SbiParser::Channel( sal_Bool bAlways )
Next
();
Next
();
aExpr
.
Gen
();
aExpr
.
Gen
();
aGen
.
Gen
(
_CHANNEL
);
aGen
.
Gen
(
_CHANNEL
);
bRes
=
sal_T
rue
;
bRes
=
t
rue
;
}
}
else
if
(
bAlways
)
else
if
(
bAlways
)
Error
(
SbERR_EXPECTED
,
"#"
);
Error
(
SbERR_EXPECTED
,
"#"
);
...
@@ -45,7 +45,7 @@ sal_Bool SbiParser::Channel( sal_Bool bAlways )
...
@@ -45,7 +45,7 @@ sal_Bool SbiParser::Channel( sal_Bool bAlways )
void
SbiParser
::
Print
()
void
SbiParser
::
Print
()
{
{
sal_B
ool
bChan
=
Channel
();
b
ool
bChan
=
Channel
();
while
(
!
bAbort
)
while
(
!
bAbort
)
{
{
...
@@ -76,7 +76,7 @@ void SbiParser::Print()
...
@@ -76,7 +76,7 @@ void SbiParser::Print()
void
SbiParser
::
Write
()
void
SbiParser
::
Write
()
{
{
sal_B
ool
bChan
=
Channel
();
b
ool
bChan
=
Channel
();
while
(
!
bAbort
)
while
(
!
bAbort
)
{
{
...
@@ -128,7 +128,7 @@ void SbiParser::Line()
...
@@ -128,7 +128,7 @@ void SbiParser::Line()
void
SbiParser
::
LineInput
()
void
SbiParser
::
LineInput
()
{
{
Channel
(
sal_T
rue
);
Channel
(
t
rue
);
SbiExpression
*
pExpr
=
new
SbiExpression
(
this
,
SbOPERAND
);
SbiExpression
*
pExpr
=
new
SbiExpression
(
this
,
SbOPERAND
);
if
(
!
pExpr
->
IsVariable
()
)
if
(
!
pExpr
->
IsVariable
()
)
Error
(
SbERR_VAR_EXPECTED
);
Error
(
SbERR_VAR_EXPECTED
);
...
@@ -145,7 +145,7 @@ void SbiParser::LineInput()
...
@@ -145,7 +145,7 @@ void SbiParser::LineInput()
void
SbiParser
::
Input
()
void
SbiParser
::
Input
()
{
{
aGen
.
Gen
(
_RESTART
);
aGen
.
Gen
(
_RESTART
);
Channel
(
sal_T
rue
);
Channel
(
t
rue
);
SbiExpression
*
pExpr
=
new
SbiExpression
(
this
,
SbOPERAND
);
SbiExpression
*
pExpr
=
new
SbiExpression
(
this
,
SbOPERAND
);
while
(
!
bAbort
)
while
(
!
bAbort
)
{
{
...
...
basic/source/comp/parser.cxx
Dosyayı görüntüle @
a8647dd0
...
@@ -242,49 +242,49 @@ void SbiParser::Exit()
...
@@ -242,49 +242,49 @@ void SbiParser::Exit()
Error
(
SbERR_BAD_EXIT
);
Error
(
SbERR_BAD_EXIT
);
}
}
sal_Bool
SbiParser
::
TestSymbol
(
sal_B
ool
bKwdOk
)
bool
SbiParser
::
TestSymbol
(
b
ool
bKwdOk
)
{
{
Peek
();
Peek
();
if
(
eCurTok
==
SYMBOL
||
(
bKwdOk
&&
IsKwd
(
eCurTok
)
)
)
if
(
eCurTok
==
SYMBOL
||
(
bKwdOk
&&
IsKwd
(
eCurTok
)
)
)
{
{
Next
();
return
sal_T
rue
;
Next
();
return
t
rue
;
}
}
Error
(
SbERR_SYMBOL_EXPECTED
);
Error
(
SbERR_SYMBOL_EXPECTED
);
return
sal_F
alse
;
return
f
alse
;
}
}
sal_B
ool
SbiParser
::
TestToken
(
SbiToken
t
)
b
ool
SbiParser
::
TestToken
(
SbiToken
t
)
{
{
if
(
Peek
()
==
t
)
if
(
Peek
()
==
t
)
{
{
Next
();
return
sal_T
rue
;
Next
();
return
t
rue
;
}
}
else
else
{
{
Error
(
SbERR_EXPECTED
,
t
);
Error
(
SbERR_EXPECTED
,
t
);
return
sal_F
alse
;
return
f
alse
;
}
}
}
}
sal_B
ool
SbiParser
::
TestComma
()
b
ool
SbiParser
::
TestComma
()
{
{
SbiToken
eTok
=
Peek
();
SbiToken
eTok
=
Peek
();
if
(
IsEoln
(
eTok
)
)
if
(
IsEoln
(
eTok
)
)
{
{
Next
();
Next
();
return
sal_F
alse
;
return
f
alse
;
}
}
else
if
(
eTok
!=
COMMA
)
else
if
(
eTok
!=
COMMA
)
{
{
Error
(
SbERR_EXPECTED
,
COMMA
);
Error
(
SbERR_EXPECTED
,
COMMA
);
return
sal_F
alse
;
return
f
alse
;
}
}
Next
();
Next
();
return
sal_T
rue
;
return
t
rue
;
}
}
...
@@ -315,9 +315,9 @@ void SbiParser::StmntBlock( SbiToken eEnd )
...
@@ -315,9 +315,9 @@ void SbiParser::StmntBlock( SbiToken eEnd )
sal_B
ool
SbiParser
::
Parse
()
b
ool
SbiParser
::
Parse
()
{
{
if
(
bAbort
)
return
sal_F
alse
;
if
(
bAbort
)
return
f
alse
;
EnableErrors
();
EnableErrors
();
...
@@ -333,13 +333,13 @@ sal_Bool SbiParser::Parse()
...
@@ -333,13 +333,13 @@ sal_Bool SbiParser::Parse()
// can be another nGblChain, so ask for it before.
// can be another nGblChain, so ask for it before.
if
(
bNewGblDefs
&&
nGblChain
==
0
)
if
(
bNewGblDefs
&&
nGblChain
==
0
)
nGblChain
=
aGen
.
Gen
(
_JUMP
,
0
);
nGblChain
=
aGen
.
Gen
(
_JUMP
,
0
);
return
sal_F
alse
;
return
f
alse
;
}
}
if
(
IsEoln
(
eCurTok
)
)
if
(
IsEoln
(
eCurTok
)
)
{
{
Next
();
return
sal_T
rue
;
Next
();
return
t
rue
;
}
}
if
(
!
bSingleLineIf
&&
MayBeLabel
(
sal_True
)
)
if
(
!
bSingleLineIf
&&
MayBeLabel
(
sal_True
)
)
...
@@ -353,7 +353,7 @@ sal_Bool SbiParser::Parse()
...
@@ -353,7 +353,7 @@ sal_Bool SbiParser::Parse()
if
(
IsEoln
(
eCurTok
)
)
if
(
IsEoln
(
eCurTok
)
)
{
{
Next
();
return
sal_T
rue
;
Next
();
return
t
rue
;
}
}
}
}
...
@@ -366,13 +366,13 @@ sal_Bool SbiParser::Parse()
...
@@ -366,13 +366,13 @@ sal_Bool SbiParser::Parse()
Next
();
Next
();
if
(
eCurTok
!=
NIL
)
if
(
eCurTok
!=
NIL
)
aGen
.
Statement
();
aGen
.
Statement
();
return
sal_F
alse
;
return
f
alse
;
}
}
// comment?
// comment?
if
(
eCurTok
==
REM
)
if
(
eCurTok
==
REM
)
{
{
Next
();
return
sal_T
rue
;
Next
();
return
t
rue
;
}
}
// In vba it's possible to do Error.foobar ( even if it results in
// In vba it's possible to do Error.foobar ( even if it results in
...
@@ -458,7 +458,7 @@ sal_Bool SbiParser::Parse()
...
@@ -458,7 +458,7 @@ sal_Bool SbiParser::Parse()
}
}
// The parser aborts at the end, the
// The parser aborts at the end, the
// next token has not been fetched yet!
// next token has not been fetched yet!
return
sal_T
rue
;
return
t
rue
;
}
}
...
@@ -772,9 +772,9 @@ void SbiParser::Option()
...
@@ -772,9 +772,9 @@ void SbiParser::Option()
{
{
SbiToken
eTok
=
Next
();
SbiToken
eTok
=
Next
();
if
(
eTok
==
BINARY
)
if
(
eTok
==
BINARY
)
bText
=
sal_F
alse
;
bText
=
f
alse
;
else
if
(
eTok
==
SYMBOL
&&
GetSym
().
equalsIgnoreAsciiCaseAsciiL
(
RTL_CONSTASCII_STRINGPARAM
(
"text"
))
)
else
if
(
eTok
==
SYMBOL
&&
GetSym
().
equalsIgnoreAsciiCaseAsciiL
(
RTL_CONSTASCII_STRINGPARAM
(
"text"
))
)
bText
=
sal_T
rue
;
bText
=
t
rue
;
else
else
Error
(
SbERR_EXPECTED
,
"Text/Binary"
);
Error
(
SbERR_EXPECTED
,
"Text/Binary"
);
break
;
break
;
...
@@ -784,7 +784,7 @@ void SbiParser::Option()
...
@@ -784,7 +784,7 @@ void SbiParser::Option()
break
;
break
;
case
CLASSMODULE
:
case
CLASSMODULE
:
bClassModule
=
sal_T
rue
;
bClassModule
=
t
rue
;
aGen
.
GetModule
().
SetModuleType
(
com
::
sun
::
star
::
script
::
ModuleType
::
CLASS
);
aGen
.
GetModule
().
SetModuleType
(
com
::
sun
::
star
::
script
::
ModuleType
::
CLASS
);
break
;
break
;
case
VBASUPPORT
:
// Option VBASupport used to override the module mode ( in fact this must reset the mode
case
VBASUPPORT
:
// Option VBASupport used to override the module mode ( in fact this must reset the mode
...
...
basic/source/comp/symtbl.cxx
Dosyayı görüntüle @
a8647dd0
...
@@ -384,7 +384,7 @@ SbiProcDef::SbiProcDef( SbiParser* pParser, const String& rName,
...
@@ -384,7 +384,7 @@ SbiProcDef::SbiProcDef( SbiParser* pParser, const String& rName,
nLine1
=
nLine1
=
nLine2
=
0
;
nLine2
=
0
;
mePropMode
=
PROPERTY_MODE_NONE
;
mePropMode
=
PROPERTY_MODE_NONE
;
bPublic
=
sal_T
rue
;
bPublic
=
t
rue
;
bCdecl
=
sal_False
;
bCdecl
=
sal_False
;
bStatic
=
sal_False
;
bStatic
=
sal_False
;
// For return values the first element of the parameter
// For return values the first element of the parameter
...
...
basic/source/inc/namecont.hxx
Dosyayı görüntüle @
a8647dd0
...
@@ -272,7 +272,7 @@ protected:
...
@@ -272,7 +272,7 @@ protected:
const
::
rtl
::
OUString
&
aTargetURL
,
const
::
rtl
::
OUString
&
aTargetURL
,
const
::
com
::
sun
::
star
::
uno
::
Reference
<
::
com
::
sun
::
star
::
ucb
::
XSimpleFileAccess2
>
xToUseSFI
);
const
::
com
::
sun
::
star
::
uno
::
Reference
<
::
com
::
sun
::
star
::
ucb
::
XSimpleFileAccess2
>
xToUseSFI
);
sal_B
ool
implLoadLibraryIndexFile
(
SfxLibrary
*
pLib
,
b
ool
implLoadLibraryIndexFile
(
SfxLibrary
*
pLib
,
::
xmlscript
::
LibDescriptor
&
rLib
,
::
xmlscript
::
LibDescriptor
&
rLib
,
const
::
com
::
sun
::
star
::
uno
::
Reference
<
::
com
::
sun
::
star
::
embed
::
XStorage
>&
xStorage
,
const
::
com
::
sun
::
star
::
uno
::
Reference
<
::
com
::
sun
::
star
::
embed
::
XStorage
>&
xStorage
,
const
::
rtl
::
OUString
&
aIndexFileName
);
const
::
rtl
::
OUString
&
aIndexFileName
);
...
...
basic/source/inc/parser.hxx
Dosyayı görüntüle @
a8647dd0
...
@@ -45,17 +45,17 @@ class SbiParser : public SbiTokenizer
...
@@ -45,17 +45,17 @@ class SbiParser : public SbiTokenizer
SbiSymDef
*
VarDecl
(
SbiDimList
**
,
bool
,
bool
);
SbiSymDef
*
VarDecl
(
SbiDimList
**
,
bool
,
bool
);
SbiProcDef
*
ProcDecl
(
bool
bDecl
);
SbiProcDef
*
ProcDecl
(
bool
bDecl
);
void
DefStatic
(
sal_B
ool
bPrivate
);
void
DefStatic
(
b
ool
bPrivate
);
void
DefProc
(
sal_Bool
bStatic
,
sal_B
ool
bPrivate
);
// read in procedure
void
DefProc
(
bool
bStatic
,
b
ool
bPrivate
);
// read in procedure
void
DefVar
(
SbiOpcode
eOp
,
bool
bStatic
);
// read in DIM/REDIM
void
DefVar
(
SbiOpcode
eOp
,
bool
bStatic
);
// read in DIM/REDIM
void
TypeDecl
(
SbiSymDef
&
,
sal_Bool
bAsNewAlreadyParsed
=
sal_F
alse
);
// AS-declaration
void
TypeDecl
(
SbiSymDef
&
,
bool
bAsNewAlreadyParsed
=
f
alse
);
// AS-declaration
void
OpenBlock
(
SbiToken
,
SbiExprNode
*
=
NULL
);
void
OpenBlock
(
SbiToken
,
SbiExprNode
*
=
NULL
);
void
CloseBlock
();
void
CloseBlock
();
sal_Bool
Channel
(
sal_Bool
=
sal_F
alse
);
// parse channel number
bool
Channel
(
bool
bAlways
=
f
alse
);
// parse channel number
void
StmntBlock
(
SbiToken
);
void
StmntBlock
(
SbiToken
);
void
DefType
(
sal_B
ool
bPrivate
);
// Parse type declaration
void
DefType
(
b
ool
bPrivate
);
// Parse type declaration
void
DefEnum
(
sal_B
ool
bPrivate
);
// Parse enum declaration
void
DefEnum
(
b
ool
bPrivate
);
// Parse enum declaration
void
DefDeclare
(
sal_B
ool
bPrivate
);
void
DefDeclare
(
b
ool
bPrivate
);
void
EnableCompatibility
();
void
EnableCompatibility
();
public
:
public
:
SbxArrayRef
rTypeArray
;
SbxArrayRef
rTypeArray
;
...
@@ -70,15 +70,15 @@ public:
...
@@ -70,15 +70,15 @@ public:
SbiSymPool
*
pPool
;
SbiSymPool
*
pPool
;
SbiExprType
eCurExpr
;
SbiExprType
eCurExpr
;
short
nBase
;
// OPTION BASE-value
short
nBase
;
// OPTION BASE-value
sal_B
ool
bText
;
// OPTION COMPARE TEXT
b
ool
bText
;
// OPTION COMPARE TEXT
bool
bExplicit
;
// true: OPTION EXPLICIT
bool
bExplicit
;
// true: OPTION EXPLICIT
sal_Bool
bClassModule
;
// sal_T
rue: OPTION ClassModule
bool
bClassModule
;
// t
rue: OPTION ClassModule
StringVector
aIfaceVector
;
// Holds all interfaces implemented by a class module
StringVector
aIfaceVector
;
// Holds all interfaces implemented by a class module
StringVector
aRequiredTypes
;
// Types used in Dim As New <type> outside subs
StringVector
aRequiredTypes
;
// Types used in Dim As New <type> outside subs
SbxDataType
eDefTypes
[
26
];
// DEFxxx data types
SbxDataType
eDefTypes
[
26
];
// DEFxxx data types
SbiParser
(
StarBASIC
*
,
SbModule
*
);
SbiParser
(
StarBASIC
*
,
SbModule
*
);
sal_B
ool
Parse
();
b
ool
Parse
();
SbiExprNode
*
GetWithVar
();
SbiExprNode
*
GetWithVar
();
// from 31.3.1996, search symbol in the runtime-library
// from 31.3.1996, search symbol in the runtime-library
...
@@ -87,9 +87,9 @@ public:
...
@@ -87,9 +87,9 @@ public:
bool
HasGlobalCode
();
bool
HasGlobalCode
();
sal_B
ool
TestToken
(
SbiToken
);
b
ool
TestToken
(
SbiToken
);
sal_Bool
TestSymbol
(
sal_Bool
=
sal_F
alse
);
bool
TestSymbol
(
bool
bKwdOk
=
f
alse
);
sal_B
ool
TestComma
();
b
ool
TestComma
();
void
TestEoln
();
void
TestEoln
();
void
Symbol
(
const
KeywordSymbolInfo
*
pKeywordSymbolInfo
=
NULL
);
// let or call
void
Symbol
(
const
KeywordSymbolInfo
*
pKeywordSymbolInfo
=
NULL
);
// let or call
...
...
basic/source/inc/symtbl.hxx
Dosyayı görüntüle @
a8647dd0
...
@@ -181,7 +181,7 @@ class SbiProcDef : public SbiSymDef { // procedure definition (from basic):
...
@@ -181,7 +181,7 @@ class SbiProcDef : public SbiSymDef { // procedure definition (from basic):
PropertyMode
mePropMode
;
// Marks if this is a property procedure and which
PropertyMode
mePropMode
;
// Marks if this is a property procedure and which
String
maPropName
;
// Property name if property procedure (!= proc name)
String
maPropName
;
// Property name if property procedure (!= proc name)
sal_Bool
bCdecl
:
1
;
// sal_True: CDECL given
sal_Bool
bCdecl
:
1
;
// sal_True: CDECL given
sal_Bool
bPublic
:
1
;
// sal_T
rue: proc is PUBLIC
bool
bPublic
:
1
;
// t
rue: proc is PUBLIC
sal_Bool
mbProcDecl
:
1
;
// sal_True: instanciated by SbiParser::ProcDecl
sal_Bool
mbProcDecl
:
1
;
// sal_True: instanciated by SbiParser::ProcDecl
public
:
public
:
SbiProcDef
(
SbiParser
*
,
const
String
&
,
sal_Bool
bProcDecl
=
false
);
SbiProcDef
(
SbiParser
*
,
const
String
&
,
sal_Bool
bProcDecl
=
false
);
...
@@ -193,8 +193,8 @@ public:
...
@@ -193,8 +193,8 @@ public:
SbiSymPool
&
GetLocals
()
{
return
GetPool
();}
SbiSymPool
&
GetLocals
()
{
return
GetPool
();}
String
&
GetLib
()
{
return
aLibName
;
}
String
&
GetLib
()
{
return
aLibName
;
}
String
&
GetAlias
()
{
return
aAlias
;
}
String
&
GetAlias
()
{
return
aAlias
;
}
void
SetPublic
(
sal_B
ool
b
)
{
bPublic
=
b
;
}
void
SetPublic
(
b
ool
b
)
{
bPublic
=
b
;
}
sal_B
ool
IsPublic
()
const
{
return
bPublic
;
}
b
ool
IsPublic
()
const
{
return
bPublic
;
}
void
SetCdecl
(
sal_Bool
b
=
sal_True
)
{
bCdecl
=
b
;
}
void
SetCdecl
(
sal_Bool
b
=
sal_True
)
{
bCdecl
=
b
;
}
sal_Bool
IsCdecl
()
const
{
return
bCdecl
;
}
sal_Bool
IsCdecl
()
const
{
return
bCdecl
;
}
sal_Bool
IsUsedForProcDecl
()
const
{
return
mbProcDecl
;
}
sal_Bool
IsUsedForProcDecl
()
const
{
return
mbProcDecl
;
}
...
...
basic/source/uno/namecont.cxx
Dosyayı görüntüle @
a8647dd0
...
@@ -662,7 +662,7 @@ void SfxLibraryContainer::init_Impl( const OUString& rInitialDocumentURL,
...
@@ -662,7 +662,7 @@ void SfxLibraryContainer::init_Impl( const OUString& rInitialDocumentURL,
uno
::
Reference
<
io
::
XInputStream
>
xInput
;
uno
::
Reference
<
io
::
XInputStream
>
xInput
;
mxStorage
=
xStorage
;
mxStorage
=
xStorage
;
sal_B
ool
bStorage
=
mxStorage
.
is
();
b
ool
bStorage
=
mxStorage
.
is
();
// #110009: Scope to force the StorageRefs to be destructed and
// #110009: Scope to force the StorageRefs to be destructed and
...
@@ -904,7 +904,7 @@ void SfxLibraryContainer::init_Impl( const OUString& rInitialDocumentURL,
...
@@ -904,7 +904,7 @@ void SfxLibraryContainer::init_Impl( const OUString& rInitialDocumentURL,
if
(
!
pImplLib
->
mbInitialised
&&
(
!
bStorage
||
xLibraryStor
.
is
())
)
if
(
!
pImplLib
->
mbInitialised
&&
(
!
bStorage
||
xLibraryStor
.
is
())
)
{
{
OUString
aIndexFileName
;
OUString
aIndexFileName
;
sal_B
ool
bLoaded
=
implLoadLibraryIndexFile
(
pImplLib
,
rLib
,
xLibraryStor
,
aIndexFileName
);
b
ool
bLoaded
=
implLoadLibraryIndexFile
(
pImplLib
,
rLib
,
xLibraryStor
,
aIndexFileName
);
SAL_WARN_IF
(
SAL_WARN_IF
(
bLoaded
&&
aLibName
!=
rLib
.
aName
,
"basic"
,
bLoaded
&&
aLibName
!=
rLib
.
aName
,
"basic"
,
(
"Different library names in library container and"
(
"Different library names in library container and"
...
@@ -1150,7 +1150,7 @@ void SfxLibraryContainer::init_Impl( const OUString& rInitialDocumentURL,
...
@@ -1150,7 +1150,7 @@ void SfxLibraryContainer::init_Impl( const OUString& rInitialDocumentURL,
uno
::
Reference
<
embed
::
XStorage
>
xDummyStor
;
uno
::
Reference
<
embed
::
XStorage
>
xDummyStor
;
::
xmlscript
::
LibDescriptor
aLibDesc
;
::
xmlscript
::
LibDescriptor
aLibDesc
;
/*sal_Bool bReadIndexFile =*/
implLoadLibraryIndexFile
implLoadLibraryIndexFile
(
pNewLib
,
aLibDesc
,
xDummyStor
,
pNewLib
->
maLibInfoFileURL
);
(
pNewLib
,
aLibDesc
,
xDummyStor
,
pNewLib
->
maLibInfoFileURL
);
implImportLibDescriptor
(
pNewLib
,
aLibDesc
);
implImportLibDescriptor
(
pNewLib
,
aLibDesc
);
}
}
...
@@ -1356,7 +1356,7 @@ void SfxLibraryContainer::implStoreLibrary( SfxLibrary* pLib,
...
@@ -1356,7 +1356,7 @@ void SfxLibraryContainer::implStoreLibrary( SfxLibrary* pLib,
const
Reference
<
XInteractionHandler
>&
xHandler
)
const
Reference
<
XInteractionHandler
>&
xHandler
)
{
{
sal_Bool
bLink
=
pLib
->
mbLink
;
sal_Bool
bLink
=
pLib
->
mbLink
;
sal_B
ool
bStorage
=
xStorage
.
is
()
&&
!
bLink
;
b
ool
bStorage
=
xStorage
.
is
()
&&
!
bLink
;
Sequence
<
OUString
>
aElementNames
=
pLib
->
getElementNames
();
Sequence
<
OUString
>
aElementNames
=
pLib
->
getElementNames
();
sal_Int32
nNameCount
=
aElementNames
.
getLength
();
sal_Int32
nNameCount
=
aElementNames
.
getLength
();
...
@@ -1512,7 +1512,7 @@ void SfxLibraryContainer::implStoreLibraryIndexFile( SfxLibrary* pLib,
...
@@ -1512,7 +1512,7 @@ void SfxLibraryContainer::implStoreLibraryIndexFile( SfxLibrary* pLib,
}
}
sal_Bool
bLink
=
pLib
->
mbLink
;
sal_Bool
bLink
=
pLib
->
mbLink
;
sal_B
ool
bStorage
=
xStorage
.
is
()
&&
!
bLink
;
b
ool
bStorage
=
xStorage
.
is
()
&&
!
bLink
;
// Write info file
// Write info file
uno
::
Reference
<
io
::
XOutputStream
>
xOut
;
uno
::
Reference
<
io
::
XOutputStream
>
xOut
;
...
@@ -1601,7 +1601,7 @@ void SfxLibraryContainer::implStoreLibraryIndexFile( SfxLibrary* pLib,
...
@@ -1601,7 +1601,7 @@ void SfxLibraryContainer::implStoreLibraryIndexFile( SfxLibrary* pLib,
}
}
sal_B
ool
SfxLibraryContainer
::
implLoadLibraryIndexFile
(
SfxLibrary
*
pLib
,
b
ool
SfxLibraryContainer
::
implLoadLibraryIndexFile
(
SfxLibrary
*
pLib
,
::
xmlscript
::
LibDescriptor
&
rLib
,
const
uno
::
Reference
<
embed
::
XStorage
>&
xStorage
,
const
OUString
&
aIndexFileName
)
::
xmlscript
::
LibDescriptor
&
rLib
,
const
uno
::
Reference
<
embed
::
XStorage
>&
xStorage
,
const
OUString
&
aIndexFileName
)
{
{
Reference
<
XParser
>
xParser
(
mxMSF
->
createInstance
(
Reference
<
XParser
>
xParser
(
mxMSF
->
createInstance
(
...
@@ -1609,11 +1609,11 @@ sal_Bool SfxLibraryContainer::implLoadLibraryIndexFile( SfxLibrary* pLib,
...
@@ -1609,11 +1609,11 @@ sal_Bool SfxLibraryContainer::implLoadLibraryIndexFile( SfxLibrary* pLib,
if
(
!
xParser
.
is
()
)
if
(
!
xParser
.
is
()
)
{
{
SAL_WARN
(
"basic"
,
"couldn't create sax parser component"
);
SAL_WARN
(
"basic"
,
"couldn't create sax parser component"
);
return
sal_F
alse
;
return
f
alse
;
}
}
sal_Bool
bLink
=
sal_False
;
sal_Bool
bLink
=
sal_False
;
sal_Bool
bStorage
=
sal_F
alse
;
bool
bStorage
=
f
alse
;
if
(
pLib
)
if
(
pLib
)
{
{
bLink
=
pLib
->
mbLink
;
bLink
=
pLib
->
mbLink
;
...
@@ -1666,7 +1666,7 @@ sal_Bool SfxLibraryContainer::implLoadLibraryIndexFile( SfxLibrary* pLib,
...
@@ -1666,7 +1666,7 @@ sal_Bool SfxLibraryContainer::implLoadLibraryIndexFile( SfxLibrary* pLib,
}
}
if
(
!
xInput
.
is
()
)
if
(
!
xInput
.
is
()
)
{
{
return
sal_F
alse
;
return
f
alse
;
}
}
InputSource
source
;
InputSource
source
;
...
@@ -1684,7 +1684,7 @@ sal_Bool SfxLibraryContainer::implLoadLibraryIndexFile( SfxLibrary* pLib,
...
@@ -1684,7 +1684,7 @@ sal_Bool SfxLibraryContainer::implLoadLibraryIndexFile( SfxLibrary* pLib,
SfxErrorContext
aEc
(
ERRCTX_SFX_LOADBASIC
,
aLibInfoPath
);
SfxErrorContext
aEc
(
ERRCTX_SFX_LOADBASIC
,
aLibInfoPath
);
sal_uIntPtr
nErrorCode
=
ERRCODE_IO_GENERAL
;
sal_uIntPtr
nErrorCode
=
ERRCODE_IO_GENERAL
;
ErrorHandler
::
HandleError
(
nErrorCode
);
ErrorHandler
::
HandleError
(
nErrorCode
);
return
sal_F
alse
;
return
f
alse
;
}
}
if
(
!
pLib
)
if
(
!
pLib
)
...
@@ -1699,7 +1699,7 @@ sal_Bool SfxLibraryContainer::implLoadLibraryIndexFile( SfxLibrary* pLib,
...
@@ -1699,7 +1699,7 @@ sal_Bool SfxLibraryContainer::implLoadLibraryIndexFile( SfxLibrary* pLib,
implImportLibDescriptor
(
pLib
,
rLib
);
implImportLibDescriptor
(
pLib
,
rLib
);
}
}
return
sal_T
rue
;
return
t
rue
;
}
}
void
SfxLibraryContainer
::
implImportLibDescriptor
void
SfxLibraryContainer
::
implImportLibDescriptor
...
@@ -1746,7 +1746,7 @@ void SfxLibraryContainer::storeLibraries_Impl( const uno::Reference< embed::XSto
...
@@ -1746,7 +1746,7 @@ void SfxLibraryContainer::storeLibraries_Impl( const uno::Reference< embed::XSto
boost
::
scoped_ptr
<
::
xmlscript
::
LibDescriptorArray
>
pLibArray
(
new
::
xmlscript
::
LibDescriptorArray
(
nLibsToSave
));
boost
::
scoped_ptr
<
::
xmlscript
::
LibDescriptorArray
>
pLibArray
(
new
::
xmlscript
::
LibDescriptorArray
(
nLibsToSave
));
// Write to storage?
// Write to storage?
sal_B
ool
bStorage
=
i_rStorage
.
is
();
b
ool
bStorage
=
i_rStorage
.
is
();
uno
::
Reference
<
embed
::
XStorage
>
xSourceLibrariesStor
;
uno
::
Reference
<
embed
::
XStorage
>
xSourceLibrariesStor
;
uno
::
Reference
<
embed
::
XStorage
>
xTargetLibrariesStor
;
uno
::
Reference
<
embed
::
XStorage
>
xTargetLibrariesStor
;
::
rtl
::
OUString
sTempTargetStorName
;
::
rtl
::
OUString
sTempTargetStorName
;
...
@@ -2153,7 +2153,7 @@ Reference< XNameAccess > SAL_CALL SfxLibraryContainer::createLibraryLink
...
@@ -2153,7 +2153,7 @@ Reference< XNameAccess > SAL_CALL SfxLibraryContainer::createLibraryLink
OUString
aInitFileName
;
OUString
aInitFileName
;
uno
::
Reference
<
embed
::
XStorage
>
xDummyStor
;
uno
::
Reference
<
embed
::
XStorage
>
xDummyStor
;
::
xmlscript
::
LibDescriptor
aLibDesc
;
::
xmlscript
::
LibDescriptor
aLibDesc
;
/*sal_Bool bReadIndexFile = */
implLoadLibraryIndexFile
(
pNewLib
,
aLibDesc
,
xDummyStor
,
aInitFileName
);
implLoadLibraryIndexFile
(
pNewLib
,
aLibDesc
,
xDummyStor
,
aInitFileName
);
implImportLibDescriptor
(
pNewLib
,
aLibDesc
);
implImportLibDescriptor
(
pNewLib
,
aLibDesc
);
Reference
<
XNameAccess
>
xRet
=
static_cast
<
XNameAccess
*
>
(
pNewLib
);
Reference
<
XNameAccess
>
xRet
=
static_cast
<
XNameAccess
*
>
(
pNewLib
);
...
@@ -2272,7 +2272,7 @@ void SAL_CALL SfxLibraryContainer::loadLibrary( const OUString& Name )
...
@@ -2272,7 +2272,7 @@ void SAL_CALL SfxLibraryContainer::loadLibrary( const OUString& Name )
}
}
sal_Bool
bLink
=
pImplLib
->
mbLink
;
sal_Bool
bLink
=
pImplLib
->
mbLink
;
sal_B
ool
bStorage
=
mxStorage
.
is
()
&&
!
bLink
;
b
ool
bStorage
=
mxStorage
.
is
()
&&
!
bLink
;
uno
::
Reference
<
embed
::
XStorage
>
xLibrariesStor
;
uno
::
Reference
<
embed
::
XStorage
>
xLibrariesStor
;
uno
::
Reference
<
embed
::
XStorage
>
xLibraryStor
;
uno
::
Reference
<
embed
::
XStorage
>
xLibraryStor
;
...
@@ -2464,7 +2464,7 @@ void SAL_CALL SfxLibraryContainer::renameLibrary( const OUString& Name, const OU
...
@@ -2464,7 +2464,7 @@ void SAL_CALL SfxLibraryContainer::renameLibrary( const OUString& Name, const OU
bool
bMovedSuccessful
=
true
;
bool
bMovedSuccessful
=
true
;
// Rename files
// Rename files
sal_B
ool
bStorage
=
mxStorage
.
is
();
b
ool
bStorage
=
mxStorage
.
is
();
if
(
!
bStorage
&&
!
pImplLib
->
mbLink
)
if
(
!
bStorage
&&
!
pImplLib
->
mbLink
)
{
{
bMovedSuccessful
=
false
;
bMovedSuccessful
=
false
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment