🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.xerox
Article #716

MasterScope template for CL:APPLY

#716
From: Owen Rees
Date: Tue, 25 Apr 1989 06:16
28 lines
1321 bytes
MasterScope told me that there were no callers of MYFN after analyzing a
function containing
(APPLY #'MAPCAR #'MYFN LIST-OF-LISTS) 

I then discovered that the templates for CL:APPLY (which I am using), IL:APPLY
and IL:APPLY* are

2/313_ (GETTEMPLATE 'CL:APPLY)
((! NIL EXPR (if (LITATOM (CAR EXPR)) then (LIST (QUOTE SET) (QUOTE EVAL)) else
(LIST (QUOTE SMASH) (QUOTE EVAL)))))

2/314_ (GETTEMPLATE 'APPLY)
(FUNCTIONAL |..| EVAL)

2/317_ (GETTEMPLATE 'APPLY*)
(FUNCTIONAL |..| EVAL)

Since CL:APPLY is like a combination of IL:APPLY and IL:APPLY* I have changed
the template to be the same as for  IL:APPLY. This seems to work, MasterScope
now knows about MYFN.  Is this the right thing to have done?

The old value of the template looks a bit odd, is it meant to be a template for
some other function?

 I hope MasterScope survives the Envos problems, the new features in the Medley
version are proving very useful.

Owen Rees
Technical Details
Message-ID: <43520-26525-1060251635-poppy@uk.co.ansa>
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!ucbvax!ansa.UUCP!RTOR

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!ucbvax!ansa.UUCP!RTOR
From: RTOR@ansa.UUCP (Owen Rees)
Newsgroups: comp.sys.xerox
Subject: MasterScope template for CL:APPLY
Message-ID: <43520-26525-1060251635-poppy@uk.co.ansa>
Date: 25 Apr 89 06:16:07 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The Internet
Lines: 28