comp.lang.ada
 help / color / mirror / Atom feed
From: Bob Wells #402 <wel@EUROCONTROL.DE>
Subject: Systemless use of 'Address.
Date: Thu, 10 Nov 1994 16:14:53 +0100
Date: 1994-11-10T16:14:53+01:00	[thread overview]
Message-ID: <9411101514.AA21438@eurocontrol.de> (raw)

G'day,

Given the following procedure declaration:

  procedure Display_Code2String (
    Data_Address : in     System.Address;
    Data_Size    : in     Natural;
    Data         : in out String_Ptr;
    Length       : in out Natural;
    Append       : in     Boolean := False);


and the following call to the procedure

        Draw.Display_Code2String ( Data_Address => Tmp_String'Address,
                                   Data_Size    => Tmp_String'Size,
                                   Data         => Return_String,
                                   Length       => Return_String_Length );

Why does the Verdix compiler (sorry specifically the

Verdix Ada Compiler, Copyright 1984, 1992
VADSworks for Sun-4 -> MC68020/30/vxWorks, (VADS 6.0.5)
Mon Aug 17 09:11:00 EST 1992 2.0.3(b)

accept this procedyre call **without** the a with clause for the package
System?

But if I add

        Tmp_String : EDD_Code_String ( 1 .. (Integer(Tmp_Seq.All'Last)/3 + 1));
        for Tmp_String use at Tmp_Seq.All'Address;

it now will only compile the package without errors if I "with" System?

Am I missing something here?

Thanks,

BTW I haven't forgotten the request for Ada ATC info Mike. I'll get back to
you as soon as I can.

@                   --------
@          ////  - ( G'day! )
@         (o o)     --------
@ ----oOO--(_)--OOo--------------------------------------------------------
  Bob Wells         "The marvels of today's modern technology include the
                     development of a soda can, when discarded will last
                     forever ... and a $7,000 car which when properly cared
                     for will rust out in two or three years."
@ INTERNET: wel@eurocontrol.de                 CompuServe:      100272,3004
@ The Ada WWW Server is http://lglwww.epfl.ch/Ada/                 Team Ada
@ For exciting Ada info enter 'finger wel@s4ecawel.eurocontrol.de'



             reply	other threads:[~1994-11-10 15:14 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1994-11-10 15:14 Bob Wells #402 [this message]
1994-11-11 20:32 ` Systemless use of 'Address Cary Jamison
1994-11-12 20:38   ` Robert Dewar
1994-11-14 21:36 ` Norman H. Cohen
1994-11-16 16:11   ` Mats Weber
1994-11-16 23:50     ` Robert Dewar
1994-11-17 22:35       ` Keith Thompson
1994-11-17  1:41     ` Bob Duff
replies disabled

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