Merge pull request #4357 from martin-frbg/lapack953

Fix memory leak in LAPACK testing framework (Reference-LAPACK PR 953)
This commit is contained in:
Martin Kroeker 2023-12-05 20:03:21 +01:00 committed by GitHub
commit 6aa5f53e26
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 8 additions and 0 deletions

View File

@ -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)
* *

View File

@ -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)
* *

View File

@ -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)
* *

View File

@ -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)
* *