1 with Ada.Text_IO; use Ada.Text_IO; 2 with Ada.Streams; use Ada.Streams; 3 4 package Dump is 5 6 Hex : constant String := "0123456789ABCDEF"; 7 procedure HexDump(Stream : Stream_Element_Array); 8 procedure HexDumpRev(Stream : Stream_Element_Array); 9 10 end Dump;