summaryrefslogtreecommitdiff
path: root/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.c
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2008-11-30 12:40:37 +0000
committerAlberto Ruiz <aruiz@um.es>2008-11-30 12:40:37 +0000
commit6be354c6acbf1e07cb32bbedf3cddddd9798d470 (patch)
tree8033fd4c5845b39e8d6acbfe8e0b51beb883b9b3 /lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.c
parent221401e14043d93934068418bcbf1fcc675ebd16 (diff)
QuickCheck<2, ifdef i386 finit, and credit to Simon Beaumont
Diffstat (limited to 'lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.c')
-rw-r--r--lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.c b/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.c
index 6315041..a8ccf5f 100644
--- a/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.c
+++ b/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.c
@@ -35,7 +35,11 @@
35#define NOSPRTD 2007 35#define NOSPRTD 2007
36 36
37//--------------------------------------- 37//---------------------------------------
38void asm_finit() { asm("finit");} 38void asm_finit() {
39#ifdef i386
40 asm("finit");
41#endif
42}
39//--------------------------------------- 43//---------------------------------------
40 44
41//////////////////// real svd //////////////////////////////////// 45//////////////////// real svd ////////////////////////////////////