Commit a92217bc authored by Daniel Wortmann's avatar Daniel Wortmann

Update init.F90, Fixed strange bug...

parent 54a47cb1
......@@ -62,7 +62,7 @@
CALL writetimes()
CALL PRINT_memory_info()
#ifdef CPP_MPI
CALL MPI_ABORT(MPI_COMM_WORLD,error,ierr)
CALL MPI_ABORT(MPI_COMM_WORLD,ierr)
#endif
STOP "Signal"
intel_signal_handler=0
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment