Unit BSParser

Classes

TMathParser - TokenRec

Functions

Register - Shift

Types

ErrorRange
TGetVarEvent
TokenRec
TokenTypes
TParseErrorEvent

Constants

ErrBadRange
ErrExpression
ErrInvalidNum
ErrOpCloseParen
ErrOpenParen
ErrOperator
ErrParserStack
ExpLimit
MaxExpLen
MaxFuncNameLen
ParserStackSize
SqrLimit
TotalErrors

Variables


Functions


procedure Register;

Shift

Types


ErrorRange = 0..TotalErrors

TGetVarEvent = procedure(Sender : TObject; VarName : string; var
    Value : Extended; var Found : Boolean) of object
Renamed from Parser.pas 6/20/1998 Paul Rice to avoid conflicts with others' work. Expression Evaluator v1.4 for Delphi } { (16 & 32 bits) } { } { Copyright © 1997 by BitSoft Development, L.L.C. } { All rights reserved } { } { Web: http://www.bitsoft.com } { E-mail: info@bitsoft.com } { Support: tech-support@bitsoft.com } {--------------------------------------------------------------------------} { Portions Copyright © 1992 by Borland International, Inc. } { All rights reserved } {--------------------------------------------------------------------------} { This file is distributed as freeware and without warranties of any kind. } { You can use it in your own applications at your own risk. } { See the License Agreement for more information. } {==========================================================================
TokenRec = record
State : Byte;
end;

TokenTypes = (Plus, Minus, Times, Divide, Expo, OParen, CParen, Num,
                Func, EOL, Bad, ERR, Modu);

TParseErrorEvent = procedure(Sender : TObject; ParseError : Integer)
    of object

Constants

ErrBadRange = 2

ErrExpression = 3

ErrInvalidNum = 7

ErrOpCloseParen = 6

ErrOpenParen = 5

ErrOperator = 4

ErrParserStack = 1

ExpLimit = 11356

MaxExpLen = 4

MaxFuncNameLen = 5

ParserStackSize = 15

SqrLimit = 1E2466

TotalErrors = 7


Variables