Skip to content

Commit 0f714df

Browse files
committed
Change template names
1 parent 8822321 commit 0f714df

File tree

1 file changed

+6
-6
lines changed

1 file changed

+6
-6
lines changed

src/stdlib_ascii.fypp

+6-6
Original file line numberDiff line numberDiff line change
@@ -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

376376
end module stdlib_ascii

0 commit comments

Comments
 (0)