From: Stas Boukarev <stassats@gmail.com>
Date: Tue, 18 Dec 2012 17:51:09 +0000 (+0400)
Subject: Fix a typo in the previous commit.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=053e401f08f5df876707453960f8034661553d05;p=sbcl.git

Fix a typo in the previous commit.

-1 should be ~S.
---

diff --git a/src/code/toplevel.lisp b/src/code/toplevel.lisp
index f5a7aa9..d3f523f 100644
--- a/src/code/toplevel.lisp
+++ b/src/code/toplevel.lisp
@@ -198,7 +198,7 @@ any non-negative real number."
   (when (or (not (realp seconds))
             (minusp seconds))
     (error 'simple-type-error
-           :format-control "Invalid argument to SLEEP: -1, ~
+           :format-control "Invalid argument to SLEEP: ~S, ~
                             should be a non-negative real."
            :format-arguments (list seconds)
            :datum seconds