Displaying Unsigned Integer

Displaying Unsigned Integer

[Daniel Allex]

How do I print an unsigned integer in octal to the screen?

Re: Displaying Unsigned Integer

[tmoran]

>How do I print an unsigned integer in octal to the screen?
Like this:
with Ada.Text_IO;
procedure Test is
  type Unsigned_16 is mod 2**16;
  package Unsigned_16_IO is new Ada.Text_IO.modular_io(Unsigned_16);
  x : Unsigned_16 := 4097;
begin
  Unsigned_16_IO.Put(x, base=>8);  -- puts "8#10001#" on stdout
end Test;