diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2007-10-10 14:02:36 +0200 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2007-10-10 14:02:36 +0200 |
| commit | 5b0be258009220af661ba877b17c3ebf33972409 (patch) | |
| tree | f4c0d6c3744473d009d258927d5484edb1a99328 /Lisp/libobjcl.lisp | |
| parent | f71611e1995b2645a183a52e221fccfcca64d2e0 (diff) | |
FIND-SELECTOR: Make ERRORP default to T.
darcs-hash:629ac814cc7f7427b1b1cbe71448a670c37c0171
Diffstat (limited to 'Lisp/libobjcl.lisp')
| -rw-r--r-- | Lisp/libobjcl.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
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__. |