19 lines
755 B
Ada
19 lines
755 B
Ada
with Crypto_Generic_Types;
|
|
with Crypto_Core_Types; use Crypto_Core_Types;
|
|
|
|
package Crypto_Types is
|
|
|
|
package Crypto_Types_u8 is new Crypto_Generic_Types(T => u8, T_Array => u8_Array, T_Array_Access => u8_Array_Access);
|
|
package Crypto_Types_u16 is new Crypto_Generic_Types(T => u16, T_Array => u16_Array, T_Array_Access => u16_Array_Access);
|
|
package Crypto_Types_u32 is new Crypto_Generic_Types(T => u32, T_Array => u32_Array, T_Array_Access => u32_Array_Access);
|
|
package Crypto_Types_u64 is new Crypto_Generic_Types(T => u64, T_Array => u64_Array, T_Array_Access => u64_Array_Access);
|
|
|
|
-- use Crypto_Core_Types;
|
|
-- use Crypto_Types_u8;
|
|
-- use Crypto_Types_u16;
|
|
-- use Crypto_Types_u32;
|
|
-- use Crypto_Types_u64;
|
|
|
|
|
|
end Crypto_Types;
|