Re: newbie problem

[Marin David Condic <condicma@pwfl.com>]

Simon Bracken wrote:
>
> 
> with Text_IO;
> procedure Example is
> 
>   subtype TEXT_STRING is STRING (1 .. 80);
>   type VARYING is
>     record
>       Text : TEXT_STRING;
>       Last : NATURAL;
>     end record;
> 
>   Input_Record : VARYING;
> 


You'll want to notice that you are basically duplicating the
Bounded_String type found in the package Ada.Strings.Bounded. (ARM
A.4.4) Wherever possible, IMHO, its best to use the data types &
operators supplied by the language rather than reinvent the wheel. Of
course, you do have the problem I observed in a related post in that
Text_IO will only deal directly with the standard type String.

MDC
-- 
Marin D. Condic
Real Time & Embedded Systems, Propulsion Systems Analysis
United Technologies, Pratt & Whitney, Large Military Engines
M/S 731-95, P.O.B. 109600, West Palm Beach, FL, 33410-9600
Ph: 561.796.8997         Fx: 561.796.4669

"The reasonable man adapts himself to the world; the unreasonable one
persists in trying to adapt the world to himself. Therefore all progress
depends on the unreasonable man."

        --  G.B. Shaw