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
10 CONTINUE
DEALLOCATE( qv )
!
10 CALL stop_clock( 'newd' )
CALL stop_clock( 'newd' )
!
RETURN
END SUBROUTINE newd