class TEST_DIRECTORY |
---|
**** |
________This_is_a_test_program_to_test_the_operating_system_interface_to ___the_directory_system_of_the_native_file_system.__Note_that_it_is_not ___portable_for_simplicity_in_building_a_local_library. _________Version_1.1_Mar_2000.___Copyright_K_Hopper,_U_of_Waikato __________________________Development_History __________________________------------------- ________Date___________Who_By_________Detail ________----___________------_________------ _______17_Nov_97________kh_______Original _______21_Mar_00________kh_______Fixes_needed_for_portability |
const Dir_Name : STR := "lib_test" ; |
---|
const New_Name : STR := "test_lib" ; |
---|
main |
---|