[PATCH] nicer arglist for ADSF:OOS
"Tobias C. Rittweiler" <[email protected]> Sun, 19 Aug 2007 17:21:05 +0200
| Newsgroups | gmane.lisp.cclan.general |
|---|---|
| Message-ID | <[email protected]> |
The attached patch makes the arglist of ASDF:OOS a bit more useful when used in combination with Slime's autodoc feature. -T. ------------------------------------------------------------------------- This SF.net email is sponsored by: Splunk Inc. Still grepping through log files to find problems? Stop. Now Search log events and configuration files using AJAX and a browser. Download your FREE copy of Splunk now >> http://get.splunk.com/ _______________________________________________ cclan-list mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/cclan-list
asdf-oos-arglist.diff
(text/x-diff, 677 B)
Index: asdf.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/contrib/asdf/asdf.lisp,v
retrieving revision 1.24
diff -u -r1.24 asdf.lisp
--- asdf.lisp 7 Nov 2006 10:51:42 -0000 1.24
+++ asdf.lisp 19 Aug 2007 15:18:04 -0000
@@ -900,9 +900,10 @@
(get-universal-time))
(return)))))))))
-(defun oos (&rest args)
+(defun oos (operation system &rest args &key force (verbose t) version)
"Alias of OPERATE function"
- (apply #'operate args))
+ (declare (ignore force verbose version))
+ (apply #'operate operation system args))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; syntax