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,ea81945e8b96701b X-Google-Attributes: gid103376,public From: Andy S Subject: Re: packet type ? Date: 2000/01/20 Message-ID: <38871060.37CA@nospam.com.tj>#1/1 X-Deja-AN: 575235625 Cache-Post-Path: news.ozonline.com.au!unknown@melb-pool-42.ozonline.com.au Content-Transfer-Encoding: 7bit References: <387F3DD1.485F7C70@icn.siemens.de> <85njs1$3rl$1@nnrp1.deja.com> <38845EBD.6F90845D@icn.siemens.de> <8646k7$6g1$1@nyheter.chalmers.se> Content-Type: text/plain; charset=us-ascii X-Complaints-To: abuse@connect.com.au X-Trace: perki.connect.com.au 948371982 12430 203.4.248.42 (20 Jan 2000 12:39:42 GMT) Organization: Australia On Line Pty Ltd Mime-Version: 1.0 Reply-To: andy@nospam.com.tj NNTP-Posting-Date: 20 Jan 2000 12:39:42 GMT Newsgroups: comp.lang.ada Date: 2000-01-20T12:39:42+00:00 List-Id: Brian Rogoff wrote: > Ada 95 also allows you to create a stack signature > > generic > type Item_Type is private; > type Stack_Type is private; > with procedure Push(Stack : in out Stack_Type; Item : in Item_Type); > with procedure Pop(Stack : in out Stack_Type; Item : out Item_Type); > ... > package Stack_Sig is begin end; > > and write code which only depends on an instantiation having that profile, > so that your stack code and many others can supply the stack ADT for the > code. This is a very nice feature of Ada 95 which is not described in many > Ada books; Barnes and Ben-Ari are exceptional here. > Are you sure? My GNAT compiler barffed at this one ! ___________________________________________ Andy Starritt ___________________________________________