RosettaCodeData/Task/Binary-strings/Ada/binary-strings-3.adb
2026-04-30 12:34:36 -04:00

4 lines
135 B
Ada

with Interfaces; use Interfaces;
...
type Octet is new Interfaces.Unsigned_8;
type Octet_String is array (Positive range <>) of Octet;