diff --git a/src/cmp/cmppolicy.lsp b/src/cmp/cmppolicy.lsp index cde39a835..909eab3ec 100644 --- a/src/cmp/cmppolicy.lsp +++ b/src/cmp/cmppolicy.lsp @@ -206,7 +206,7 @@ ;; ERROR CHECKING POLICY ;; -(define-policy assume-no-errors :off safety 2) +(define-policy assume-no-errors :off safety 1) (define-policy assume-right-type :alias assume-no-errors)