{ %FAIL } program tb0230; var f: Single; begin f := 2.e-10foo; end.