@@ -27,8 +27,8 @@ module stdlib_ascii
2727 !> Create a character string representing the value of the provided variable.
2828 interface to_char
2929 #:for kind in INT_KINDS
30- module procedure :: integer_ ${kind}$_to_char
31- module procedure :: logical_ ${kind}$_to_char
30+ module procedure :: to_char_integer_ ${kind}$
31+ module procedure :: to_char_logical_ ${kind}$
3232 #:endfor
3333 end interface to_char
3434
@@ -328,7 +328,7 @@ contains
328328
329329 #:for kind in INT_KINDS
330330 !> Represent an integer of kind ${kind}$ as character sequence
331- pure function integer_ ${kind}$_to_char (val) result(string)
331+ pure function to_char_integer_ ${kind}$(val) result(string)
332332 integer, parameter :: ik = ${kind}$
333333 integer(ik), intent(in) :: val
334334 character(len=:), allocatable :: string
@@ -359,18 +359,18 @@ contains
359359 end if
360360
361361 string = buffer(pos:)
362- end function integer_ ${kind}$_to_char
362+ end function to_char_integer_ ${kind}$
363363 #:endfor
364364
365365 #:for kind in INT_KINDS
366366 !> Represent an logical of kind ${kind}$ as character sequence
367- pure function logical_ ${kind}$_to_char (val) result(string)
367+ pure function to_char_logical_ ${kind}$(val) result(string)
368368 integer, parameter :: ik = ${kind}$
369369 logical(ik), intent(in) :: val
370370 character(len=1) :: string
371371
372372 string = merge("T", "F", val)
373- end function logical_ ${kind}$_to_char
373+ end function to_char_logical_ ${kind}$
374374 #:endfor
375375
376376end module stdlib_ascii
0 commit comments