rpms/gdl
3
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

More debug statements in test patch

Browse Source
This commit is contained in:
Orion Poplawski 2013-10-02 11:53:21 -06:00
parent c68fcb1478
commit 774e96d41e
2 changed files with 16 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
gdl-test.patch
View File

@ -1,6 +1,6 @@
diff -up gdl-0.9.4/testsuite/test_matrix_multiply.pro.test gdl-0.9.4/testsuite/test_matrix_multiply.pro
--- gdl-0.9.4/testsuite/test_matrix_multiply.pro.test 2013-04-11 10:00:30.000000000 -0600
+++ gdl-0.9.4/testsuite/test_matrix_multiply.pro 2013-10-01 13:55:24.550637078 -0600
diff -up gdl-0.9.4/testsuite/test_matrix_multiply.pro.gsl gdl-0.9.4/testsuite/test_matrix_multiply.pro
--- gdl-0.9.4/testsuite/test_matrix_multiply.pro.gsl 2013-04-11 10:00:30.000000000 -0600
+++ gdl-0.9.4/testsuite/test_matrix_multiply.pro 2013-10-02 11:21:57.504511516 -0600
@@ -39,7 +39,7 @@ identity=DIAG_MATRIX(REPLICATE(1., nbp))
matrice=DIAG_MATRIX(REPLICATE(value, nbp-1), 1)
matrice[0,nbp-1]=value
@ -10,15 +10,24 @@ diff -up gdl-0.9.4/testsuite/test_matrix_multiply.pro.test gdl-0.9.4/testsuite/t
;
; We use a "rotation matrix"
;
@@ -72,6 +72,7 @@ if (errors GT 0) then begin
@@ -70,8 +70,15 @@ if (errors GT 0) then begin
print, 'effective type : ', effective_type
nb_errors=nb_errors+errors
endif
;
-;
+
if KEYWORD_SET(debug) then begin
+ print, 'Invert status = ', status
+ print, 'Where inv_matrice ne 0 : ', where(inv_matrice ne 0)
+ print, 'Where trans_matrice ne 0 : ', where(trans_matrice ne 0)
+ print, 'Where test1 ne 0 : ', where(abs(test1) gt tolerance)
+ print, 'Where test2 ne 0 : ', where(abs(test2) gt tolerance)
+ print, 'Where test3 ne 0 : ', where(abs(test3) gt tolerance)
+ print, 'Where test4 ne 0 : ', where(abs(test4) gt tolerance)
print, MIN(test1), MAX(test1)
print, MIN(test2), MAX(test2)
print, MIN(test3), MAX(test3)
@@ -110,7 +111,7 @@ liste_taille=[2,3,4,10,11,13,25,50,51,10
@@ -110,7 +117,7 @@ liste_taille=[2,3,4,10,11,13,25,50,51,10
for itailles=0, N_ELEMENTS(liste_taille)-1 do begin
for itypes=0, N_ELEMENTS(liste_type)-1 do begin
TEST_MATRIX_UNITARY, type=liste_type[itypes], $

2
gdl.spec
View File

@ -119,7 +119,7 @@ popd
%patch4 -p1 -b .plwidth
%patch5 -p1 -b .python
%patch6 -p1 -b .gsl
%patch7 -p1 -b .gsl
%patch7 -p1 -b .test
%global cmake_opts \\\
-DWXWIDGETS=ON \\\