summaryrefslogtreecommitdiff
path: root/src/matrixOperations/trace/testMatrixTrace.c
diff options
context:
space:
mode:
authortorset2009-01-13 14:59:37 +0000
committertorset2009-01-13 14:59:37 +0000
commite7d7dd8d45221a09fc1cb9372640f6b62e3122cd (patch)
tree117183867f0b25c09899891363ac5143b7cd28d4 /src/matrixOperations/trace/testMatrixTrace.c
parentd84dc520da2471092c0c8b7c1bea331dd27861ef (diff)
downloadscilab2c-e7d7dd8d45221a09fc1cb9372640f6b62e3122cd.tar.gz
scilab2c-e7d7dd8d45221a09fc1cb9372640f6b62e3122cd.tar.bz2
scilab2c-e7d7dd8d45221a09fc1cb9372640f6b62e3122cd.zip
change trace prototypes
Diffstat (limited to 'src/matrixOperations/trace/testMatrixTrace.c')
-rw-r--r--src/matrixOperations/trace/testMatrixTrace.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/matrixOperations/trace/testMatrixTrace.c b/src/matrixOperations/trace/testMatrixTrace.c
index 1cc25c7d..0cbea97b 100644
--- a/src/matrixOperations/trace/testMatrixTrace.c
+++ b/src/matrixOperations/trace/testMatrixTrace.c
@@ -56,7 +56,7 @@ static void straceaTest ( void ) {
float out = 0.0f ;
- stracea ( in , LINES , &out ) ;
+ out = stracea ( in , LINES ) ;
assert(fabsf(out - Result) / fabsf( out )< 1e-07);
@@ -101,7 +101,7 @@ static void dtraceaTest ( void ) {
double out = 0 ;
- dtracea ( in , LINES , &out ) ;
+ out = dtracea ( in , LINES ) ;
assert(fabs(out - Result) / fabs( out )< 1e-16);
}
@@ -152,7 +152,7 @@ static void ctraceaTest ( void ) {
for ( i = 0 ; i < LINES*LINES ; i++ )
in[i] = FloatComplex ( tin[i] , tin[i] ) ;
- ctracea ( in , LINES , &out ) ;
+ out = ctracea ( in , LINES ) ;
assert ( fabs( creals(out) - creals (Result) )/ fabs (creals (out)) < 1e-07 );
assert ( fabs( cimags(out) - cimags (Result) )/ fabs (cimags (out)) < 1e-07 );
@@ -210,7 +210,7 @@ static void ztraceaTest ( void ) {
for ( i = 0 ; i < LINES*LINES ; i++ )
in[i] = DoubleComplex ( tin[i] , tin[i] ) ;
- ztracea ( in , LINES , &out ) ;
+ out = ztracea ( in , LINES ) ;
assert ( fabs( zreals(out) - zreals (Result) )/ fabs (zreals (out)) < 1e-16 );
assert ( fabs( zimags(out) - zimags (Result) )/ fabs (zimags (out)) < 1e-16 );