register_cmd Subroutine

public subroutine register_cmd(cmd, name)

Arguments

Type IntentOptional Attributes Name
type(cmd_t), intent(inout) :: cmd
character(len=*), intent(in) :: name

Source Code

   subroutine register_cmd(cmd, name)
      implicit none
      type(cmd_t), intent(inout) :: cmd
      character(*), intent(in) :: name

      call cmd%set_name(name)
   end subroutine register_cmd