Tolerate non-simple strings when checking arguments to CERROR.
[sbcl.git] / src / code / char.lisp
blobbb56c5c357f9736bb99cc4966052ae6530d4e653
1 ;;;; character implementation stuff which is to be visible at
2 ;;;; build-the-cross-compiler time
4 ;;;; This software is part of the SBCL system. See the README file for
5 ;;;; more information.
6 ;;;;
7 ;;;; This software is derived from the CMU CL system, which was
8 ;;;; written at Carnegie Mellon University and released into the
9 ;;;; public domain. The software is in the public domain and is
10 ;;;; provided with absolutely no warranty. See the COPYING and CREDITS
11 ;;;; files for more information.
13 (in-package "SB!IMPL")
15 (def!constant sb!xc:char-code-limit #!-sb-unicode 256 #!+sb-unicode #x110000
16 "the upper exclusive bound on values produced by CHAR-CODE")
18 (def!constant base-char-code-limit #!-sb-unicode 256 #!+sb-unicode 128)