Re: DATA_ERROR exception problem

[taurus!atlas!erickson@lll-winken.llnl.gov (David Erickson)]

In article <X7D8JTH@math.fu-berlin.de> dww@inf.fu-berlin.de writes:


>I want to write a compeletly safe input procedure for integers:
>I GET an integer, and if DATA_ERROR is raised, I want to loop
>around until I get a decent answer. 


>My problem is that DATA_ERROR is raised on two different conditions:
>an integer being illegal, i.e. out of bounds, or an illegal
>character being encountered (such as when I enter "1.0" or "z").
>The problem ist that in the former case, the input buffer has been
>emptied (all digits read); in the latter, the illegal character
>(and all following characters) remain in the input buffer.


>Is there any other way to do this besides reading in the
>input as a string and patching together an integer myself :-( ?


Well, you could read in the input as a string and use the INTEGER_IO
GET procedure that reads an integer from a string.

Then your exception handling would have to parse the string to
discover the reason.


>Stupid me wanted to introduce my beginners to exceptions from the
>start - we specified type-safe input, and I expected it to be
>relatively straight-forward to implement in Ada. What am I missing?

A beginner's perspective: beginners can break *anything*.

-Dave Erickson