test_add_prototype Subroutine

public subroutine test_add_prototype()

Arguments

None

Calls

proc~~test_add_prototype~~CallsGraph proc~test_add_prototype test_add_prototype none~add_prototype~5 GridManager%add_prototype proc~test_add_prototype->none~add_prototype~5 none~insert~34 StringGridFactoryMap%insert none~add_prototype~5->none~insert~34 none~insert_pair~4 StringGridFactoryMap%insert_pair none~insert~34->none~insert_pair~4

Source Code

   subroutine test_add_prototype()
      type (GridManager) :: grid_manager
      call grid_manager%add_prototype('mock', MockGridFactory('foo'))
   end subroutine test_add_prototype