Changeset 3630 for palm/trunk/SOURCE/salsa_util_mod.f90

Timestamp:

Dec 17, 2018 11:04:17 AM (4 years ago)

Author:

knoop

Message:

Bugfix: changed ERROR STOP to STOP 1 as PGI currently can not handle it.

File:

• palm/trunk/SOURCE/salsa_util_mod.f90 (modified) (1 diff)

palm/trunk/SOURCE/salsa_util_mod.f90

@@ -144 +144 @@
           get_index = SELF%ncomp + 1
        ELSE
-          STOP 'get_index: FAILED, no such component -'
+          STOP 1 ! "INFO for Developer: please use the message routine to pass the output string" get_index: FAILED, no such component -
        ENDIF