diff options
Diffstat (limited to 'sci-physics/abinit/files/6.2.2-long-message.patch')
| -rw-r--r-- | sci-physics/abinit/files/6.2.2-long-message.patch | 23 |
1 files changed, 0 insertions, 23 deletions
diff --git a/sci-physics/abinit/files/6.2.2-long-message.patch b/sci-physics/abinit/files/6.2.2-long-message.patch deleted file mode 100644 index 20965c7dd..000000000 --- a/sci-physics/abinit/files/6.2.2-long-message.patch +++ /dev/null @@ -1,23 +0,0 @@ -diff -Naur abinit-6.2.2_orig/src/66_paw/indgrid.F90 abinit-6.2.2/src/66_paw/indgrid.F90 ---- src/66_paw/indgrid.F90 2010-08-07 04:31:29.000000000 +0000 -+++ src/66_paw/indgrid.F90 2010-08-11 17:16:01.000000000 +0000 -@@ -62,6 +62,7 @@ - !arrays - integer :: id(3) - integer,allocatable :: gc(:,:),gf(:,:) -+ character(len=500) :: msg - - ! ************************************************************************* - ! -@@ -117,7 +118,10 @@ - !Check coatofin to make sure there are no zeros! - do ii=1,ubound(coatofin,1) - if (coatofin(ii)==0) then -- MSG_ERROR('A zero was found in coatofin. Check that the fine FFT mesh is finer in each dimension than the coarse FFT mesh.') -+ msg='A zero was found in coatofin.& -+& Check that the fine FFT mesh is finer& -+& in each dimension than the coarse FFT mesh.' -+ MSG_ERROR(msg) - stop - end if - end do |