Re: Newbie question

[Georg Bauhaus <rm.dash-bauhaus@futureapps.de>]

Olivier Scalbert schrieb:

> But I can not have an empty square !

You can have an empty square. Just say so :-)
Yet another option might be this one:


   type Color_T is (White, Black, Transparent);

   type PieceType_T is
     (Pawn, Knight, Bishop, Rook, Queen, King, Ghost);

   type Piece_T is record
      Color: Color_T;
      PieceType: PieceType_T;
   end record;

   type Square_Index is range 1 .. 64;
   type Board_T is array(Square_Index) of Piece_T;

   Empty_Square: constant Piece_T :=
     (Color => Transparent,
      PieceType => Ghost);


The distinction between empty square or figure is thus
moved from a variant record to testing for a special,
colorless ghost.