2009-09-10 10:13:43 +0200 jsk r276023 : Test Cases for #i103691, #i103697, #i103990 2009-09-03 15:42:36 +0200 ab r275754 : #i103990# Removed warning 2009-09-03 09:02:32 +0200 ab r275744 : CWS-TOOLING: rebase CWS ab74 to trunk@275331 (milestone: DEV300:m56) 2009-09-02 17:14:42 +0200 ab r275724 : #i103697# Applied patch 2009-08-27 15:11:50 +0200 ab r275488 : #i103354# Check Lucene index file to be named _0.cfs, fail otherwise 2009-08-26 08:57:21 +0200 ab r275393 : #i104354# Changed loop variable type to avoid Solaris Intel compiler optimizer bug 2009-08-17 14:17:32 +0200 ab r275053 : #i73263# Adapted breakpoint dialog to longer strings 2009-08-13 17:09:30 +0200 ab r274951 : #i103691# Fix empty comparison behaviour 2009-08-13 13:03:28 +0200 ab r274935 : #i103948# Applied patch 2009-08-13 12:31:15 +0200 ab r274931 : #i103134# Patch: Always set default property 2009-08-13 11:02:50 +0200 ab r274926 : #i103990# Support arrays in user types 2009-07-21 11:16:54 +0200 ab r274171 : #i102816# Make sure LocaleItem is loaded before copying from it 2009-07-20 14:56:35 +0200 ab r274139 : #i102816# Use default language as final fallback in service implementation
155 lines
6.4 KiB
C++
155 lines
6.4 KiB
C++
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2008 by Sun Microsystems, Inc.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* $RCSfile: parser.hxx,v $
|
|
* $Revision: 1.12 $
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Lesser General Public License version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
#ifndef _PARSER_HXX
|
|
#define _PARSER_HXX
|
|
|
|
#include "expr.hxx"
|
|
#include "codegen.hxx"
|
|
#include "symtbl.hxx"
|
|
|
|
|
|
#include <vector>
|
|
typedef ::std::vector< String > IfaceVector;
|
|
|
|
struct SbiParseStack;
|
|
|
|
class SbiParser : public SbiTokenizer
|
|
{
|
|
friend class SbiExpression;
|
|
|
|
SbiParseStack* pStack; // Block-Stack
|
|
SbiProcDef* pProc; // aktuelle Prozedur
|
|
SbiExprNode* pWithVar; // aktuelle With-Variable
|
|
SbiToken eEndTok; // das Ende-Token
|
|
UINT32 nGblChain; // Chainkette fuer globale DIMs
|
|
BOOL bGblDefs; // TRUE globale Definitionen allgemein
|
|
BOOL bNewGblDefs; // TRUE globale Definitionen vor Sub
|
|
BOOL bSingleLineIf; // TRUE einzeiliges if-Statement
|
|
|
|
SbiSymDef* VarDecl( SbiDimList**,BOOL,BOOL );// Variablen-Deklaration
|
|
SbiProcDef* ProcDecl(BOOL bDecl);// Prozedur-Deklaration
|
|
void DefStatic( BOOL bPrivate );
|
|
void DefProc( BOOL bStatic, BOOL bPrivate ); // Prozedur einlesen
|
|
void DefVar( SbiOpcode eOp, BOOL bStatic ); // DIM/REDIM einlesen
|
|
void TypeDecl( SbiSymDef&, BOOL bAsNewAlreadyParsed=FALSE ); // AS-Deklaration
|
|
void OpenBlock( SbiToken, SbiExprNode* = NULL ); // Block oeffnen
|
|
void CloseBlock(); // Block aufloesen
|
|
BOOL Channel( BOOL=FALSE ); // Kanalnummer parsen
|
|
void StmntBlock( SbiToken ); // Statement-Block abarbeiten
|
|
void DefType( BOOL bPrivate ); // Parse type declaration
|
|
void DefEnum( BOOL bPrivate ); // Parse enum declaration
|
|
void DefDeclare( BOOL bPrivate );
|
|
void EnableCompatibility();
|
|
public:
|
|
SbxArrayRef rTypeArray; // das Type-Array
|
|
SbxArrayRef rEnumArray; // Enum types
|
|
SbiStringPool aGblStrings; // der String-Pool
|
|
SbiStringPool aLclStrings; // der String-Pool
|
|
SbiSymPool aGlobals; // globale Variable
|
|
SbiSymPool aPublics; // modulglobale Variable
|
|
SbiSymPool aRtlSyms; // Runtime-Library
|
|
SbiCodeGen aGen; // Code-Generator
|
|
StarBASIC* pBasic; // StarBASIC-Instanz
|
|
SbiSymPool* pPool; // aktueller Pool
|
|
SbiExprType eCurExpr; // aktueller Expr-Typ
|
|
short nBase; // OPTION BASE-Wert
|
|
BOOL bText; // OPTION COMPARE TEXT
|
|
BOOL bExplicit; // TRUE: OPTION EXPLICIT
|
|
BOOL bClassModule; // TRUE: OPTION ClassModule
|
|
IfaceVector aIfaceVector; // Holds all interfaces implemented by a class module
|
|
SbxDataType eDefTypes[26]; // DEFxxx-Datentypen
|
|
|
|
SbiParser( StarBASIC*, SbModule* );
|
|
BOOL Parse(); // die Aktion
|
|
SbiExprNode* GetWithVar(); // Innerste With-Variable liefern
|
|
|
|
// AB 31.3.1996, Symbol in Runtime-Library suchen
|
|
SbiSymDef* CheckRTLForSym( const String& rSym, SbxDataType eType );
|
|
void AddConstants( void );
|
|
|
|
BOOL HasGlobalCode(); // Globaler Code definiert?
|
|
|
|
BOOL TestToken( SbiToken ); // bestimmtes TOken?
|
|
BOOL TestSymbol( BOOL=FALSE ); // Symbol?
|
|
BOOL TestComma(); // Komma oder EOLN?
|
|
void TestEoln(); // EOLN?
|
|
|
|
void Symbol(); // Let oder Call
|
|
void ErrorStmnt(); // ERROR n
|
|
void NotImp(); // nicht implementiert
|
|
void BadBlock(); // LOOP/WEND/NEXT
|
|
void BadSyntax(); // Falsches SbiToken
|
|
void NoIf(); // ELSE/ELSE IF ohne IF
|
|
void Assign(); // LET
|
|
void Call(); // CALL
|
|
void Close(); // CLOSE
|
|
void Declare(); // DECLARE
|
|
void DefXXX(); // DEFxxx
|
|
void Dim(); // DIM
|
|
void ReDim(); // ReDim();
|
|
void Erase(); // ERASE
|
|
void Exit(); // EXIT
|
|
void For(); // FOR...NEXT
|
|
void Goto(); // GOTO / GOSUB
|
|
void If(); // IF
|
|
void Implements(); // IMPLEMENTS
|
|
void Input(); // INPUT, INPUT #
|
|
void LineInput(); // LINE INPUT, LINE INPUT #
|
|
void LSet(); // LSET
|
|
void Name(); // NAME .. AS ..
|
|
void On(); // ON ERROR/variable
|
|
void OnGoto(); // ON...GOTO / GOSUB
|
|
void Open(); // OPEN
|
|
void Option(); // OPTION
|
|
void Print(); // PRINT, PRINT #
|
|
void SubFunc(); // SUB / FUNCTION
|
|
void Resume(); // RESUME
|
|
void Return(); // RETURN
|
|
void RSet(); // RSET
|
|
void DoLoop(); // DO...LOOP
|
|
void Select(); // SELECT ... CASE
|
|
void Set(); // SET
|
|
void Static(); // STATIC
|
|
void Stop(); // STOP/SYSTEM
|
|
void Type(); // TYPE...AS...END TYPE
|
|
void Enum(); // TYPE...END ENUM
|
|
void While(); // WHILE/WEND
|
|
void With(); // WITH
|
|
void Write(); // WRITE
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#endif
|