diff options
| author | Darren Bane <dbane@tilde.institute> | 2021-02-26 14:26:57 +0000 |
|---|---|---|
| committer | Darren Bane <dbane@tilde.institute> | 2021-02-26 14:26:57 +0000 |
| commit | 5586c2093e03a3d684477c3b9ed4e7122e479255 (patch) | |
| tree | 1acdba4403fb00ec20a45a1e12232752110b8187 | |
| parent | 4c637133d1afb0c1e66a20a9f0e686953f220f5b (diff) | |
| download | lsp-5586c2093e03a3d684477c3b9ed4e7122e479255.tar.gz | |
Return a float; for a few LOC this had a high defect density
| -rw-r--r-- | dbc2.lsp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dbc2.lsp b/dbc2.lsp index afc3006..552bc44 100644 --- a/dbc2.lsp +++ b/dbc2.lsp @@ -15,6 +15,6 @@ (let ((res (quotient (sum (mapcar #'abs values)) (length values)))) ;; must ensure positive result (assert (>= res 0)) - (assure <fixnum> res))) + (assure <float> res))) ;; (average-of-absolutes '(1 3)) ;; (average-of-absolutes '()) |