From 5b0be258009220af661ba877b17c3ebf33972409 Mon Sep 17 00:00:00 2001 From: Matthias Benkard Date: Wed, 10 Oct 2007 14:02:36 +0200 Subject: FIND-SELECTOR: Make ERRORP default to T. darcs-hash:629ac814cc7f7427b1b1cbe71448a670c37c0171 --- Lisp/libobjcl.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Lisp/libobjcl.lisp') diff --git a/Lisp/libobjcl.lisp b/Lisp/libobjcl.lisp index a18f373..1e6d3df 100644 --- a/Lisp/libobjcl.lisp +++ b/Lisp/libobjcl.lisp @@ -369,14 +369,14 @@ If *name* is the name of an existing selector: (declaim (ftype (function ((or selector symbol string list) &optional t) (or null selector)) find-selector)) -(defun find-selector (selector-name &optional errorp) +(defun find-selector (selector-name &optional (errorp t)) "Retrieve a method selector by name. ## Arguments and Values: *selector-name* --- a **string**, a **symbol**, or a **list** of **symbol**s. -*errorp* --- a **generalized boolean**. +*errorp* --- a **generalized boolean**. The default is **true**. Returns: *selector* --- a __selector__ object, or __nil__. -- cgit v1.2.3