correct return value for scale! on real-scalar, complex-array