Path: utzoo!attcan!uunet!cs.utexas.edu!tut.cis.ohio-state.edu!mailrus!cornell!uw-beaver!mit-eddie!bu-cs!dartvax!eleazar.dartmouth.edu!matthews
From: matthews@eleazar.dartmouth.edu (Jim Matthews)
Newsgroups: comp.sys.mac.programmer
Subject: Re: Problem with LSP glue for SetClikLoop
Message-ID: <13148@dartvax.Dartmouth.EDU>
Date: 20 Apr 89 19:50:18 GMT
References: <13147@dartvax.Dartmouth.EDU>
Sender: news@dartvax.Dartmouth.EDU
Reply-To: matthews@eleazar.dartmouth.edu (Jim Matthews)
Organization: Dartmouth College, Hanover, NH
Lines: 21

Sorry about the previous post -- I forgot that our distributed editor 
was having some trouble these days....

A program of mine is having trouble with the glue in Lightspeed Pascal
version 2.0p1.  It seems that when I call SetClikLoop to install a
TextEdit click-loop routine the address of my routine is placed at
14(A5), in the middle of the application parameters area.  That's
strange enough, but it got worse for a user of mine who also uses
SmartScrap, a souped-up scrapbook DA from Solutions, Inc.  When you
click on the SmartScrap window it calls an identical glue routine which
also stores an address at 14(A5).  With my address overwritten the next
click on my window causes a crash.  I tested one of my own desk
accessories written in LSP and it does the same thing.

Why does the LSP glue use a strange, fixed location for that purpose?
Not only is it guaranteed to cause trouble with DAs that use the same
glue, but it will also screw up a program that has multiple different
click-loop routines.

Jim Matthews
Dartmouth Software Development