{ %fail }
var a : string;
begin str(1 > 1 > 1, a)