smg_comms_packing... 1
smg_comms_packing... 2
smg_comms_packing... 3 with Test_Serpent;
smg_comms_packing... 4 with Test_Packing;
smg_comms_rsa_oaep 5 with Test_RSA_OAEP;
smg_comms_packing... 6
smg_comms_packing... 7 procedure testall is
smg_comms_packing... 8 begin
smg_comms_packing... 9 Test_Serpent.Selftest;
smg_comms_rsa_oaep 10 Test_RSA_OAEP.test_char_array;
smg_comms_rsa_oaep 11 Test_RSA_OAEP.test_oaep;
smg_comms_rsa_oaep 12 Test_RSA_OAEP.test_rsa;
smg_comms_rsa_oaep 13 Test_RSA_OAEP.test_rsa_oaep;
smg_comms_packing... 14 Test_Packing.Test_Pack_Unpack_Serpent;
smg_comms_packing... 15 Test_Packing.Test_Pack_Unpack_RSA;
smg_comms_packing... 16 end testall;