Re: Help with type definition

[hanslad@gmail.com]

Hello again,
I still need some help with type definition in my program.
The specification of the protocol I try to implement the identifier type could be a byte string with similar specification as the string identifier type.
Is there a type in Ada for unbounded byte arrays similar to the unbounded string?

Belowis an excerpt from the protocol specification of how the bytestring is presented on the wire:

"A ByteString is encoded as sequence of bytes preceded by its length in bytes. The length is encoded as a 32-bit signed integer as described above.
If the length of the byte string is -1 then the byte string is 'null'."

 
I got a new version of my code:

package Types is

   package SU   renames Ada.Strings.Unbounded;

   type StringIdentifier is new SU.Unbounded_String;

   type ByteStringIdentifier is new ??;
   
   type IdentifierType is
     (
      Identifier_Numeric,
      Identifier_String,
      Identifier_Bytestring
     );
   for IdentifierType use
     (Identifier_Numeric => 1,
      Identifier_String  => 2,
      Identifier_ByteString  => 3,);
   for IdentifierType'Size use 8;


   type Node_Id (IdType  : IdentifierType := IdentifierType_Numeric )is record
      NamespaceIndex : Interfaces.Unsigned_16  := 0;
      case IdType is
      when Identifier_Numeric =>
         Numeric    : Interfaces.Unsigned_32 ;
      when Identifier_String =>
         String     : StringIdentifier;
      when Identifier_String =>
         ByteString     : ByteStringIdentifier;
      end case;
   end record;
end Types;



Thanks

HP