From: Marius Amado Alves <maa@liacc.up.pt>
To: Martin Klaiber <martinkl@zedat.fu-berlin.de>,
comp.lang.ada@ada-france.org
Subject: Re: Error-names.
Date: Mon, 1 Mar 2004 12:48:43 +0000
Date: 2004-03-01T12:48:43+00:00 [thread overview]
Message-ID: <mailman.47.1078144665.327.comp.lang.ada@ada-france.org> (raw)
In-Reply-To: <ucjbh1-m92.ln1@martinkl.dialup.fu-berlin.de>
> > function Get_Error_Code (E : Ada.Exceptions.Exception_Occurrence)
> > return C_Integer is
> > begin
> > Ada.Exceptions.Raise_Exception (E)
> > exception
> > when Program_Error => return Program_Error_Code;
> > when Constraint_Error => return Constraint_Error_Code;
> > ...
> > when others => return Unexpected_Error_Code;
> > end Get_Error_Code;
>
> Doesn't work here. Raise_Exception (E) causes the error:
>
> libopensteuer.adb:24:18: expected private type
> "Ada.Exceptions.Exception_Id" libopensteuer.adb:24:18: found private type
> "Ada.Exceptions.Exception_Occurrence"
E'Identity or Exception_Identity (E) instead of just E in the call to
Raise_Exception should solve the problem.
next prev parent reply other threads:[~2004-03-01 12:48 UTC|newest]
Thread overview: 25+ messages / expand[flat|nested] mbox.gz Atom feed top
2004-02-28 12:58 Error-names Martin Klaiber
2004-02-28 13:35 ` Error-names Martin Dowie
2004-02-28 15:26 ` Error-names Martin Klaiber
2004-02-28 17:19 ` Error-names Marius Amado Alves
2004-02-28 18:31 ` Error-names Martin Klaiber
2004-02-28 19:47 ` Error-names tmoran
2004-02-28 20:29 ` Error-names Martin Klaiber
2004-02-29 19:03 ` Error-names Jeffrey Carter
2004-02-29 20:04 ` Error-names tmoran
2004-02-29 23:24 ` Error-names Björn Persson
2004-03-01 11:29 ` Error-names Martin Klaiber
2004-03-01 12:48 ` Marius Amado Alves [this message]
2004-03-02 2:15 ` Error-names Jeffrey Carter
2004-02-29 20:33 ` Error-names Martin Klaiber
2004-02-29 23:43 ` Error-names tmoran
2004-03-01 11:20 ` Error-names Martin Klaiber
2004-03-07 15:10 ` Error-names Björn Persson
2004-03-08 5:42 ` Error-names Dave Thompson
2004-02-28 20:26 ` Error-names Jacob Sparre Andersen
2004-02-28 18:29 ` Error-names Alexandre E. Kopilovitch
2004-02-29 5:30 ` Error-names David Marceau
2004-02-29 12:17 ` Error-names Martin Klaiber
2004-02-29 19:56 ` Error-names David Marceau
2004-02-29 21:57 ` Error-names Martin Klaiber
2004-03-01 23:20 ` Error-names Randy Brukardt
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox