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,bf0a6e5321bcc595
X-Google-Attributes: gid103376,public
From: dewar@merv.cs.nyu.edu (Robert Dewar)
Subject: Re: passing pointer of different type to one procedure
Date: 1997/04/19
Message-ID: <dewar.861502808@merv>#1/1
X-Deja-AN: 236076843
References: <01bc4a80$713ca380$52bd0c26@cat> <33568C14.4337@boeing.com>
Organization: New York University
Newsgroups: comp.lang.ada
Date: 1997-04-19T00:00:00+00:00
List-Id: <comp.lang.ada>


John said

<<Perhaps you could create records as a class hierarchy of tagged types,
then pass a class-wide pointer to your sort routine.>>

There have been several suggestions which involve changing the data
(using variant records, using tagged types ...)

but surely the desire is to sort different unrelated data with the same
shared program.

And it seems to be that the approach with access procedures that is
in g-hesora in the GNAT library seems by far the most straight
forward approach. We use this in the compiler itself for sorting all
kinds of different data, with shared common code.