constant arrays of type string

23 Feb 1997 17:47:00 +0200

Hello gpc,


this is from info file gpc.8 but I can't compile this,
I need string array constants:

program str_arr;

  const
    MyStringsCount = 5;
  type
    Ident = string(20);
  var
    MyStrings : array [1..MyStringsCount] of Ident value [
      1:'EXPORT'; 2:'IMPLEMENTATION'; 3:'IMPORT';
      4:'INTERFACE'; 5:'MODULE'];

begin
end.


      ___,
    ((__         o
   ,____)) V E N I

Sven Hilscher (Sven@rufus.central.de (Sven Hilscher))