comp.lang.ada
 help / color / mirror / Atom feed
From: Jacob Sparre Andersen <sparre@nbi.dk>
Subject: Re: Arm - ravenscar - exceptions - last chance handler
Date: Sat, 30 May 2015 16:53:48 +0200
Date: 2015-05-30T16:53:48+02:00	[thread overview]
Message-ID: <87617at8ub.fsf@adaheads.sparre-andersen.dk> (raw)
In-Reply-To: 41913ae0-7513-4be5-bb94-b834836f8525@googlegroups.com

jan.de.kruyf@gmail.com writes:

>    procedure Raise_Exception (E : Exception_Id; Message : String := "") is
>       pragma Unreferenced (E);
>
>       procedure Last_Chance_Handler (Msg : System.Address; Line : Integer);
>       pragma Import (C, Last_Chance_Handler, "__gnat_last_chance_handler");
>       pragma No_Return (Last_Chance_Handler);
>
>    begin
>       Last_Chance_Handler (Message'Address, 0);
>    end Raise_Exception;

> How is last chance handler going to know the --length-- of the
> message?

Because it knows where 'First and 'Last of a string are stored
relatively to it's 'Address.

Greetings,

Jacob
-- 
"It is very easy to get ridiculously confused about the
 tenses of time travel, but most things can be resolved
 by a sufficiently large ego."


  reply	other threads:[~2015-05-30 14:53 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2015-05-30 14:26 Arm - ravenscar - exceptions - last chance handler jan.de.kruyf
2015-05-30 14:53 ` Jacob Sparre Andersen [this message]
2015-05-30 18:48   ` jan.de.kruyf
2015-05-30 19:18     ` Simon Wright
2015-05-30 20:57       ` jan.de.kruyf
2015-05-30 15:31 ` Bob Duff
2015-05-30 16:10   ` jan.de.kruyf
2015-05-30 16:50     ` Simon Wright
2015-05-30 20:59       ` jan.de.kruyf
2015-05-30 15:43 ` Simon Wright
2015-05-30 16:14   ` jan.de.kruyf
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox