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,74a56083ffbe573d
X-Google-Attributes: gid103376,public
From: cm@mihalis.demon.co.uk (Chris Morgan)
Subject: Re: Zoo question
Date: 1996/08/12
Message-ID: <m2zq408cfq.fsf@mihalis.demon.co.uk>#1/1
X-Deja-AN: 173764815
x-nntp-posting-host: baesema5.demon.co.uk
sender: cm@mihalis.demon.co.uk
references: <320F16B6.6944@lmtas.lmco.com>
organization: At Home
newsgroups: comp.lang.ada
Date: 1996-08-12T00:00:00+00:00
List-Id: <comp.lang.ada>


In article <320F16B6.6944@lmtas.lmco.com> Ken Garlington
<garlingtonke@lmtas.lmco.com> writes:


   Here's a little brain teaser we received recently. Assuming no typos or
   other obvious syntax errors, will the Fill procedure work in Ada 83?

I say yes because the sneaky begin starts a block with an exception
handler which catches the constraint_error of using 'succ on the last
enumerated value, so as far as the loop is concerned get_next_animal
does just that and it doesn't care about the exception.

However, I'm not confident as it doesn't seem to tease the brain much,
so go on, tell me where I'm missing some reason why the person who
wrote this got it wrong :-)

Chris Morgan
chris.morgan@baesema.co.uk

   package Zoo is
...