move_string_string Subroutine

private elemental subroutine move_string_string(from, to)

Moves the allocated character scalar from ‘from’ to ‘to’ No output

Arguments

Type IntentOptional Attributes Name
type(string_type), intent(inout), target :: from
type(string_type), intent(inout), target :: to

Called by

proc~~move_string_string~~CalledByGraph proc~move_string_string move_string_string interface~move move interface~move->proc~move_string_string proc~join_string join_string proc~join_string->interface~move interface~join join interface~join->proc~join_string

Variables

Type Visibility Attributes Name Initial
type(string_type), private, pointer :: fromp

Source Code

elemental subroutine move_string_string(from, to)
   type(string_type), intent(inout), target :: from
   type(string_type), intent(inout), target :: to
   type(string_type), pointer :: fromp

   fromp => from
   if (associated(fromp, to)) return
   call move_alloc(from%raw, to%raw)

end subroutine move_string_string