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,eee47022b0e39dbb
X-Google-Attributes: gid103376,public
From: dewar@merv.cs.nyu.edu (Robert Dewar)
Subject: Re: Exception problem
Date: 1997/03/09
Message-ID: <dewar.857943261@merv>#1/1
X-Deja-AN: 224250688
References: <330A0D25.313@fs2.assist.uci.edu>
 <evans-2202972108360001@ppp1.s8.pgh.net> <3311BFC4.7576@fs2.assist.uci.edu>
 <5eutjo$rlg@ash.ridgecrest.ca.us>
 <JohnVolan-0903971008050001@accs-as34-dp04.snfc.grid.net>
Organization: New York University
Newsgroups: comp.lang.ada
Date: 1997-03-09T00:00:00+00:00
List-Id: <comp.lang.ada>


John Volan said

<<    Get (Text, Length);
    Get (From => Text (1 .. Length), -- eats any leading whitespace
         Item => Your_Integer,
         Last => Next); -- stops at the end of the integer literal,
                        -- before any trailing whitespace (or indeed,
                        -- any trailing anything
    -- optionally, if you want to do something with the rest of the input line,
    -- you can do:>>

Beware of this approach, it is a little too forgiving. For example, if
you read in 16.23 as an integer, it will work fine, reading 16, and stopping
at the period. You can of course check this, but I have seen several bug
reports from people who get trapped by this and expect data error, and
do not get it!