{ %NORUN } program tw26180; {$MODE DELPHI} {$Assertions on} type TA = class private F: T; procedure Foo; end; procedure TA.Foo; begin Assert(F <> 0); // Error: Boolean expression expected, but got "" // same for >, <, <=, >=, = end; begin end.