Print this page
11210 libm should be cstyle(1ONBLD) clean
*** 20,29 ****
--- 20,30 ----
*/
/*
* Copyright 2011 Nexenta Systems, Inc. All rights reserved.
*/
+
/*
* Copyright 2006 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
*** 31,46 ****
#include "libm.h"
#include "complex_wrapper.h"
fcomplex
! casinf(fcomplex z) {
dcomplex dz, dans;
fcomplex ans;
! D_RE(dz) = (double) (F_RE(z));
! D_IM(dz) = (double) (F_IM(z));
dans = casin(dz);
! F_RE(ans) = (float) (D_RE(dans));
! F_IM(ans) = (float) (D_IM(dans));
return (ans);
}
--- 32,48 ----
#include "libm.h"
#include "complex_wrapper.h"
fcomplex
! casinf(fcomplex z)
! {
dcomplex dz, dans;
fcomplex ans;
! D_RE(dz) = (double)(F_RE(z));
! D_IM(dz) = (double)(F_IM(z));
dans = casin(dz);
! F_RE(ans) = (float)(D_RE(dans));
! F_IM(ans) = (float)(D_IM(dans));
return (ans);
}