TTitanPascalParser

type TTitanPascalParser = class(TTitanParser)

public

  function IsConstant; override;

  constructor Create; override;

  destructor Destroy; override;

  procedure Reset; override;

  procedure Call_SCANNER; override;

  function IsBaseType(); override;

  function Parse_OverloadableOperator; override;

  function Parse_EvalExpression; override;

  function Parse_ArgumentExpression; override;

  function Parse_ConstExpr;

  function Parse_Expression;

  function Parse_SimpleExpression;

  function Parse_Term;

  function Parse_Factor;

  function Parse_Designator();

  function Parse_QualID;

  function Parse_UnitID;

  function Parse_TypeID;

  function Parse_SetConstructor;

  function Parse_SetElement;

  procedure Parse_Statement;

  procedure Parse_StmtList; override;

  procedure Parse_SimpleStatement;

  procedure Parse_CompoundStmt;

  procedure Parse_IfStmt;

  procedure Parse_CaseStmt;

  procedure Parse_RepeatStmt;

  procedure Parse_WhileStmt;

  procedure Parse_ForStmt;

  procedure Parse_BreakStmt;

  procedure Parse_ContinueStmt;

  procedure Parse_ExitStmt;

  procedure Parse_LabelStmt;

  procedure Parse_HaltStmt;

  procedure Parse_WithStmt;

  procedure Parse_TryStmt;

  procedure Parse_RaiseStmt;

  procedure Parse_ProgramStmt;

  procedure Parse_UnitStmt;

  function Parse_FunctionStmt();

  procedure Parse_VarStmt();

  function Parse_VariableDeclaration();

  function Parse_ClassStmt();

  function Parse_EnumStmt();

  procedure Parse_NamespaceStmt();

  procedure Parse_TypeStmt;

  procedure Parse_ArrayStmt();

  procedure Parse_DynamicArrayType();

  procedure Parse_Program; override;

end;

TTitanPascalParser

TTitanParser

TObject