{

PRT test 211: Misspelled 'of' on variant

}

program iso7185prt0211;

var a: record b, c: integer;
              case d: boolean fo
                 true: ();
                 false: ()
       end;

begin

   a.b := 1

end.
