--- branches/mmeineke/mdtools/interface_implementation/BASS_interface.cpp 2002/07/09 18:40:59 10 +++ trunk/mdtools/interface_implementation/BASS_interface.cpp 2002/10/30 22:38:22 160 @@ -1,3 +1,4 @@ + #include #include #include @@ -5,7 +6,11 @@ #include "SimSetup.hpp" #include "Globals.hpp" #include "BASS_interface.h" +#include "simError.h" +#ifdef IS_MPI +#include "mpiBASS.h" +#endif // Globals ************************************************ @@ -258,8 +263,10 @@ void incr_block( block_type new_block ){ block_stack_ptr++; if( block_stack_ptr >= MAX_NEST ){ - fprintf( stderr, "Event blocks nested too deeply\n" ); - exit(1); + sprintf( painCave.errMsg, + "Event blocks nested too deeply\n" ); + painCave.isFatal = 1; + simError(); } else current_block = new_block; @@ -272,8 +279,10 @@ void decr_block( void ){ if( block_stack_ptr < 0 ){ - fprintf( stderr, "Too many event blocks closed\n" ); - exit(1); + sprintf( painCave.errMsg, + "Too many event blocks closed\n" ); + painCave.isFatal = 1; + simError(); } else current_block = block_stack[block_stack_ptr];