Fix out of bounds read in ?llarv (Reference-LAPACK PR 625)
This commit is contained in:
parent
2be5ee3cca
commit
fe497efa05
|
@ -353,7 +353,7 @@
|
|||
*
|
||||
* Quick return if possible
|
||||
*
|
||||
IF( N.LE.0 ) THEN
|
||||
IF( (N.LE.0).OR.(M.LE.0) ) THEN
|
||||
RETURN
|
||||
END IF
|
||||
*
|
||||
|
|
Loading…
Reference in New Issue