constant arrays of type string

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