{ %fail } {$x-} var a: array of byte; begin length(a); end.