Yes, this is a bug. Thanks for identifying the issue!
I have committed a fix to our development tree and have filed to have it moved
into the 1.4 and 1.5 series. You can download a patch for the specific fix
here:
https://svn.open-mpi.org/trac/ompi/changeset/23145
On May 7, 2010, at 4:52 PM, Secretan Yves wrote:
> Hello,
>
> According to my understanding of the documentation, it should be possible to
> set the default error handler for files with MPI_FILE_SET_ERRHANDLER.
> However, the following small Fortran77 program fails, MPI_FILE_SET_ERRHANDLER
> returns an error.
>
> =================================
> PROGRAM H2D2_MAIN
>
> INCLUDE 'mpif.h'
>
> EXTERNAL HNDLR
> C------------------------------------------------------------------------
>
> CALL MPI_INIT(I_ERR)
>
> I_HDLR = 0
> CALL MPI_FILE_CREATE_ERRHANDLER(HNDLR1, I_HDLR, I_ERR)
> WRITE(*,*) 'MPI_FILE_CREATE_ERRHANDLER: ', I_ERR
> CALL MPI_FILE_SET_ERRHANDLER (MPI_FILE_NULL, I_HDLR, I_ERR)
> WRITE(*,*) 'MPI_FILE_SET_ERRHANDLER: ', I_ERR
>
> END
>
> SUBROUTINE HNDLR(I_CNTX, I_ERR)
> WRITE(*,*) 'In HNDLR: MPI Error detected'
> RETURN
> END
> ============================
>
>
> Did I miss something obvious?
> Regards
>
> Yves Secretan
> Professeur
> yves.secre...@ete.inrs.ca
>
> <image001.gif> Avant d'imprimer, pensez à l'environnement
>
> _______________________________________________
> users mailing list
> us...@open-mpi.org
> http://www.open-mpi.org/mailman/listinfo.cgi/users
--
Jeff Squyres
jsquy...@cisco.com
For corporate legal information go to:
http://www.cisco.com/web/about/doing_business/legal/cri/
