Skip to content

message_text in mo_message

  USE mo_constants, ONLY: nout

  IMPLICIT NONE

  PRIVATE

  PUBLIC :: message_text    ! dummy string to use in subroutines
  PUBLIC :: message         ! versatile routine to write out strings in file or on screen

  CHARACTER(len=1024) :: message_text = ''

Is exposing a message_text a good idea? I mean, it gets written and set then send to message() or error_message() and I do not know how safe that is in MPI or OpenMP. I'd rather use a string locally and delete that. I found a usage in mRM and think it is bad design. What do you think @muellese ?