Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!zaphod.mps.ohio-state.edu!think!mintaka!bloom-beacon!athena.mit.edu!samalone
From: samalone@athena.mit.edu (Stuart A. Malone)
Newsgroups: comp.sys.mac.programmer
Subject: Re: lsp object problem
Message-ID: <1990Jan2.184048.16593@athena.mit.edu>
Date: 2 Jan 90 18:40:48 GMT
References: <QZbLy5G00WB7M5FERX@andrew.cmu.edu>
Sender: news@athena.mit.edu (News system)
Reply-To: samalone@athena.mit.edu (Stuart A. Malone)
Organization: Massachusetts Institute of Technology
Lines: 21

es2q+@andrew.cmu.edu (Erik Warren Selberg) writes:

>I'm having a problem with LSP using objects.  What I'm trying to do is pass a
>method of an object as a procedure/function, and Lightspeed is choking on it
>(says it needs a function/procedure name).

Try this:

	procedure DoGuy(guy:TGuy)
	  procedure DoThisGuy;
	  begin
	    guy.DoMe;
	  end;
	begin
	  DoIt(DoThisGuy);
	end;

It's messy, but it works.

				--Stuart A. Malone
				samalone@athena.mit.edu