array qv allocated in newd wasn't deallocated in all cases,

leading to either a crash or a memory leak (Ralph)


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@5219 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2008-10-07 16:00:21 +00:00
parent f50125be05
commit 7bcafa1dba
1 changed files with 2 additions and 1 deletions

View File

@ -1452,9 +1452,10 @@ END FUNCTION
END DO END DO
END DO END DO
10 CONTINUE
DEALLOCATE( qv ) DEALLOCATE( qv )
! !
10 CALL stop_clock( 'newd' ) CALL stop_clock( 'newd' )
! !
RETURN RETURN
END SUBROUTINE newd END SUBROUTINE newd