From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=0.6 required=5.0 tests=BAYES_20,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,c2a8d8ae372fa034,start
X-Google-Attributes: gid103376,public
From: "JJ Lallemand" <jjlallemand@hol.fr>
Subject: Using STRING variable
Date: 1998/05/20
Message-ID: <6jv9mg$e7c$1@news4.isdnet.net>#1/1
X-Deja-AN: 355040132
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Newsgroups: comp.lang.ada
Date: 1998-05-20T00:00:00+00:00
List-Id: <comp.lang.ada>


Hi,

First, sorry for my 'bad english' !

I am new in programming in ADA (ADA 95) and I have a little problem with
string var.


Here is a little program :


----------------------
with text_io; use text_io;

procedure main is
zz : string(1..20);
begin
   put(item=>"Enter your name: ");
   get(zz);
   put_line("hello " & zz);
end main;
-----------------------

The problem is that ADA wants exactly 20 characters ! How to enter less
characters ?

And when I "put" a string to an other ( text2 := text1 ) with  text1 :
string (1..20) and text2 : string(1..30), ADA raises a "constraint error"


Thank you for your help !

JJ