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=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,7956d7dcc9685cb5
X-Google-Attributes: gid103376,public
From: Preben Randhol <randhol@pvv.org>
Subject: Re: Help ... CONSTRAINT_ERROR
Date: 1999/11/30
Message-ID: <m37lj0l1t7.fsf@kiuk0156.chembio.ntnu.no>#1/1
X-Deja-AN: 554794444
References: <81vfu6$sem$1@tobruk.sydney.gecm.com>
X-Complaints-To: usenet@itea.ntnu.no
X-Trace: kopp.stud.ntnu.no 943957125 1537 129.241.83.82 (30 Nov 1999 10:18:45
 GMT)
Organization: ProgramVareVerkstedet
NNTP-Posting-Date: 30 Nov 1999 10:18:45 GMT
Newsgroups: comp.lang.ada
Date: 1999-11-30T10:18:45+00:00
List-Id: <comp.lang.ada>

"jxredi" <jxredi@gecms.com.au> writes:

| Hi,
| I was wondering if you could help me out with this problem (using ADA83) :
| 
| package R_IO is new TEXT_IO.FLOAT_IO(Float);
| NUM : STRING :=   "hi there";
| FNUM : Float := 0.75;
| R_IO.PUT(NUM,FNUM);   -- this is where the problem is ... but what's wrong
| ??

R_IO takes float but not a string.

I would have done this: (I only know Ada95 though)

Text_IO.Put(Num);
R_IO.Put(FNUM);

Or I would have done:

Text_IO.Put(Num & Float'Image(FNUM))

NB: Note that I only know some Ada95, so if this doesn't work with
Ada83 it is me that is wrong not the compiler :-)
-- 
Preben Randhol -- [randhol@pvv.org] -- [http://www.pvv.org/~randhol/]     
         "Det eneste trygge stedet i verden er inne i en fortelling." 
                                                      -- Athol Fugard