Home

Ada Keywords: subtype

   

Example

with Ada.Text_IO;
use Ada.Text_IO;

procedure Welcome is
   subtype int is Integer;
   
   number : int := 10;

begin
   Put_Line("Number = " & integer'image(number));
end Welcome;

This would produce:

Number =  10
   

 

 
 
 
 
 
   
 

Home Copyright © 2010 FunctionX, Inc.