X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fearly-c.lisp;h=3be5dcf68a812ec06ce810e16680b4d5b991b6df;hb=74a1797f60e26c7adbc491840f89bbaab08e504d;hp=ace5c682dd247d1711343bc9e15f0b3b74cd389e;hpb=318fc08d6f6ce8a5506671bbcae7e91118db8fbc;p=sbcl.git diff --git a/src/compiler/early-c.lisp b/src/compiler/early-c.lisp index ace5c68..3be5dcf 100644 --- a/src/compiler/early-c.lisp +++ b/src/compiler/early-c.lisp @@ -29,20 +29,6 @@ #!+sb-doc "The exclusive upper bound on the number of multiple VALUES that you can return.") - -(defconstant-eqx sb!xc:lambda-list-keywords - '(&allow-other-keys - &aux - &body - &environment - &key - &more - &optional - &rest - &whole) - #'equal - #!+sb-doc - "symbols which are magical in a lambda list") ;;;; cross-compiler-only versions of CL special variables, so that we ;;;; don't have weird interactions with the host compiler @@ -123,6 +109,7 @@ (defvar *trace-table*) (defvar *undefined-warnings*) (defvar *warnings-p*) +(defvar *lambda-conversions*) ;;; This lock is seized in the compiler, and related areas: the ;;; compiler is not presently thread-safe