MODULE testcse54 ;

VAR
   a: ARRAY [0..10] OF CHAR ;
BEGIN
   a := 'hello'
END testcse54.