smg_comms_packing... 1 -- S.MG, 2018
smg_comms_packing... 2
smg_comms_packing... 3 with Test_Serpent;
smg_comms_packing... 4 with Test_Packing;
smg_comms_packing... 5
smg_comms_packing... 6 procedure testall is
smg_comms_packing... 7 begin
smg_comms_packing... 8 Test_Serpent.Selftest;
smg_comms_packing... 9 Test_Packing.Test_Pack_Unpack;
smg_comms_packing... 10 end testall;