(9 . 5)(9 . 13)
347 -- utility method for printing an array of octets
348 procedure Print(Data: in Raw_Types.Octets; Msg: in String);
349
350 procedure Test_Pack_Unpack;
351 -- testing pack/unpack for Serpent
352 procedure Test_Pack_Unpack_Serpent;
353
354 -- testing pack/unpack for RSA
355 procedure Test_Pack_Unpack_RSA;
356
357 -- helper methods
358 procedure Hex2Octets( Hex: in String; O: out Raw_Types.Octets );
359
360 end Test_Packing;