Re: Unbounded.String instead of Standard.String

[Anh Vo <anhvofrcaus@gmail.com>]

On Wednesday, January 6, 2016 at 7:21:54 AM UTC-8, comicf...@gmail.com wrote:
> > Here is a tiny hint. Linkable/Executable procedure has no parameter.
> > 
> > Anh Vo
> 
> I didn't knew that a main procedure has no parameter .
> Plus , i was a beginner with ubunded_string , so here is the correction :
> 
> with Ada.Text_IO;
> with Ada.Strings.Unbounded;
> with Ada.Text_IO.Unbounded_IO;
>   
> use Ada.Text_IO;
> use Ada.Strings.Unbounded;
> use Ada.Text_IO.Unbounded_IO;
>  
> procedure autre is  
>   var_string : Unbounded_String;
>  begin
>     get_line(var_string);
>     put(var_string);
> end autre;

To make it clearer I would suggest to add a statement before get_line telling the operator to type a message.

     put ("Please type a message then press Enter key: ");