1 (in-package #:portaCL)
 2 
 3 (define-condition not-implemented (error) ()
 4   (:documentation "Condition for when an implementation has not been written,
 5   but not deliberately excluded.  This is generally the default."))
 6 
 7 (define-condition not-supported (error) ()
 8   (:documentation "Condition for when something is deliberately not
 9   supported."))
10 
11 (define-condition not-necessary () ()
12   (:documentation "Condition for when something is not necessary.  E.g., setting
13   this in an .ASD file will cause that particular component to load only if it
14   exists, while preventing failure if it does not."))