changelog shortlog graph tags branches changeset file revisions annotate raw help

Mercurial > core / lisp/std/condition.lisp

revision 646: 95fd920af398
parent 645: 3e6a17fb5712
child 682: 5e8b1855f866
     1.1--- a/lisp/std/condition.lisp	Wed Sep 11 17:24:07 2024 -0400
     1.2+++ b/lisp/std/condition.lisp	Wed Sep 11 18:08:29 2024 -0400
     1.3@@ -172,15 +172,11 @@
     1.4   ((item
     1.5     :initarg :item
     1.6     :initform (error "Must specify argument item")
     1.7-    :reader missing-argument-item)
     1.8-   (command
     1.9-    :initarg :command
    1.10-    :initform (error "Must specify command")
    1.11-    :reader missing-argument-command))
    1.12-  (:report (lambda (condition stream)
    1.13-             (declare (ignore condition))
    1.14-             (format stream "Missing argument")))
    1.15-  (:documentation "A condition which is signalled when an option expects an argument, but none was provided"))
    1.16+    :reader missing-argument-item))
    1.17+   (:report (lambda (condition stream)
    1.18+              (declare (ignore condition))
    1.19+              (format stream "Missing argument")))
    1.20+   (:documentation "A condition which is signalled when an option expects an argument, but none was provided"))
    1.21 
    1.22 (defun missing-argument-p (value)
    1.23   (typep value 'missing-argument))