diff options
author | Andreas Bregas <ab@openoffice.org> | 2002-08-12 10:57:34 +0000 |
---|---|---|
committer | Andreas Bregas <ab@openoffice.org> | 2002-08-12 10:57:34 +0000 |
commit | ced75fcef9ea06f6bc92704c04a2cc2e5881ca8d (patch) | |
tree | a14639e35b30b155132f22f542e34f3e88bf54b3 /basic/source/comp | |
parent | 8537df8d1c14b8b0e00aed2be6bd54ce0155bbc0 (diff) |
#100027# New ProcDecl flag in class SbiProcDef
Diffstat (limited to 'basic/source/comp')
-rw-r--r-- | basic/source/comp/symtbl.cxx | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/basic/source/comp/symtbl.cxx b/basic/source/comp/symtbl.cxx index f61271482dd7..7535fd9d817d 100644 --- a/basic/source/comp/symtbl.cxx +++ b/basic/source/comp/symtbl.cxx @@ -2,9 +2,9 @@ * * $RCSfile: symtbl.cxx,v $ * - * $Revision: 1.3 $ + * $Revision: 1.4 $ * - * last change: $Author: mh $ $Date: 2001-10-17 18:53:05 $ + * last change: $Author: ab $ $Date: 2002-08-12 11:57:34 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -428,10 +428,12 @@ SbiSymScope SbiSymDef::GetScope() const // 2) pPool: saemtliche lokale Variable // 3) aLabels: Labels -SbiProcDef::SbiProcDef( SbiParser* pParser, const String& rName ) - : SbiSymDef( rName ), - aParams( pParser->aGblStrings, SbPARAM ), // wird gedumpt - aLabels( pParser->aLclStrings, SbLOCAL ) // wird nicht gedumpt +SbiProcDef::SbiProcDef( SbiParser* pParser, const String& rName, + BOOL bProcDecl ) + : SbiSymDef( rName ) + , aParams( pParser->aGblStrings, SbPARAM ) // wird gedumpt + , aLabels( pParser->aLclStrings, SbLOCAL ) // wird nicht gedumpt + , mbProcDecl( bProcDecl ) { aParams.SetParent( &pParser->aPublics ); pPool = new SbiSymPool( pParser->aGblStrings, SbLOCAL ); // Locals |