Path: utzoo!mnetor!uunet!husc6!mailrus!umix!umich!mibte!gamma!ulysses!ucbvax!cs.vu.nl!fons
From: fons@cs.vu.nl (Fons Botman)
Newsgroups: comp.sys.xerox
Subject: Re: problems with ADVICEs in lyric
Message-ID: <8802221849.aa21469@klipper.cs.vu.nl>
Date: 22 Feb 88 17:49:06 GMT
References: <0.43520.20995.54682.9677@XV.MIT.EDU>
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: VU Informatica, Amsterdam
Lines: 26

L.S.

In article <0.43520.20995.54682.9677@XV.MIT.EDU> Kevin Crowston writes:
>I'm having a little problem with ADVICEs in lyric.  I want to store them
>...
>Worse, every time I MAKEFILE the file, I double it again, so after
>four or five tries, I get 16 or 32 copies of the ADVICE.  Also, the file
>is dirty again immediately after the MAKEFILE, since the ADVICEs
>have been changed.
>
>Anyone know a way around this?  I used to do something like
>
>(ADVICE fn-name)
>(P (READVISE fn-name))
>...

I use:
(P (UNADVISE 'fn-name))
(ADVISE fn-name)
which seems to work.  It can generate the warning "function not advised" the
first time, just ignore that.

But it would be preferrable that ADVISE would just throw away duplicate (i.e.
EQUAL) advice.

						The Fons