Merge branch 'develop'
This commit is contained in:
commit
e39384432b
|
@ -15,6 +15,14 @@
|
|||
* Build LAPACKE: C interface to LAPACK
|
||||
* Improve the windows build.
|
||||
|
||||
## Previous Developers
|
||||
|
||||
* Chen Shaohu <huhumartinwar@gmail.com>
|
||||
* Optimize GEMV on the Loongson 3A processor.
|
||||
|
||||
* Luo Wen
|
||||
* Intern. Test Level-2 BLAS.
|
||||
|
||||
## Contributors
|
||||
|
||||
In chronological order:
|
||||
|
|
2
f_check
2
f_check
|
@ -24,7 +24,7 @@ $compiler = "" if $compiler eq "f77";
|
|||
|
||||
if ($compiler eq "") {
|
||||
|
||||
@lists = ("f77", "g77", "g95", "gfortran", "frt", "fort", "openf90", "openf95",
|
||||
@lists = ("g77", "g95", "gfortran", "frt", "fort", "openf90", "openf95",
|
||||
"sunf77", "sunf90", "sunf95",
|
||||
"xlf95", "xlf90", "xlf",
|
||||
"ppuf77", "ppuf95", "ppuf90", "ppuxlf",
|
||||
|
|
|
@ -138,7 +138,7 @@ int NAME(char *UPLO, char *DIAG, blasint *N, FLOAT *a, blasint *ldA, blasint *In
|
|||
// call dtrtri from lapack for a walk around.
|
||||
if(uplo==0){
|
||||
dtrtri_lapack_(UPLO, DIAG, N, a, ldA, Info);
|
||||
return;
|
||||
return 0;
|
||||
}
|
||||
#endif
|
||||
|
||||
|
|
Loading…
Reference in New Issue