Skip to content

Commit

Permalink
Pass array to stringify
Browse files Browse the repository at this point in the history
  • Loading branch information
jimmielin committed Oct 17, 2024
1 parent 98a0cd1 commit f96675a
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/physics/utils/cam_constituents.F90
Original file line number Diff line number Diff line change
Expand Up @@ -319,7 +319,7 @@ subroutine const_get_index(name, cindex, abort, warning, caller)
call ccpp_const_get_idx(const_props, name, cindex, errmsg, errcode)

if (errcode /= 0) then
call endrun(subname//"Error "//stringify(errcode)//": "// &
call endrun(subname//"Error "//stringify((/errcode/))//": "// &
trim(errmsg), file=__FILE__, line=__LINE__)
endif

Expand Down

0 comments on commit f96675a

Please sign in to comment.