Skip to content

Commit

Permalink
Disable profiling of StateReconcile() internals before merging into
Browse files Browse the repository at this point in the history
develop.
  • Loading branch information
theurich committed Nov 15, 2024
1 parent 0d04817 commit b6be293
Showing 1 changed file with 9 additions and 9 deletions.
18 changes: 9 additions & 9 deletions src/Superstructure/StateReconcile/src/ESMF_StateReconcile.F90
Original file line number Diff line number Diff line change
Expand Up @@ -182,7 +182,7 @@ subroutine ESMF_StateReconcile(state, keywordEnforcer, vm, checkflag, rc)
type(ESMF_VM) :: localvm
logical :: isNoop, isFlag, localCheckFlag

logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

! check input variables
ESMF_INIT_CHECK_DEEP(ESMF_StateGetInit,state,rc)
Expand Down Expand Up @@ -429,7 +429,7 @@ subroutine ESMF_StateReconcileIsNoop(state, vm, isNoop, rc)
logical :: isNoopLoc
integer :: isNoopLocInt(1), isNoopInt(1)

logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

localrc = ESMF_RC_NOT_IMPL

Expand Down Expand Up @@ -713,7 +713,7 @@ subroutine ESMF_StateReconcile_driver(state, vm, rc)
integer :: localPet, petCount

logical, parameter :: meminfo = .false.
logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

integer, pointer :: nitems_buf(:)
type (ESMF_StateItemWrap), pointer :: siwrap(:)
Expand Down Expand Up @@ -1126,7 +1126,7 @@ subroutine ESMF_ReconcileMultiCompCase(state, vm, vmIdMap, attreconflag, &
type(ESMF_VMId) :: vmId
type(ESMF_VMId), pointer :: vmIdSingleComp

logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

rc = ESMF_SUCCESS

Expand Down Expand Up @@ -1963,7 +1963,7 @@ subroutine ESMF_ReconcileBruteForce(state, vm, attreconflag, siwrap, &
character, pointer :: buffer_recv(:)

logical, parameter :: meminfo = .false.
logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

rc = ESMF_SUCCESS

Expand Down Expand Up @@ -2884,7 +2884,7 @@ subroutine ESMF_ReconcileExchgAttributes (state, vm, rc)
type(ESMF_Info) :: base_info, base_temp_info

logical, parameter :: debug = .false.
logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

rc = ESMF_RC_NOT_IMPL

Expand Down Expand Up @@ -3402,7 +3402,7 @@ subroutine ESMF_ReconcileExchgItems (vm, id_info, recv_items, recv_buffer, rc)

logical, parameter :: debug = .false.
logical, parameter :: meminfo = .false.
logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

character(len=ESMF_MAXSTR) :: logmsg

Expand Down Expand Up @@ -3642,7 +3642,7 @@ subroutine ESMF_ReconcileExchgNeeds (vm, id_info, recv_needs, rc)
character(ESMF_MAXSTR) :: msgstring

logical, parameter :: debug = .false.
logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

localrc = ESMF_RC_NOT_IMPL

Expand Down Expand Up @@ -3974,7 +3974,7 @@ subroutine ESMF_ReconcileInitialize(state, vm, siwrap, nitems_all, rc)
integer :: nitems_local(1)
integer :: localPet, petCount

logical, parameter :: profile = .true.
logical, parameter :: profile = .false.

localrc = ESMF_RC_NOT_IMPL

Expand Down

0 comments on commit b6be293

Please sign in to comment.