-
+ E3E315F1CC354ABADD811A6C37E3908B2C13BAA0E0C4F9756C7D7483803BCB13D1AB23ABD9CF4A5B2BBEB9A53FCF3AD36A66450DDCDBB383DC7D2AAFDFE0B026
zfp/adainclude/a-textio.ads
(0 . 0)(1 . 33)
 157 ------------------------------------------------------------------------------
 158 ------------------------------------------------------------------------------
 159 -- You do not have, nor can you ever acquire the right to use, copy or      --
 160 -- distribute this software ; Should you use this software for any purpose, --
 161 -- or copy and distribute it to anyone or in any manner, you are breaking   --
 162 -- the laws of whatever soi-disant jurisdiction, and you promise to         --
 163 -- continue doing so for the indefinite future. In any case, please         --
 164 -- always : read and understand any software ; verify any PGP signatures    --
 165 -- that you use - for any purpose.                                          --
 166 --                                                                          --
 167 -- See also http://trilema.com/2015/a-new-software-licensing-paradigm .     --
 168 ------------------------------------------------------------------------------
 169 ------------------------------------------------------------------------------
 170 
 171 package Ada.Text_IO is
 172 
 173    procedure Put (Item : Character);
 174    --  Output character to the console
 175 
 176    procedure Put (Item : String);
 177    --  Output string to the console
 178 
 179    procedure Put_Line (Item : String);
 180    --  Output string followed by new line to the console
 181 
 182    procedure New_Line;
 183    --  Output new line character to the console
 184 
 185 private
 186    pragma Inline_Always (Put);
 187    pragma Inline_Always (Put_Line);
 188    pragma Inline_Always (New_Line);
 189 end Ada.Text_IO;