! $Id: nosignal_handling.f90 12134 2009-11-17 21:13:43Z rplasson $

!** AUTOMATIC CPARAM.INC GENERATION ****************************
! Declare (for generation of cparam.inc) the number of f array
! variables and auxiliary variables added by this module
!
! CPARAM logical, parameter :: lsignal = .false.
!
! MVAR CONTRIBUTION 0
! MAUX CONTRIBUTION 0
!
!***************************************************************
module Signal_handling
!
  use Cparam
  use Cdata
  use Messages
  use Sub, only: keep_compiler_quiet
!  Signal handling in run.f90

  implicit none
  private
  public :: signal_prepare
  public :: read_signal_init_pars
  public :: write_signal_init_pars
  public :: emergency_stop
!
  logical :: emergency_stop = .false.
  contains
!*****************************************************************************
subroutine signal_prepare()
!
!  dummy routine
!
endsubroutine signal_prepare
!***********************************************************************
    subroutine read_signal_init_pars(unit,iostat)
!
      integer :: unit
      integer, optional :: iostat
!
      call keep_compiler_quiet(unit)
      if (present(iostat)) call keep_compiler_quiet(iostat)
!
    endsubroutine read_signal_init_pars
!***********************************************************************
   subroutine write_signal_init_pars(unit)
!
      integer :: unit
!
      call keep_compiler_quiet(unit)
!
    endsubroutine write_signal_init_pars
!*****************************************************************************
endmodule Signal_handling