Xref:	news2.mv.net comp.os.msdos.djgpp:8558
From:	peter AT agnes DOT dida DOT physik DOT uni-essen DOT de (Peter Gerwinski)
Newsgroups:	comp.os.msdos.djgpp
Subject:	Re: function pointers
Date:	12 Sep 1996 20:05:08 GMT
Organization:	Universitaet Essen, Germany
Lines:	25
Message-ID:	<519qdk$58p@sun3.uni-essen.de>
References:	<517hq2$hqp AT news DOT ghgcorp DOT com>
Reply-To:	peter DOT gerwinski AT uni-essen DOT de
NNTP-Posting-Host:	agnes.dida.physik.uni-essen.de
To:	djgpp AT delorie DOT com
DJ-Gateway:	from newsgroup comp.os.msdos.djgpp

Jeff (rbachtel AT mailman DOT ghgcorp DOT com) wrote:
> I wish to create a variable, such that a function (with parameters)
> can be assigned to it.
> For example, in TurboP7.0:
> type
>     ProcPTRType=procedure(x,y : integer);

In GNU Pascal, you have pointers to procedures instead:

    Type
      ProcPtrType = ^Procedure ( Integer, Integer );

    Var
      P: ProcPtrType;

    P:= @MyProcedure;
    P^ ( 2, 7 );

Good luck,

    Peter

      e-mail:  peter DOT gerwinski AT uni-essen DOT de
home address:  D\"usseldorfer Str. 35, 45145 Essen, Germany
         WWW:  http://agnes.dida.physik.uni-essen.de/~peter/

- Raw text -