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,a88c2f9df6c28778,start
X-Google-Attributes: gid103376,public
From: Joerg Huber <jorg@ccis.adisys.com.au>
Subject: gnat with HPUX 10.20
Date: 1997/09/25
Message-ID: <342A27AC.FA1@ccis.adisys.com.au>#1/1
X-Deja-AN: 275495073
Sender: usenet@ccis.adisys.com.au (usenet)
Organization: ADI Ltd
Newsgroups: comp.lang.ada
Date: 1997-09-25T00:00:00+00:00
List-Id: <comp.lang.ada>


Enviroment

OS   : HPUX 10.20
gnat : Version 3.09 for HPUX 10.10

Consider the following Ada code:

SPEC : delay_test.ads

package DELAY_TEST is
  procedure DO_DELAY;
end DELAY_TEST;


BODY : delay_test.adb

package body DELAY_TEST is
  procedure DO_DELAY is
  begin
    delay 0.0;
  end DO_DELAY;
end DELAY_TEST;


EXECUTABLE : adi_test_delay.adb

with DELAY_TEST;
with TEXT_IO;

procedure ADI_TEST_DELAY is
begin 
  TEXT_IO.PUT_LINE ("Test ADI_TEST_DELAY");
end ADI_TEST_DELAY;

Compile and link with the command :

gnatmake adi_test_delay

If I run the executable adi_test_delay it crashes badly (it logs me out 
of the system).
If I take TEXT_IO out it works fine.

What is the problem?
Is there a gnat version (or patch) for HPUX 10.20, and if so, where can 
I get it?

Thanks for your help.


Joerg Huber
Command and Control Information Systems 
ADI Limited, Systems Group
Perth, Australia

mailto:jorg@ccis.adisys.com.au