scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Added missing bcast. 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@3169 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
dalcorso 2006-06-08 15:44:38 +00:00
parent 8b7f998b6d
commit fbd2274ce0
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Modules/xml_io_base.f90
View File

@ -270,6 +270,8 @@ MODULE xml_io_base
IF ( ionode ) &
CALL iotk_open_read( iunpun, FILE = filename, IERR = ierr )
!
CALL mp_bcast ( ierr, ionode_id, intra_image_comm )
!
CALL errore( 'pp_check_file', 'file ' // &
& TRIM( dirname ) // ' not found', ierr )
!