src/code/early-cl.lisp

   1 ;;;; miscellaneous stuff about the ANSI standard
   2
   3 ;;;; This software is part of the SBCL system. See the README file for
   4 ;;;; more information.
   5 ;;;;
   6 ;;;; This software is derived from the CMU CL system, which was
   7 ;;;; written at Carnegie Mellon University and released into the
   8 ;;;; public domain. The software is in the public domain and is
   9 ;;;; provided with absolutely no warranty. See the COPYING and CREDITS
  10 ;;;; files for more information.
  11
  12 (in-package "SB!KERNEL")
  13
  14 (file-comment
  15   "$Header$")
  16
  17 ;;; Common Lisp special variables which have SB-XC versions
  18 (proclaim '(special sb!xc:*macroexpand-hook*))
  19
  20 ;;; the Common Lisp defined type specifier symbols
  21 (declaim (type list *standard-type-names*))
  22 (defparameter *standard-type-names*
  23   '(array atom bignum bit bit-vector character compiled-function
  24     complex cons double-float extended-char fixnum float function
  25     hash-table integer keyword list long-float nil null number package
  26     pathname random-state ratio rational real readtable sequence
  27     short-float simple-array simple-bit-vector simple-string simple-vector
  28     single-float standard-char stream string base-char symbol t vector))