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.9 required=5.0 tests=BAYES_00
	autolearn=unavailable autolearn_force=no version=3.4.4
Path: 
 border1.nntp.ams3.giganews.com!border2.nntp.ams3.giganews.com!backlog4.nntp.ams3.giganews.com!backlog4.nntp.ams.giganews.com!border2.nntp.ams.giganews.com!nntp.giganews.com!xlned.com!feeder7.xlned.com!news.glorb.com!news-in-01.newsfeed.easynews.com!easynews!core-easynews-01!easynews.com!en-nntp-16.dc1.easynews.com.POSTED!not-for-mail
From: agent@drrob1.com
Newsgroups: comp.lang.ada
Subject: Re: confusing string error
Message-ID: <io14g9d9nks7aigblsf7lkbq03ja2oompk@4ax.com>
References: <m23sf9prlefup1lir7j21jg9qeoaa7j0sl@4ax.com>
 <87ha81u9r7.fsf@adaheads.sparre-andersen.dk>
 <3kdtf9l42gimm37vgia3eibsmr638r27ig@4ax.com> <lyy51c3el6.fsf@pushface.org>
 <8eouf9logko4l4ee6806hlufrjosbl9h3s@4ax.com>
 <6b15a672-d9af-4580-88b9-435b90789d47@googlegroups.com>
 <lyr4742prq.fsf@pushface.org>
User-Agent: ForteAgent/7.20.32.1218
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Complaints-To: abuse@easynews.com
Organization: Forte Inc.  http://www.forteinc.com/apn/
X-Complaints-Info: Please be sure to forward a copy of ALL headers otherwise
 we will be unable to process your complaint properly.
Date: Mon, 17 Feb 2014 07:57:56 -0500
X-Received-Bytes: 2103
X-Original-Bytes: 2214
Xref: number.nntp.dca.giganews.com comp.lang.ada:184932
Date: 2014-02-17T07:57:56-05:00
List-Id: <comp.lang.ada>

On Sat, 15 Feb 2014 18:29:29 +0000, Simon Wright <simon@pushface.org>
wrote:

>adambeneschan@gmail.com writes:
>
>> On Saturday, February 15, 2014 4:53:42 AM UTC-8, ag...@drrob1.com wrote:
>>> On Sat, 15 Feb 2014 09:33:25 +0000, Simon Wright wrote:
>>
>>> I guess this is a case of the error code does not match the error.  I
>>> kept getting an error message about the character appending line.
>>> 
>>> I tried GDB and stepped through, and seemed to get the same error.
>
>GNAT/GDB finds it correctly for me;
>
>   (gdb) catch exception
>   Catchpoint 1: all Ada exceptions
>   (gdb) run
>   Starting program: /Users/simon/tmp/testtokenizea 
>    Input line : 1+
>
>    Number of characters read is           2.  Value of s'last is         2561, token.state = DGT, sum=          1, DELIMCH= +, DELIMSTATE= OP
>
>   Catchpoint 1, ADA.STRINGS.INDEX_ERROR at 0x0000000100001cdb in tokenizea__getopcode (token=...) at tokenizea.adb:121
>   121	      CH2 := Element(Token.UStr,2);

I'll have to use the catch command in the future, now that you have
taught it to me.

Thanks
--rob