Fix memory leak (Reference-LAPACK PR 953)
This commit is contained in:
parent
5915a69734
commit
effb7af2a2
|
@ -1232,6 +1232,8 @@
|
||||||
*
|
*
|
||||||
DEALLOCATE (A, STAT = AllocateStatus)
|
DEALLOCATE (A, STAT = AllocateStatus)
|
||||||
DEALLOCATE (B, STAT = AllocateStatus)
|
DEALLOCATE (B, STAT = AllocateStatus)
|
||||||
|
DEALLOCATE (E, STAT = AllocateStatus)
|
||||||
|
DEALLOCATE (S, STAT = AllocateStatus)
|
||||||
DEALLOCATE (WORK, STAT = AllocateStatus)
|
DEALLOCATE (WORK, STAT = AllocateStatus)
|
||||||
DEALLOCATE (RWORK, STAT = AllocateStatus)
|
DEALLOCATE (RWORK, STAT = AllocateStatus)
|
||||||
*
|
*
|
||||||
|
|
|
@ -1076,6 +1076,8 @@
|
||||||
*
|
*
|
||||||
DEALLOCATE (A, STAT = AllocateStatus)
|
DEALLOCATE (A, STAT = AllocateStatus)
|
||||||
DEALLOCATE (B, STAT = AllocateStatus)
|
DEALLOCATE (B, STAT = AllocateStatus)
|
||||||
|
DEALLOCATE (E, STAT = AllocateStatus)
|
||||||
|
DEALLOCATE (S, STAT = AllocateStatus)
|
||||||
DEALLOCATE (WORK, STAT = AllocateStatus)
|
DEALLOCATE (WORK, STAT = AllocateStatus)
|
||||||
DEALLOCATE (RWORK, STAT = AllocateStatus)
|
DEALLOCATE (RWORK, STAT = AllocateStatus)
|
||||||
*
|
*
|
||||||
|
|
|
@ -1070,6 +1070,8 @@
|
||||||
*
|
*
|
||||||
DEALLOCATE (A, STAT = AllocateStatus)
|
DEALLOCATE (A, STAT = AllocateStatus)
|
||||||
DEALLOCATE (B, STAT = AllocateStatus)
|
DEALLOCATE (B, STAT = AllocateStatus)
|
||||||
|
DEALLOCATE (E, STAT = AllocateStatus)
|
||||||
|
DEALLOCATE (S, STAT = AllocateStatus)
|
||||||
DEALLOCATE (WORK, STAT = AllocateStatus)
|
DEALLOCATE (WORK, STAT = AllocateStatus)
|
||||||
DEALLOCATE (RWORK, STAT = AllocateStatus)
|
DEALLOCATE (RWORK, STAT = AllocateStatus)
|
||||||
*
|
*
|
||||||
|
|
|
@ -1268,6 +1268,8 @@
|
||||||
*
|
*
|
||||||
DEALLOCATE (A, STAT = AllocateStatus)
|
DEALLOCATE (A, STAT = AllocateStatus)
|
||||||
DEALLOCATE (B, STAT = AllocateStatus)
|
DEALLOCATE (B, STAT = AllocateStatus)
|
||||||
|
DEALLOCATE (E, STAT = AllocateStatus)
|
||||||
|
DEALLOCATE (S, STAT = AllocateStatus)
|
||||||
DEALLOCATE (RWORK, STAT = AllocateStatus)
|
DEALLOCATE (RWORK, STAT = AllocateStatus)
|
||||||
DEALLOCATE (WORK, STAT = AllocateStatus)
|
DEALLOCATE (WORK, STAT = AllocateStatus)
|
||||||
*
|
*
|
||||||
|
|
Loading…
Reference in New Issue