Browse Source

Fix memory leak (Reference-LAPACK PR 953)

tags/v0.3.26
Martin Kroeker GitHub 2 years ago
parent
commit
effb7af2a2
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 8 additions and 0 deletions
  1. +2
    -0
      lapack-netlib/TESTING/LIN/cchkaa.F
  2. +2
    -0
      lapack-netlib/TESTING/LIN/dchkaa.F
  3. +2
    -0
      lapack-netlib/TESTING/LIN/schkaa.F
  4. +2
    -0
      lapack-netlib/TESTING/LIN/zchkaa.F

+ 2
- 0
lapack-netlib/TESTING/LIN/cchkaa.F View File

@@ -1232,6 +1232,8 @@
*
DEALLOCATE (A, STAT = AllocateStatus)
DEALLOCATE (B, STAT = AllocateStatus)
DEALLOCATE (E, STAT = AllocateStatus)
DEALLOCATE (S, STAT = AllocateStatus)
DEALLOCATE (WORK, STAT = AllocateStatus)
DEALLOCATE (RWORK, STAT = AllocateStatus)
*


+ 2
- 0
lapack-netlib/TESTING/LIN/dchkaa.F View File

@@ -1076,6 +1076,8 @@
*
DEALLOCATE (A, STAT = AllocateStatus)
DEALLOCATE (B, STAT = AllocateStatus)
DEALLOCATE (E, STAT = AllocateStatus)
DEALLOCATE (S, STAT = AllocateStatus)
DEALLOCATE (WORK, STAT = AllocateStatus)
DEALLOCATE (RWORK, STAT = AllocateStatus)
*


+ 2
- 0
lapack-netlib/TESTING/LIN/schkaa.F View File

@@ -1070,6 +1070,8 @@
*
DEALLOCATE (A, STAT = AllocateStatus)
DEALLOCATE (B, STAT = AllocateStatus)
DEALLOCATE (E, STAT = AllocateStatus)
DEALLOCATE (S, STAT = AllocateStatus)
DEALLOCATE (WORK, STAT = AllocateStatus)
DEALLOCATE (RWORK, STAT = AllocateStatus)
*


+ 2
- 0
lapack-netlib/TESTING/LIN/zchkaa.F View File

@@ -1268,6 +1268,8 @@
*
DEALLOCATE (A, STAT = AllocateStatus)
DEALLOCATE (B, STAT = AllocateStatus)
DEALLOCATE (E, STAT = AllocateStatus)
DEALLOCATE (S, STAT = AllocateStatus)
DEALLOCATE (RWORK, STAT = AllocateStatus)
DEALLOCATE (WORK, STAT = AllocateStatus)
*


Loading…
Cancel
Save