Skip to content

Commit c542299

Browse files
committed
Deploying to stdlib-fpm from @ 91387a0 🚀
1 parent 880e59e commit c542299

File tree

6 files changed

+1
-162
lines changed

6 files changed

+1
-162
lines changed

src/stdlib_string_type.f90

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -75,10 +75,6 @@ elemental module function new_string_from_logical_lk(val) result(new)
7575
logical(lk), intent(in) :: val
7676
type(string_type) :: new
7777
end function new_string_from_logical_lk
78-
elemental module function new_string_from_logical_c_bool(val) result(new)
79-
logical(c_bool), intent(in) :: val
80-
type(string_type) :: new
81-
end function new_string_from_logical_c_bool
8278
end interface string_type
8379

8480
!> Returns the length of the character sequence without trailing spaces

src/stdlib_string_type_constructor.f90

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -44,11 +44,5 @@ elemental module function new_string_from_logical_lk(val) result(new)
4444
type(string_type) :: new
4545
new%raw = to_string(val)
4646
end function new_string_from_logical_lk
47-
!> Constructor for new string instances from a logical of kind c_bool.
48-
elemental module function new_string_from_logical_c_bool(val) result(new)
49-
logical(c_bool), intent(in) :: val
50-
type(string_type) :: new
51-
new%raw = to_string(val)
52-
end function new_string_from_logical_c_bool
5347

5448
end submodule stdlib_string_type_constructor

src/stdlib_strings.f90

Lines changed: 0 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -85,15 +85,6 @@ pure module function to_string_2_l_lk(value, format) result(string)
8585
character(len=*), intent(in) :: format
8686
character(len=:), allocatable :: string
8787
end function to_string_2_l_lk
88-
pure module function to_string_1_l_c_bool(value) result(string)
89-
logical(c_bool), intent(in) :: value
90-
character(len=1) :: string
91-
end function to_string_1_l_c_bool
92-
pure module function to_string_2_l_c_bool(value, format) result(string)
93-
logical(c_bool), intent(in) :: value
94-
character(len=*), intent(in) :: format
95-
character(len=:), allocatable :: string
96-
end function to_string_2_l_c_bool
9788
end interface to_string
9889

9990
!> Remove leading and trailing whitespace characters.

src/stdlib_strings_to_string.f90

Lines changed: 0 additions & 25 deletions
Original file line numberDiff line numberDiff line change
@@ -288,30 +288,5 @@ pure module function to_string_2_l_lk(value, format) result(string)
288288
end if
289289

290290
end function to_string_2_l_lk
291-
!> Represent an logical of kind c_bool as character sequence.
292-
pure module function to_string_1_l_c_bool(value) result(string)
293-
logical(c_bool), intent(in) :: value
294-
character(len=1) :: string
295-
296-
string = merge("T", "F", value)
297-
298-
end function to_string_1_l_c_bool
299-
300-
pure module function to_string_2_l_c_bool(value, format) result(string)
301-
logical(c_bool), intent(in) :: value
302-
character(len=*), intent(in) :: format
303-
character(len=:), allocatable :: string
304-
305-
character(len=buffer_len) :: buffer
306-
integer :: stat
307-
308-
write(buffer, "(" // format // ")", iostat=stat) value
309-
if (stat == 0) then
310-
string = trim(buffer)
311-
else
312-
string = err_sym
313-
end if
314-
315-
end function to_string_2_l_c_bool
316291

317292
end submodule stdlib_strings_to_string

test/test_ascii.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,7 +6,7 @@ module test_ascii
66
is_digit, is_octal_digit, is_hex_digit, is_white, is_blank, &
77
is_control, is_punctuation, is_graphical, is_printable, is_ascii, &
88
to_lower, to_upper, to_title, to_sentence, reverse, LF, TAB, NUL, DEL
9-
use stdlib_kinds, only : int8, int16, int32, int64, lk, c_bool
9+
use stdlib_kinds, only : int8, int16, int32, int64, lk
1010
implicit none
1111
private
1212

test/test_string_assignment.f90

Lines changed: 0 additions & 117 deletions
This file was deleted.

0 commit comments

Comments
 (0)