diff options
Diffstat (limited to 'cdbc.lisp')
-rw-r--r-- | cdbc.lisp | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/cdbc.lisp b/cdbc.lisp index 9d790ab..57e04e5 100644 --- a/cdbc.lisp +++ b/cdbc.lisp @@ -1,5 +1,7 @@ ;; Ported from https://rosettacode.org/wiki/Assertions_in_design_by_contract#Eiffel ;; Arguably not *quite* design-by-contract, but very close in vanilla CL +;; +;; NB: This has non-essential complexity compared to the ISLisp version. (defun average-of-absolutes (values) (declare (list values)) (assert (> (length values) 0)) |