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.6 required=5.0 tests=BAYES_05,INVALID_DATE
	autolearn=no autolearn_force=no version=3.4.4
Path: utzoo!attcan2!uunet!husc6!mailrus!ames!pasteur!ucbvax!eg.csc.ti.COM!LINNIG
From: LINNIG@eg.csc.ti.COM (Mike Linnig)
Newsgroups: comp.lang.ada
Subject: Dynamic Address Clauses??
Message-ID: <8806011944.AA06549@ti.com>
Date: 1 Jun 88 15:12:00 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The Internet
List-Id: <comp.lang.ada>

Folks,

The following package was compiled with two compilers (DEC Ada and
Tartan 1750a Ada).  Both allowed the declaration of X.  DEC ada
complained about the type conversion used for the rep clause
in ANOTHER.


Assuming one or both is legal, what do they mean???

	Mike Linnig,
	Texase Instruments



------------------------------------------------------------
with SYSTEM;
use SYSTEM;
package DYNAMIC_ADDR is
  subtype STUPID is SYSTEM.ADDRESS;

  function DYNAMIC return STUPID;  -- just some function


  X: INTEGER;
  for X use at DYNAMIC;  -- just what does this mean??


  ANOTHER: INTEGER;
  for ANOTHER USE AT stupid(x); 
                -- I guess we can use x as a pointer
                -- but is it only evaluated at package elaboration?

end DYNAMIC_ADDR;