more bugfix

thrasibule · thrasibule · commit 5d6525c87cfc · 2019-09-10T17:30:57.000-04:00
diff --git a/interface/lapack/trtrs.c b/interface/lapack/trtrs.c
@@ -122,11 +122,11 @@ int NAME(char *UPLO, char* TRANS, char* DIAG, blasint *N, blasint *NRHS, FLOAT *
 
   *Info = 0;
 
-  if (args.m == 0 || args.n == 0) return 0;
+  if (args.m == 0) return 0;
 
   if (diag) {
-    if (AMIN_K(args.n, args.a, args.lda + 1) == ZERO) {
-      *Info = IAMIN_K(args.n, args.a, args.lda + 1);
+    if (AMIN_K(args.m, args.a, args.lda + 1) == ZERO) {
+      *Info = IAMIN_K(args.m, args.a, args.lda + 1);
       return 0;
     }
   }
diff --git a/interface/lapack/ztrtrs.c b/interface/lapack/ztrtrs.c
@@ -122,11 +122,11 @@ int NAME(char *UPLO, char* TRANS, char* DIAG, blasint *N, blasint *NRHS, FLOAT *
 
   *Info = 0;
 
-  if (args.m == 0 || args.n == 0) return 0;
+  if (args.m == 0) return 0;
 
   if (diag) {
-    if (AMIN_K(args.n, args.a, args.lda + 1) == ZERO) {
-      *Info = IAMIN_K(args.n, args.a, args.lda + 1);
+    if (AMIN_K(args.m, args.a, args.lda + 1) == ZERO) {
+      *Info = IAMIN_K(args.m, args.a, args.lda + 1);
       return 0;
     }
   }

Original file line number	Diff line number	Diff line change
`@@ -122,11 +122,11 @@ int NAME(char UPLO, char TRANS, char* DIAG, blasint N, blasint NRHS, FLOAT *`
`122`	`122`
`123`	`123`	`*Info = 0;`
`124`	`124`
`125`		`- if (args.m == 0 \|\| args.n == 0) return 0;`
	`125`	`+ if (args.m == 0) return 0;`
`126`	`126`
`127`	`127`	`if (diag) {`
`128`		`- if (AMIN_K(args.n, args.a, args.lda + 1) == ZERO) {`
`129`		`- *Info = IAMIN_K(args.n, args.a, args.lda + 1);`
	`128`	`+ if (AMIN_K(args.m, args.a, args.lda + 1) == ZERO) {`
	`129`	`+ *Info = IAMIN_K(args.m, args.a, args.lda + 1);`
`130`	`130`	`return 0;`
`131`	`131`	`}`
`132`	`132`	`}`