From cf7dc2892c1f3a474b7c49f35cbab08bfa08ef71 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= Date: Mon, 20 Feb 2023 08:37:05 -0300 Subject: Add with-package to utils --- str.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'str.lisp') diff --git a/str.lisp b/str.lisp index a8b2a7f..5116be4 100644 --- a/str.lisp +++ b/str.lisp @@ -1,6 +1,6 @@ (in-package #:str) -(declaim (optimize (speed 3) (safety 0))) +(declaim (optimize (speed 3) (safety 1))) (declaim (ftype (function ((or pathname string)) (values string &optional)) read-file)) (defun read-file (path) -- cgit v1.2.3