diff options
| author | Darren Bane <darren.bane@gmail.com> | 2020-12-04 00:47:27 +0000 |
|---|---|---|
| committer | Darren Bane <darren.bane@gmail.com> | 2020-12-04 00:47:27 +0000 |
| commit | 078ae5a0780015dfff775196d675fb23f0367060 (patch) | |
| tree | 753dc46d086657f1b557c6ed59a38fb42adb7a53 /cdbc.lisp | |
| parent | da9f8c68fb8048a559626ea2d327a04b65c432c7 (diff) | |
| download | lsp-078ae5a0780015dfff775196d675fb23f0367060.tar.gz | |
Can't get past that OpenLisp error; go back to sbcl
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)) |