{ %FAIL } program toperator56; operator + (left: AnsiChar; right: ShortString) res : ShortString; begin end; begin end.