1e118a51fSLisandro Dalcin #include <../src/sys/classes/draw/impls/x/ximpl.h> /*I "petscsys.h" I*/ 2e118a51fSLisandro Dalcin 3e118a51fSLisandro Dalcin #if defined(PETSC_HAVE_SETJMP_H) 4e118a51fSLisandro Dalcin 5e118a51fSLisandro Dalcin jmp_buf PetscXIOErrorHandlerJumpBuf; 6e118a51fSLisandro Dalcin 7*d71ae5a4SJacob Faibussowitsch void PetscXIOErrorHandlerJump(PETSC_UNUSED void *ctx) 8*d71ae5a4SJacob Faibussowitsch { 9e118a51fSLisandro Dalcin longjmp(PetscXIOErrorHandlerJumpBuf, 1); 10e118a51fSLisandro Dalcin } 11e118a51fSLisandro Dalcin 12*d71ae5a4SJacob Faibussowitsch PetscXIOErrorHandler PetscSetXIOErrorHandler(PetscXIOErrorHandler xioerrhdl) 13*d71ae5a4SJacob Faibussowitsch { 14e118a51fSLisandro Dalcin return (PetscXIOErrorHandler)XSetIOErrorHandler((XIOErrorHandler)xioerrhdl); 15e118a51fSLisandro Dalcin } 16e118a51fSLisandro Dalcin 17e118a51fSLisandro Dalcin #endif 18