DEFINITION MODULE Parser;

TYPE
  AstConstantDeclaration = RECORD
  END;
  PAstConstantDeclaration = POINTER TO AstConstantDeclaration;
  PPAstConstantDeclaration = POINTER TO PAstConstantDeclaration;

  AstTypeExpression = RECORD
  END;
  PAstTypeExpression = POINTER TO AstTypeExpression;

  AstTypeDeclaration = RECORD
    identifier: ARRAY[1..256] OF CHAR;
    type_expression: PAstTypeExpression
  END;
  PAstTypeDeclaration = POINTER TO AstTypeDeclaration;
  PPAstTypeDeclaration = POINTER TO PAstTypeDeclaration;

  AstVariableDeclaration = RECORD
  END;
  PAstVariableDeclaration = POINTER TO AstVariableDeclaration;
  PPAstVariableDeclaration = POINTER TO PAstVariableDeclaration;

  AstModule = RECORD
    constants: PPAstConstantDeclaration;
    types: PPAstTypeDeclaration;
    variables: PPAstVariableDeclaration
  END;
  PAstModule = POINTER TO AstModule;

END Parser.