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=0.2 required=5.0 tests=BAYES_00,INVALID_MSGID,
	REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,5f17ba64fcd7c0bf,start
X-Google-Attributes: gid103376,public
From: Christophe Bregand <Christophe.Bregand@elca-matrix.ch>
Subject: GNAT on VMS
Date: 1999/08/24
Message-ID: <37C29ECD.C39C9099@elca-matrix.ch>#1/1
X-Deja-AN: 516571739
Content-Transfer-Encoding: 7bit
X-Accept-Language: fr-FR,fr-CH,fr
Content-Type: text/plain; charset=us-ascii
X-Trace: news 935501701 193.72.147.152 (Tue, 24 Aug 1999 15:35:01 MET DST)
Organization: ELCA Informatique SA
MIME-Version: 1.0
Reply-To: Christophe.Bregand@elca-matrix.ch
NNTP-Posting-Date: Tue, 24 Aug 1999 15:35:01 MET DST
Newsgroups: comp.lang.ada
Date: 1999-08-24T00:00:00+00:00
List-Id: <comp.lang.ada>

I'm using GNAT compiler on an OPENVMS plateform.
My problem is the following: in a DCL procedure, when I run a program
that raises an exception, the DCL procedure seems not receiving an error
code from the ADA program (a ON ERROR THEN GOTO command is ignored and
the DCL procedure goes on).
There was no such program with the same DEC ADA 83 program.
Does anyone knows something about that?
Thanks