projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.8.0.60:
[sbcl.git]
/
src
/
compiler
/
backend.lisp
diff --git
a/src/compiler/backend.lisp
b/src/compiler/backend.lisp
index
20d21cc
..
cf140b1
100644
(file)
--- a/
src/compiler/backend.lisp
+++ b/
src/compiler/backend.lisp
@@
-107,7
+107,7
@@
(defvar *backend-t-primitive-type*)
(declaim (type primitive-type *backend-t-primitive-type*))
(defvar *backend-t-primitive-type*)
(declaim (type primitive-type *backend-t-primitive-type*))
-;;; a hashtable translating from VOP names to the corresponding VOP-Parse
+;;; a hashtable translating from VOP names to the corresponding VOP-PARSE
;;; structures. This information is only used at meta-compile time.
(defvar *backend-parsed-vops* (make-hash-table :test 'eq))
(declaim (type hash-table *backend-parsed-vops*))
;;; structures. This information is only used at meta-compile time.
(defvar *backend-parsed-vops* (make-hash-table :test 'eq))
(declaim (type hash-table *backend-parsed-vops*))
@@
-263,8
+263,10
@@
yet an ideal interface, but it does allow for compile-time
conditionalization.
|#
conditionalization.
|#
-;;; The default value of NIL means use only unguarded VOPs.
-(defvar *backend-subfeatures* nil)
+;;; The default value of NIL means use only unguarded VOPs. The
+;;; initial value is customizeable via
+;;; customize-backend-subfeatures.lisp
+(defvar *backend-subfeatures* '#.sb-cold:*shebang-backend-subfeatures*)
;;; possible *BACKEND-SUBFEATURES* values:
;;;
;;; possible *BACKEND-SUBFEATURES* values:
;;;