Re: BASIC_NUM_IO

[anon@anon.org (anon)]

"Ada.Integer_Text_IO" is the standard package that most use for integer I/O

with Ada.Text_IO ;   -- use for "new_line" 
use  Ada.Text_IO ;

with Ada.Integer_Text_IO ; -- use for integer "put" 
use  Ada.Integer_Text_IO ;

procedure test_ranges is
begin
  put ( short_integer'size ) ;
  new_line ;
end test_ranges ;


If you want to define your own type of integer  then 

with Ada.Text_IO ;   -- use for new_line 
use  Ada.Text_IO ;

procedure test_ranges is

  package basic_num_io is new Ada.Text_IO.Integer_IO ( Integer ) ;
  use basic_num_io ; 

begin
  put ( short_integer'size ) ;
  new_line ;
end test_ranges ;

In <78hfulF1m321pU2@mid.individual.net>, Georg <nobody@nowhere.com> writes:
>Hi All,
>
>in my Ada books I find the with-clause "with BASIC_NUM_IO; use 
>BASIC_NUM_IO".
>
>The following program
>
>with basic_num_io; use basic_num_io;
>
>procedure test_ranges is
>begin
>   put_line(short_integer'size);
>end test_ranges;
>
>does not compile because the compiler complaints that the package 
>"basic_num_io" does not exist.
>
>Is there a replacement for this package in GNAT? How can I print number 
>on the screen instead?
>
>Regards
>
>Georg