Skip to content

Commit

Permalink
Fix copy-paste typo, and activate nestedFlag and deepFlag for
Browse files Browse the repository at this point in the history
StateLog().
  • Loading branch information
theurich committed Jan 18, 2024
1 parent 2804212 commit dd6f7f0
Showing 1 changed file with 8 additions and 4 deletions.
12 changes: 8 additions & 4 deletions src/addon/NUOPC/src/NUOPC_Base.F90
Original file line number Diff line number Diff line change
Expand Up @@ -3257,12 +3257,14 @@ subroutine NUOPC_LogIntro(name, rName, verbosity, importState, exportState, rc)
line=__LINE__, file=trim(name)//":"//FILENAME)) return ! bail out
endif
if (btest(verbosity,4)) then
call ESMF_StateLog(importState, trim(name)//": "//rName//" intro:", rc=rc)
call ESMF_StateLog(importState, trim(name)//": "//rName//" intro:", &
nestedFlag=.true., deepFlag=.true., rc=rc)
if (ESMF_LogFoundError(rcToCheck=rc, msg=ESMF_LOGERR_PASSTHRU, &
line=__LINE__, file=trim(name)//":"//FILENAME)) return ! bail out
endif
if (btest(verbosity,5)) then
call ESMF_StateLog(exportState, trim(name)//": "//rName//" intro:", rc=rc)
call ESMF_StateLog(exportState, trim(name)//": "//rName//" intro:", &
nestedFlag=.true., deepFlag=.true., rc=rc)
if (ESMF_LogFoundError(rcToCheck=rc, msg=ESMF_LOGERR_PASSTHRU, &
line=__LINE__, file=trim(name)//":"//FILENAME)) return ! bail out
endif
Expand Down Expand Up @@ -3307,12 +3309,14 @@ subroutine NUOPC_LogExtro(name, rName, verbosity, importState, exportState, rc)
! local variables
integer :: indentCount
if (btest(verbosity,4)) then
call ESMF_StateLog(importState, trim(name)//": "//rName//" intro:", rc=rc)
call ESMF_StateLog(importState, trim(name)//": "//rName//" extro:", &
nestedFlag=.true., deepFlag=.true., rc=rc)
if (ESMF_LogFoundError(rcToCheck=rc, msg=ESMF_LOGERR_PASSTHRU, &
line=__LINE__, file=trim(name)//":"//FILENAME)) return ! bail out
endif
if (btest(verbosity,5)) then
call ESMF_StateLog(exportState, trim(name)//": "//rName//" intro:", rc=rc)
call ESMF_StateLog(exportState, trim(name)//": "//rName//" extro:", &
nestedFlag=.true., deepFlag=.true., rc=rc)
if (ESMF_LogFoundError(rcToCheck=rc, msg=ESMF_LOGERR_PASSTHRU, &
line=__LINE__, file=trim(name)//":"//FILENAME)) return ! bail out
endif
Expand Down

0 comments on commit dd6f7f0

Please sign in to comment.