subroutineadd_wordsprivate
subroutine add_words(words, b)
Write words as list items.
Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
| words | type(string_t) | in | dimension(:) | the words |
| b | type(buffer_t) | inout | the HTML |
Calls
Source
Show the code
subroutine add_words(words, b)
type(string_t), intent(in) :: words(:) !! the words
type(buffer_t), intent(inout) :: b !! the HTML
integer :: k
do k = 1, size(words)
call add(b, '<li>')
call html_escape(words(k)%s, b, .false.)
call add(b, '</li>')
end do
end subroutine add_words