Skip to content

Commit 0e3e05b

Browse files
committed
fix num_bc_patches checker
1 parent 7167f40 commit 0e3e05b

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/pre_process/m_checker.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -203,7 +203,7 @@ contains
203203
integer :: i
204204
character(len=5) :: iStr !< for int to string conversion
205205

206-
call s_int_to_str(i, iStr)
206+
call s_int_to_str(num_bc_patches_max, iStr)
207207
@:PROHIBIT(num_bc_patches > num_bc_patches_max, "num_bc_patches must be <= "//trim(iStr))
208208

209209
do i = 1, num_bc_patches

0 commit comments

Comments
 (0)