Re: jm6window-revert

[bill (Bill St. Clair)]

> Date: Sat, 26 Oct 91 10:55:08 CDT
> From: lynch@aristotle.ils.nwu.edu (Richard Lynch)
> To: info-macl@cambridge.apple.com
> Subject: jm6window-revert
> 
> 
> 4hzOn-line docs say one arg, but compiler disa9
lgrees.8
}
> tracing 7"mdisables the menu, so who can tell?
> At home with 2.0b1 no patches,>HE no paper docs.
> Sorry for any garbage, phone line#y%:s are bad.
> F~i7d
> 

The on-line doc is wrong, there is an optional argument, which, if
true, will stop the "are you sure?" dialog from appearing:

(defmethod window-revert ((w fred-mixin) &optional dont-prompt)
 ...)

BTW, here's a way to discover what the arglist of a function really is,
rather than looking at the possibly erroneous text in the "MCL Help" file:

Welcome to Macintosh Common Lisp Version 2.0b1!
? (defun real-arglist (sym)
    (let ((ccl::%doc-string-file t))
      (arglist sym)))
REAL-ARGLIST
? (real-arglist 'window-revert)
(CCL::ARG-0 &OPTIONAL CCL::OPT-0)
:ANALYSIS
? 

Disclaimer: Since this function uses a non-exported symbol, it may cease to
work in future versions of MCL (though it works in my current development
version).